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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/tree-ir/check-tree.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/tree-ir/check-tree.sml

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

revision 3994, Sat Jun 18 18:41:33 2016 UTC revision 3995, Sat Jun 18 20:00:19 2016 UTC
# Line 164  Line 164 
164      fun check (phase, prog) = let      fun check (phase, prog) = let
165            val IR.Program{            val IR.Program{
166                    props, target={layout, ...}, consts, inputs, constInit,                    props, target={layout, ...}, consts, inputs, constInit,
167                    globals, globalInit, strand, create, update                    globals, globInit, strand, create, init, update
168                  } = prog                  } = prog
169            val errBuf = ref []            val errBuf = ref []
170            val errFn = error errBuf            val errFn = error errBuf
# Line 500  Line 500 
500                  chkOptMethod (VSet.empty, stabilizeM))                  chkOptMethod (VSet.empty, stabilizeM))
501            in            in
502              ignore (chkBlock (VSet.empty, constInit));              ignore (chkBlock (VSet.empty, constInit));
503              ignore (chkBlock (VSet.empty, globalInit));              ignore (chkBlock (VSet.empty, globInit));
504              chkStrand strand;              chkStrand strand;
505              case create of IR.Create{code, ...} => ignore (chkBlock (VSet.empty, code));              case create of IR.Create{code, ...} => ignore (chkBlock (VSet.empty, code));
506                chkOptBlock (VSet.empty, init);
507              chkOptBlock (VSet.empty, update);              chkOptBlock (VSet.empty, update);
508              final ()              final ()
509            end            end

Legend:
Removed from v.3994  
changed lines
  Added in v.3995

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