example05.c in bones-compiler-1.6.0

- old
+ new

@@ -8,11 +8,11 @@
 // Web address........http://parse.ele.tue.nl/bones/
 //
 // == File information
 // Filename...........fusion/example05.c
 // Author.............Cedric Nugteren
-// Last modified on...08-October-2013
+// Last modified on...11-October-2014
 //
 
 #include <stdio.h>
 
 // This is 'example05', like example02 but with constant values.
@@ -30,10 +30,11 @@
 			A[i][j] = i+j;
 		}
 	}
 	
 	// Perform the computation
+	#pragma scop
 	#pragma species kernel A[0:2047,0:1023]|element -> B[0:2047,0:1023]|element
 	for(i=0;i<2048;i++) {
 		for(j=0;j<1024;j++) {
 			B[i][j] = A[i][j] + 3;
 		}
@@ -44,9 +45,10 @@
 		for(j=0;j<980;j++) {
 			C[i][j] = 9*A[i][j];
 		}
 	}
 	#pragma species endkernel example05-part2
+	#pragma endscop
 	
 	// Clean-up and exit the function
 	fflush(stdout);
 	C[8][9] = C[8][9];
 	return 0;