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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/cfg-ir/ssa-pp-fn.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/cfg-ir/ssa-pp-fn.sml

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

revision 3512, Fri Dec 18 18:52:06 2015 UTC revision 3525, Mon Dec 21 21:09:58 2015 UTC
# Line 30  Line 30 
30      end      end
31    
32    (* if true, the output is in compact form *)    (* if true, the output is in compact form *)
33      val compact = ref true      val compact = ref false
34    
35      fun indent (outS, i) = TextIO.output(outS, StringCvt.padLeft #" " i "")      fun indent (outS, i) = TextIO.output(outS, StringCvt.padLeft #" " i "")
36      fun incIndent (outS, i) = (outS, i+2)      fun incIndent (outS, i) = (outS, i+2)

Legend:
Removed from v.3512  
changed lines
  Added in v.3525

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