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

SCM Repository

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

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

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

revision 2210, Tue Feb 26 05:42:16 2013 UTC revision 2211, Tue Feb 26 12:13:36 2013 UTC
# Line 204  Line 204 
204                (ppStrm, params)                (ppStrm, params)
205            end            end
206    
207      fun ppStrand (ppStrm, {name, params, state, methods}) = let      fun ppStrand (ppStrm, AST.Strand{name, params, state, methods}) = let
208            fun sp () = PP.space ppStrm 1            fun sp () = PP.space ppStrm 1
209            fun nl () = PP.newline ppStrm            fun nl () = PP.newline ppStrm
210            val string = PP.string ppStrm            val string = PP.string ppStrm

Legend:
Removed from v.2210  
changed lines
  Added in v.2211

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