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

SCM Repository

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

Diff of /branches/vis12/src/compiler/tree-il/tree-il-pp.sml

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

revision 2022, Wed Oct 10 11:55:39 2012 UTC revision 2023, Wed Oct 10 12:27:13 2012 UTC
# Line 151  Line 151 
151                      String.toString name, "\",\"", descToString desc, "\",",                      String.toString name, "\",\"", descToString desc, "\",",
152                      expToString dflt, ");\n"                      expToString dflt, ");\n"
153                    ])                    ])
154              | IL.S_InputImage(x, name, desc, NONE) =>              | IL.S_InputNrrd(x, name, desc, NONE) =>
155                  prln (out, [                  prln (out, [
156                      Var.name x, " = input-image<", Ty.toString(Var.ty x), "> (\"",                      Var.name x, " = input-nrrd<", Ty.toString(Var.ty x), "> (\"",
157                      String.toString name, "\",\"", descToString desc, "\");\n"                      String.toString name, "\",\"", descToString desc, "\");\n"
158                    ])                    ])
159              | IL.S_InputImage(x, name, desc, SOME dflt) =>              | IL.S_InputNrrd(x, name, desc, SOME dflt) =>
160                  prln (out, [                  prln (out, [
161                      Var.name x, " = input-image<", Ty.toString(Var.ty x), "> (\"",                      Var.name x, " = input-nrrd<", Ty.toString(Var.ty x), "> (\"",
                     String.toString name, "\",\"", descToString desc, "\",\"",  
                     String.toString dflt, "\");\n"  
                   ])  
             | IL.S_InputSeq(x, name, desc, NONE) =>  
                 prln (out, [  
                     Var.name x, " = input-seq<", Ty.toString(Var.ty x), "> (\"",  
                     String.toString name, "\",\"", descToString desc, "\");\n"  
                   ])  
             | IL.S_InputSeq(x, name, desc, SOME dflt) =>  
                 prln (out, [  
                     Var.name x, " = input-seq<", Ty.toString(Var.ty x), "> (\"",  
162                      String.toString name, "\",\"", descToString desc, "\",\"",                      String.toString name, "\",\"", descToString desc, "\",\"",
163                      String.toString dflt, "\");\n"                      String.toString dflt, "\");\n"
164                    ])                    ])

Legend:
Removed from v.2022  
changed lines
  Added in v.2023

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