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

SCM Repository

[diderot] Diff of /branches/vis12/src/compiler/c-util/gen-library-interface.sml
ViewVC logotype

Diff of /branches/vis12/src/compiler/c-util/gen-library-interface.sml

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

revision 2115, Sat Jan 12 15:52:27 2013 UTC revision 2116, Thu Jan 17 14:16:39 2013 UTC
# Line 129  Line 129 
129                  ]                  ]
130            val outStrm = TextIO.openOut filename            val outStrm = TextIO.openOut filename
131            val outS = PrC.new outStrm            val outS = PrC.new outStrm
132            fun prFrag frag = PrC.output (outS, CL.verbatim [frag] placeholders)            fun prFrag frag = PrC.output (outS, CL.verbatimDcl [frag] placeholders)
133            val prDecls = List.app (fn dcl => PrC.output(outS, dcl))            val prDecls = List.app (fn dcl => PrC.output(outS, dcl))
134            in            in
135              prFrag LibInterfaceHeadFrag.text;              prFrag LibInterfaceHeadFrag.text;

Legend:
Removed from v.2115  
changed lines
  Added in v.2116

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