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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/ast/ast-pp.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/ast/ast-pp.sml

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

revision 3436, Mon Nov 16 13:36:46 2015 UTC revision 3437, Mon Nov 16 13:54:57 2015 UTC
# Line 10  Line 10 
10    
11  structure ASTPP : sig  structure ASTPP : sig
12    
13      val output : TextIO.outstream * AST.program -> unit      val output : TextIO.outstream * string * AST.program -> unit
14    
15    end = struct    end = struct
16    
# Line 307  Line 307 
307              PP.newline ppStrm;              PP.newline ppStrm;
308            PP.closeBox ppStrm)            PP.closeBox ppStrm)
309    
310      fun output (outS, prog) = let      fun output (outS, message, prog) = let
311            val AST.Program{            val AST.Program{
312                    props, const_dcls, input_dcls, globals,                    props, const_dcls, input_dcls, globals,
313                    strand, init, create, update                    strand, init, create, update

Legend:
Removed from v.3436  
changed lines
  Added in v.3437

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