bones-compiler 1.1.0 → 1.3.1

data/test/examples/chunk/example06_species.c

@@ -0,0 +1,49 @@
+//
+// This file is part of the Bones source-to-source compiler examples. This C-code
+// example is meant to illustrate the use of Bones. For more information on Bones
+// use the contact information below.
+//
+// == More information on Bones
+// Contact............Cedric Nugteren <c.nugteren@tue.nl>
+// Web address........http://parse.ele.tue.nl/bones/
+//
+// == File information
+// Filename...........chunk/example06.c
+// Author.............Cedric Nugteren
+// Last modified on...07-May-2013
+//
+
+#include <stdio.h>
+
+// This is 'example06', a chunk/chunk with a step of 2
+int main(void) {
+	int i;
+	int N = 256;
+	
+	// Declare input/output arrays
+	int A[N];
+	int B[N];
+	
+	// Set the input data
+	for(i=0;i<N;i++) {
+		A[i] = i;
+		B[i] = i+5;
+	}
+	
+	// Perform the computation
+	#pragma scop
+	{
+		#pragma species kernel A[2:N-1]|chunk(0:1) -> B[2:N-1]|chunk(0:1)
+		for (i = 2; i < N - 1; i = i + 2) {
+			B[i] = A[i];
+			B[i + 1] = A[i + 1];
+		}
+		#pragma species endkernel example06_k1
+	}
+	#pragma endscop
+	
+	// Clean-up and exit the function
+	fflush(stdout);
+	return 0;
+}
+

data/test/examples/chunk/example07_species.c

@@ -0,0 +1,53 @@
+//
+// This file is part of the Bones source-to-source compiler examples. This C-code
+// example is meant to illustrate the use of Bones. For more information on Bones
+// use the contact information below.
+//
+// == More information on Bones
+// Contact............Cedric Nugteren <c.nugteren@tue.nl>
+// Web address........http://parse.ele.tue.nl/bones/
+//
+// == File information
+// Filename...........chunk/example07.c
+// Author.............Cedric Nugteren
+// Last modified on...07-May-2013
+//
+
+#include <stdio.h>
+
+// This is 'example07', a chunk/chunk with a step of 2
+int main(void) {
+	int i;
+	int N = 256;
+	
+	// Declare input/output arrays
+	int A[N];
+	int B[N];
+	
+	// Set the input data
+	for(i=0;i<N;i++) {
+		A[i] = i;
+		B[i] = i+5;
+	}
+	
+	// Perform the computation
+	#pragma scop
+	{
+		#pragma species kernel A[2:N-1]|chunk(0:1) -> B[2:N-1]|chunk(0:1)
+		for (i = 2; i < N - 1; i = i + 2) {
+			temp = 0;
+			for (j = 0; j < 2; j++) {
+				temp += A[i + j];
+			}
+			B[i] = temp;
+			B[i + 1] = temp;
+		}
+		#pragma species endkernel example07_k1
+	}
+	#pragma endscop
+	
+	// Clean-up and exit the function
+	fflush(stdout);
+	return 0;
+}
+

data/test/examples/dependences/example01_species.c

@@ -0,0 +1,46 @@
+//
+// This file is part of the Bones source-to-source compiler examples. This C-code
+// example is meant to illustrate the use of Bones. For more information on Bones
+// use the contact information below.
+//
+// == More information on Bones
+// Contact............Cedric Nugteren <c.nugteren@tue.nl>
+// Web address........http://parse.ele.tue.nl/bones/
+//
+// == File information
+// Filename...........dependences/example01.c
+// Author.............Cedric Nugteren
+// Last modified on...07-May-2013
+//
+
+#include <stdio.h>
+
+// This is 'example01', an element -> element example WITHOUT dependences.
+int main(void) {
+	int i;
+	int N = 256;
+	
+	// Declare input/output arrays
+	int A[N];
+	
+	// Set the input data
+	for(i=0;i<N;i++) {
+		A[i] = i;
+	}
+	
+	// Perform the computation
+	#pragma scop
+	{
+		#pragma species kernel A[1:8*N-7]|element -> A[6:2*N+4]|element
+		for (i = 0; i < N; i++) {
+			A[2 * i + 6] = A[8 * i + 1];
+		}
+		#pragma species endkernel example01_k1
+	}
+	#pragma endscop
+	
+	// Clean-up and exit the function
+	fflush(stdout);
+	return 0;
+}
+

