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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/cxx-util/gen-exec-util.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/cxx-util/gen-exec-util.sml

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

revision 3915, Fri May 27 21:32:46 2016 UTC revision 3916, Sat May 28 12:01:02 2016 UTC
# Line 12  Line 12 
12      val execHead : CodeOutput.t * (string * string) list -> unit      val execHead : CodeOutput.t * (string * string) list -> unit
13    
14    (* generate the footer part of the C++ source file for standalone executables *)    (* generate the footer part of the C++ source file for standalone executables *)
15      val execFoot : CodeOutput.t -> unit      val execFoot : CodeOutput.t * (string * string) list -> unit
16    
17    end = struct    end = struct
18    
# Line 23  Line 23 
23            Out.decl outS (CL.verbatimDcl [Fragments.execHead] substitutions);            Out.decl outS (CL.verbatimDcl [Fragments.execHead] substitutions);
24            Out.decl outS (CL.verbatimDcl [Fragments.nrrdSaveHelper] substitutions))            Out.decl outS (CL.verbatimDcl [Fragments.nrrdSaveHelper] substitutions))
25    
26      fun execFoot outS =      fun execFoot (outS, substitutions) =
27            Out.decl outS (CL.D_Verbatim[Fragments.execFoot])            Out.decl outS (CL.verbatimDcl [Fragments.execFoot] substitutions)
28    
29    end    end

Legend:
Removed from v.3915  
changed lines
  Added in v.3916

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