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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/simplify/simplify.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/simplify/simplify.sml

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

revision 3484, Sat Dec 5 15:33:56 2015 UTC revision 3485, Sun Dec 6 13:48:48 2015 UTC
# Line 435  Line 435 
435                }                }
436            end            end
437    
438      fun simplifyCreate (errStrm, AST.C_Grid(dim, stm)) = S.C_Grid(dim, simplifyBlock errStrm stm)      fun simplifyCreate (errStrm, AST.C_Grid(d, blk)) =
439        | simplifyCreate (errStrm, AST.C_Collection stm) = S.C_Collection(simplifyBlock errStrm stm)            S.Create{dim = SOME d, code = simplifyBlock errStrm blk}
440          | simplifyCreate (errStrm, AST.C_Collection blk) =
441              S.Create{dim = NONE, code = simplifyBlock errStrm blk}
442    
443      fun transform (errStrm, prog) = let      fun transform (errStrm, prog) = let
444            val AST.Program{            val AST.Program{

Legend:
Removed from v.3484  
changed lines
  Added in v.3485

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