data/test/examples/dependences/example02_species.c

@@ -0,0 +1,44 @@
+//
+// This file is part of the Bones source-to-source compiler examples. This C-code
+// example is meant to illustrate the use of Bones. For more information on Bones
+// use the contact information below.
+//
+// == More information on Bones
+// Contact............Cedric Nugteren <c.nugteren@tue.nl>
+// Web address........http://parse.ele.tue.nl/bones/
+//
+// == File information
+// Filename...........dependences/example02.c
+// Author.............Cedric Nugteren
+// Last modified on...07-May-2013
+//
+
+#include <stdio.h>
+
+// This is 'example02', an element -> element example WITH dependences.
+int main(void) {
+	int i;
+	int N = 256;
+	
+	// Declare input/output arrays
+	int A[N];
+	
+	// Set the input data
+	for(i=0;i<N;i++) {
+		A[i] = i;
+	}
+	
+	// Perform the computation
+	#pragma scop
+	{
+		for (i = 0; i < N; i++) {
+			A[2 * i + 6] = A[3 * i + 1];
+		}
+	}
+	#pragma endscop
+	
+	// Clean-up and exit the function
+	fflush(stdout);
+	return 0;
+}
+

data/test/examples/dependences/example03_species.c

@@ -0,0 +1,47 @@
+//
+// This file is part of the Bones source-to-source compiler examples. This C-code
+// example is meant to illustrate the use of Bones. For more information on Bones
+// use the contact information below.
+//
+// == More information on Bones
+// Contact............Cedric Nugteren <c.nugteren@tue.nl>
+// Web address........http://parse.ele.tue.nl/bones/
+//
+// == File information
+// Filename...........dependences/example03.c
+// Author.............Cedric Nugteren
+// Last modified on...07-May-2013
+//
+
+#include <stdio.h>
+
+// This is 'example03', an element -> element example WITH dependences.
+int main(void) {
+	int i;
+	int N = 256;
+	
+	// Declare input/output arrays
+	int A[N];
+	int B[N];
+	
+	// Set the input data
+	for(i=0;i<N;i++) {
+		A[i] = i;
+		B[i] = 0;
+	}
+	
+	// Perform the computation
+	#pragma scop
+	{
+		for (i = 2; i < N; i++) {
+			B[i] = A[i];
+			B[i + 1] = A[i + 1];
+		}
+	}
+	#pragma endscop
+	
+	// Clean-up and exit the function
+	fflush(stdout);
+	return 0;
+}
+

data/test/examples/dependences/example04_species.c

@@ -0,0 +1,48 @@
+//
+// This file is part of the Bones source-to-source compiler examples. This C-code
+// example is meant to illustrate the use of Bones. For more information on Bones
+// use the contact information below.
+//
+// == More information on Bones
+// Contact............Cedric Nugteren <c.nugteren@tue.nl>
+// Web address........http://parse.ele.tue.nl/bones/
+//
+// == File information
+// Filename...........dependences/example04.c
+// Author.............Cedric Nugteren
+// Last modified on...07-May-2013
+//
+
+#include <stdio.h>
+
+// This is 'example04', a 2D example WITHOUT dependences.
+int main(void) {
+	int i,j;
+	int N = 256;
+	
+	// Declare input/output arrays
+	int D[N][N];
+	
+	// Set the input data
+	for(i=0;i<N;i++) {
+		for(j=0;j<N;j++) {
+			D[i][j] = i*j+3;
+		}
+	}
+	
+	// Perform the computation
+	#pragma scop
+	{
+		#pragma species kernel D[1:8*N-7,1:8*N-7]|element -> D[6:2*N+4,6:2*N+4]|element
+		for (i = 0; i < N; i++) {
+			D[2 * i + 6][2 * i + 6] = D[8 * i + 1][8 * i + 1];
+		}
+		#pragma species endkernel example04_k1
+	}
+	#pragma endscop
+	
+	// Clean-up and exit the function
+	fflush(stdout);
+	return 0;
+}
+

data/test/examples/dependences/example05_species.c

