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

SCM Repository

[diderot] Diff of /branches/vis12-cl/src/compiler/c-target/fragments/par-main.in
ViewVC logotype

Diff of /branches/vis12-cl/src/compiler/c-target/fragments/par-main.in

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

revision 2769, Sat Oct 11 23:38:49 2014 UTC revision 2787, Tue Oct 14 20:01:07 2014 UTC
# Line 15  Line 15 
15      {      {
16          Diderot_Options_t *opts = Diderot_OptNew ();          Diderot_Options_t *opts = Diderot_OptNew ();
17          Diderot_uint_t np = wrld->sched->numWorkers;          Diderot_uint_t np = wrld->sched->numWorkers;
18    #ifndef DIDEROT_NO_INPUTS
19          @PREFIX@Inputs_t inputs;          @PREFIX@Inputs_t inputs;
20          InitDefaults (&inputs);          InitDefaults (&inputs);
21    #endif
22          Diderot_OptAddFlag (opts, "verbose", "enable runtime-system messages", &(wrld->verboseFlg));          Diderot_OptAddFlag (opts, "verbose", "enable runtime-system messages", &(wrld->verboseFlg));
23          Diderot_OptAddFlag (opts, "timing", "enable execution timing", &timingFlg);          Diderot_OptAddFlag (opts, "timing", "enable execution timing", &timingFlg);
24          Diderot_OptAddFlag (opts, "text", "enable text output", &printOutputFlg);          Diderot_OptAddFlag (opts, "text", "enable text output", &printOutputFlg);
25          Diderot_OptAddUInt (opts, "np", "specify number of worker threads", &np, true);          Diderot_OptAddUInt (opts, "np", "specify number of worker threads", &np, true);
26    #ifndef DIDEROT_NO_INPUTS
27          RegisterGlobalOpts (&inputs, opts);          RegisterGlobalOpts (&inputs, opts);
28    #endif
29          Diderot_OptProcess (opts, argc, argv);          Diderot_OptProcess (opts, argc, argv);
30          Diderot_OptFree (opts);          Diderot_OptFree (opts);
31          wrld->sched->numWorkers = np;          wrld->sched->numWorkers = np;
32    #ifndef DIDEROT_NO_INPUTS
33          if (InitInputs (wrld, &inputs)) {          if (InitInputs (wrld, &inputs)) {
34              fprintf(stderr, "Error initializing inputs:\n%s\n", biffMsgStrGet(wrld->errors));              fprintf(stderr, "Error initializing inputs:\n%s\n", biffMsgStrGet(wrld->errors));
35              exit(1);              exit(1);
36          }          }
37    #endif
38      }      }
39    
40    // initialize scheduler stuff    // initialize scheduler stuff

Legend:
Removed from v.2769  
changed lines
  Added in v.2787

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