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/print-as-c.sml
ViewVC logotype

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

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

revision 1685, Sun Jan 22 15:23:36 2012 UTC revision 1704, Tue Mar 6 15:44:37 2012 UTC
# Line 101  Line 101 
101                          (* end case *);                          (* end case *);
102                          str ";"));                          str ";"));
103                        PP.newline strm)                        PP.newline strm)
104                      | CL.D_Proto(attrs, ty, f, params) => (
105                          inHBox (fn () => (
106                            ppAttrs attrs;
107                            ppTy(ty, SOME f);
108                            sp(); str "(";
109                            ppList {pp=ppParam, sep=fn () => (str ","; sp()), l=params};
110                            str ");"));
111                          PP.newline strm)
112                    | CL.D_Func(attrs, ty, f, params, body) => (                    | CL.D_Func(attrs, ty, f, params, body) => (
113                        inHBox (fn () => (                        inHBox (fn () => (
114                          ppAttrs attrs;                          ppAttrs attrs;

Legend:
Removed from v.1685  
changed lines
  Added in v.1704

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