@@ -0,0 +1,46 @@
+//
+// This file is part of the Bones source-to-source compiler examples. This C-code
+// example is meant to illustrate the use of Bones. For more information on Bones
+// use the contact information below.
+//
+// == More information on Bones
+// Contact............Cedric Nugteren <c.nugteren@tue.nl>
+// Web address........http://parse.ele.tue.nl/bones/
+//
+// == File information
+// Filename...........dependences/example05.c
+// Author.............Cedric Nugteren
+// Last modified on...07-May-2013
+//
+
+#include <stdio.h>
+
+// This is 'example05', a 2D example WITH dependences.
+int main(void) {
+	int i,j;
+	int N = 256;
+	
+	// Declare input/output arrays
+	int D[N][N];
+	
+	// Set the input data
+	for(i=0;i<N;i++) {
+		for(j=0;j<N;j++) {
+			D[i][j] = i*j+3;
+		}
+	}
+	
+	// Perform the computation
+	#pragma scop
+	{
+		for (i = 0; i < N; i++) {
+			D[2 * i + 6][2 * i + 6] = D[8 * i + 1][3 * i + 1];
+		}
+	}
+	#pragma endscop
+	
+	// Clean-up and exit the function
+	fflush(stdout);
+	return 0;
+}
+

data/test/examples/element/example01_species.c

@@ -0,0 +1,50 @@
+//
+// This file is part of the Bones source-to-source compiler examples. This C-code
+// example is meant to illustrate the use of Bones. For more information on Bones
+// use the contact information below.
+//
+// == More information on Bones
+// Contact............Cedric Nugteren <c.nugteren@tue.nl>
+// Web address........http://parse.ele.tue.nl/bones/
+//
+// == File information
+// Filename...........element/example1.c
+// Author.............Cedric Nugteren
+// Last modified on...16-April-2012
+//
+
+#include <stdio.h>
+
+// This is 'example1', a very basic element to element example using 2D arrays.
+int main(void) {
+	int i,j;
+	
+	// Declare input/output arrays
+	int A[100][16];
+	int B[100][16];
+	
+	// Set the input data
+	for(i=0;i<100;i++) {
+		for(j=0;j<16;j++) {
+			A[i][j] = i+j;
+		}
+	}
+	
+	// Perform the computation
+	#pragma scop
+	{
+		#pragma species kernel A[0:99,0:15]|element -> B[0:99,0:15]|element
+		for (i = 0; i < 100; i++) {
+			for (j = 0; j < 16; j++) {
+				B[i][j] = 2 * A[i][j];
+			}
+		}
+		#pragma species endkernel example01_k1
+	}
+	#pragma endscop
+	
+	// Clean-up and exit the function
+	fflush(stdout);
+	return 0;
+}
+

data/test/examples/element/example02_species.c

@@ -0,0 +1,50 @@
+//
+// This file is part of the Bones source-to-source compiler examples. This C-code
+// example is meant to illustrate the use of Bones. For more information on Bones
+// use the contact information below.
+//
+// == More information on Bones
+// Contact............Cedric Nugteren <c.nugteren@tue.nl>
+// Web address........http://parse.ele.tue.nl/bones/
+//
+// == File information
+// Filename...........element/example2.c
+// Author.............Cedric Nugteren
+// Last modified on...06-May-2013
+//
+
+#include <stdio.h>
+
+// This is 'example2', demonstrating unordered element-wise computation
+int main(void) {
+	int i,j;
+	
+	// Declare input/output arrays
+	int A[4][8];
+	int B[4][8];
+	
+	// Set the input data
+	for(i=0;i<4;i++) {
+		for(j=0;j<8;j++) {
+			A[i][j] = i+j;
+		}
+	}
+	
+	// Perform the computation
+	#pragma scop
+	{
+		#pragma species kernel A[0:3,0:7]|element -> B[0:3,0:7]|element
+		for (i = 0; i < 4; i++) {
+			for (j = 0; j < 8; j++) {
+				B[i][j] = A[i][7 - j];
+			}
+		}
+		#pragma species endkernel example02_k1
+	}
+	#pragma endscop
+	
+	// Clean-up and exit the function
+	fflush(stdout);
+	return 0;
+}
+