Added dump board

game_of_life/benchmark/main.c

@@ -79,6 +79,16 @@ void compute_next_chunk_board(struct dispatch_context *dc, struct futhark_contex
     envelope_free(&outer_envelope);
 }
 
+void dump_board(struct dispatch_context *dc, int world_size) {
+    int8_t *data = get_data(dc);
+    chunk_info_t ci = get_chunk_info(dc);
+    char filename[25] = {0};
+    snprintf(filename, sizeof(filename), "dump-%d.bin", world_size);
+    FILE *fp = fopen(filename, "w");
+    fwrite(data, sizeof(int8_t), (size_t) ci.count, fp);
+    fclose(fp);
+}
+
 int main(int argc, char *argv[]) {
     if (argc < 4) {
         printf("usage: mpirun -n <nb_proc> %s <nb_devices> <height> <width>\n", argv[0]);
@@ -109,7 +119,8 @@ int main(int argc, char *argv[]) {
     double start = MPI_Wtime();
     compute_next_chunk_board(disp_context, fut_context, &ci);
     double finish = MPI_Wtime();
-    if(my_rank == ROOT_RANK) {
+    if (my_rank == ROOT_RANK) {
+        dump_board(disp_context, world_size);
         printf("%d;%d;%d;%d;%f\n", world_size, nb_devices, board_n, board_m, finish - start);
     }