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

SCM Repository

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

Diff of /trunk/src/compiler/ast/ast-pp.sml

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

revision 415, Sun Oct 17 00:21:51 2010 UTC revision 416, Sun Oct 17 00:32:07 2010 UTC
# Line 60  Line 60 
60                    | AST.E_Slice(e, indices, _) => (                    | AST.E_Slice(e, indices, _) => (
61                        pp e;                        pp e;
62                        ppList ppIndex ("[", ",", "]") (ppStrm, indices))                        ppList ppIndex ("[", ",", "]") (ppStrm, indices))
63                    | AST.E_Cond(e1, e2, e3) => (                    | AST.E_Cond(e1, e2, e3, _) => (
64                        pp e1; sp(); string "?"; sp(); pp e2; sp(); string ":"; sp(); pp e3)                        pp e2; sp(); string "if"; sp(); pp e1; sp(); string "else"; sp(); pp e3)
65                  (* end case *))                  (* end case *))
66            in            in
67              pp e              pp e

Legend:
Removed from v.415  
changed lines
  Added in v.416

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