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

SCM Repository

[diderot] Diff of /branches/vis12/src/compiler/c-target/c-target.sml
ViewVC logotype

Diff of /branches/vis12/src/compiler/c-target/c-target.sml

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

revision 2077, Mon Nov 5 11:51:35 2012 UTC revision 2078, Mon Nov 5 12:00:48 2012 UTC
# Line 442  Line 442 
442                  inputs, globals, topDecls, strands, nAxes, initially, ...                  inputs, globals, topDecls, strands, nAxes, initially, ...
443                }) = let                }) = let
444              (* does the program require barrier synchronization to implement BSP semantics? *)              (* does the program require barrier synchronization to implement BSP semantics? *)
445                val needsBarrier = hasCom orelse hasReduce                val needsBarrier = #bsp tgt orelse hasCom orelse hasReduce
446                val [strand as Strand{name, tyName, state, output, ...}] = AtomTable.listItems strands                val [strand as Strand{name, tyName, state, output, ...}] = AtomTable.listItems strands
447                val outputs = GenOutput.gen (tgt, !nAxes) [output]                val outputs = GenOutput.gen (tgt, !nAxes) [output]
448                val substitutions = mkSubs (tgt, strand)                val substitutions = mkSubs (tgt, strand)
# Line 508  Line 508 
508                        inputs, globals, topDecls, strands, nAxes, initially, ...                        inputs, globals, topDecls, strands, nAxes, initially, ...
509                      } = prog                      } = prog
510              (* does the program require barrier synchronization to implement BSP semantics? *)              (* does the program require barrier synchronization to implement BSP semantics? *)
511                val needsBarrier = hasCom orelse hasReduce                val needsBarrier = #bsp tgt orelse hasCom orelse hasReduce
512                val [strand as Strand{name, tyName, state, output, ...}] = AtomTable.listItems strands                val [strand as Strand{name, tyName, state, output, ...}] = AtomTable.listItems strands
513                val outputs = GenOutput.gen (tgt, !nAxes) [output]                val outputs = GenOutput.gen (tgt, !nAxes) [output]
514                val substitutions =                val substitutions =

Legend:
Removed from v.2077  
changed lines
  Added in v.2078

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