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/output-util.sml
ViewVC logotype

Diff of /branches/vis12/src/compiler/c-util/output-util.sml

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

revision 2833, Wed Nov 19 15:01:38 2014 UTC revision 2834, Wed Nov 19 15:20:13 2014 UTC
# Line 106  Line 106 
106                ]                ]
107            (* endif*))            (* endif*))
108    
109      (* global variable names for output file/stems *)
110        val outfile = "Outfile"
111        fun outstem name = "OutStem_" ^ name
112    
113    (* generate code to register command-line options for redirecting the output in standalone    (* generate code to register command-line options for redirecting the output in standalone
114     * executables.     * executables.
115     *)     *)
116      fun genRegisterOutputOpts outputs = let      fun genRegisterOutputOpts outputs = let
         (* global variable names *)  
           val outfile = "Outfile"  
           fun outstem name = "OutStem_" ^ name  
117          (* some common variables *)          (* some common variables *)
118            val optsV = CL.mkVar "opts"            val optsV = CL.mkVar "opts"
119          (* make a global variable declaration *)          (* make a global variable declaration *)

Legend:
Removed from v.2833  
changed lines
  Added in v.2834

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