examples/fusion/example01.c in bones-compiler-1.3.1 vs examples/fusion/example01.c in bones-compiler-1.6.0

@@ -8,11 +8,11 @@
 // Web address........http://parse.ele.tue.nl/bones/
 //
 // == File information
 // Filename...........fusion/example01.c
 // Author.............Cedric Nugteren
-// Last modified on...09-July-2013
+// Last modified on...11-October-2014
 //
 
 #include <stdio.h>
 #define N 512
 #define M 2048
@@ -32,10 +32,11 @@
 			A[i][j] = i+j;
 		}
 	}
 	
 	// Perform the computation
+	#pragma scop
 	#pragma species kernel A[0:N-1,0:M-1]|element -> B[0:N-1,0:M-1]|element
 	for(i=0;i<N;i++) {
 		for(j=0;j<M;j++) {
 			B[i][j] = 2*A[i][j];
 		}
@@ -46,20 +47,10 @@
 		for(j=0;j<M;j++) {
 			C[i][j] = 8*B[i][j];
 		}
 	}
 	#pragma species endkernel example01-part2
-	
-	/*
-	#pragma species kernel A[0:N-1,0:M-1]|element -> B[0:N-1,0:M-1]|element ^ C[0:N-1,0:M-1]|element
-	for(i=0;i<N;i++) {
-		for(j=0;j<M;j++) {
-			B[i][j] = 2*A[i][j];
-			C[i][j] = 8*B[i][j];
-		}
-	}
-	#pragma species endkernel example01-fused
-	*/
+	#pragma endscop
 	
 	// Clean-up and exit the function
 	fflush(stdout);
 	C[8][9] = C[8][9];
 	return 0;