Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Diff of /branches/pure-cfg/src/lib/cl-target/main.c
ViewVC logotype

Diff of /branches/pure-cfg/src/lib/cl-target/main.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1268, Sun Jun 5 11:25:58 2011 UTC revision 1269, Sun Jun 5 11:46:52 2011 UTC
# Line 57  Line 57 
57     ** 3) run strands to termination     ** 3) run strands to termination
58     ** 4) load results from GPU     ** 4) load results from GPU
59     **/     **/
60        Diderot_World_t *wrld = Diderot_Initially ();  // this may not be right for OpenCL
61    
 if (VerboseFlg) printf("done: %d updates, %d steps\n", nUpdates, nSteps);  
62    // here we have the final state of all of the strands in the "in" buffer    // here we have the final state of all of the strands in the "in" buffer
63      FILE *outS = fopen("mip.txt", "w");      FILE *outS = fopen("mip.txt", "w");
64      if (outS == NULL) {      if (outS == NULL) {
# Line 66  Line 66 
66          exit (8);          exit (8);
67      }      }
68    
69      for (int i = 0;  i < wrld->numStrands;  i++) {    /***** FIXME: output results to outS *****/
70          if (wrld->status[i] == DIDEROT_STABLE)  
             Diderot_Strands[0]->print (outS, wrld->inState[i]);  
     }  
71      fclose (outS);      fclose (outS);
72    
73      Diderot_Shutdown (wrld);      Diderot_Shutdown (wrld);

Legend:
Removed from v.1268  
changed lines
  Added in v.1269

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0