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

SCM Repository

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

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

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

revision 2669, Fri Jun 13 02:08:31 2014 UTC revision 2670, Wed Jul 9 21:54:54 2014 UTC
# Line 53  Line 53 
53                      "LdVec<" :: itos tyNew :: ":" :: itos tyOrig :: ">("                      "LdVec<" :: itos tyNew :: ":" :: itos tyOrig :: ">("
54                        :: argsToS (",", "(", [arg, offset], ")", l)                        :: argsToS (",", "(", [arg, offset], ")", l)
55              | toS (IL.E_mkVec(A,tyNew, tyOrig, indexAt,pieces, args), l) =let              | toS (IL.E_mkVec(A,tyNew, tyOrig, indexAt,pieces, args), l) =let
56                  val m = argsToS (",\n\t","(", [args], ")", l)                  val m = argsToS (",\n\t","(", args, ")", l)
57                  in                  in
58                    "mkVec<" ::itos tyNew :: ":" :: itos tyOrig ::                    "mkVec<" ::itos tyNew :: ":" :: itos tyOrig ::
59                    ">\n\t" :: m                    ">\n\t" :: m

Legend:
Removed from v.2669  
changed lines
  Added in v.2670

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