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

SCM Repository

[diderot] Diff of /branches/vis12/src/compiler/simplify/simple-pp.sml
ViewVC logotype

Diff of /branches/vis12/src/compiler/simplify/simple-pp.sml

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

revision 1991, Sun Aug 12 15:25:39 2012 UTC revision 1992, Thu Sep 27 10:23:12 2012 UTC
# Line 88  Line 88 
88                        string (concat["\"", argName, "\","]); sp();                        string (concat["\"", argName, "\","]); sp();
89                        string (concat["\"", String.toString desc, "\","]); sp();                        string (concat["\"", String.toString desc, "\","]); sp();
90                        var default; string ")")                        var default; string ")")
91                    | S.E_LoadImage(info, x) => (                    | S.E_InputNrrd(ty, argName, desc, NONE) => (
92                        string "load"; sp(); string "(";                        string(concat["inputNrrd(\"", argName, "\","]); sp();
93                        string(ImageInfo.toString info); sp(); string ",";                        string(concat["\"", String.toString desc, "\")"]))
94                        var x; string ")")                    | S.E_InputNrrd(ty, argName, desc, SOME dflt) => (
95                          string "inputNrrdWithDefault"; string "(";
96                          string (concat["\"", argName, "\","]); sp();
97                          string (concat["\"", String.toString desc, "\","]); sp();
98                          string (concat["\"", dflt, "\")"]))
99                    | S.E_Coerce{srcTy, dstTy, x} => (                    | S.E_Coerce{srcTy, dstTy, x} => (
100                        string "("; string(TU.toString dstTy); string ")"; var x)                        string "("; string(TU.toString dstTy); string ")"; var x)
101                  (* end case *))                  (* end case *))

Legend:
Removed from v.1991  
changed lines
  Added in v.1992

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