Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/compiler/FLINT/plambda/pplexp.sml
ViewVC logotype

Diff of /sml/trunk/compiler/FLINT/plambda/pplexp.sml

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

revision 4526, Fri Apr 13 18:32:56 2018 UTC revision 4527, Sat Apr 14 14:41:11 2018 UTC
# Line 113  Line 113 
113            | ppl pd (WORD i) = (pps "(W)"; pps (Word.toString i))            | ppl pd (WORD i) = (pps "(W)"; pps (Word.toString i))
114            | ppl pd (INT32 i) = (pps "(I32)"; pps(Int32.toString i))            | ppl pd (INT32 i) = (pps "(I32)"; pps(Int32.toString i))
115            | ppl pd (WORD32 i) = (pps "(W32)"; pps(Word32.toString i))            | ppl pd (WORD32 i) = (pps "(W32)"; pps(Word32.toString i))
116            | ppl pd (REAL s) = pps s            | ppl pd (REAL r) = (pps "(R64)"; pps(RealLit.toString r))
117            | ppl pd (STRING s) = pps (mlstr s)            | ppl pd (STRING s) = pps (mlstr s)
118            | ppl pd (ETAG (l,_)) = ppl pd l            | ppl pd (ETAG (l,_)) = ppl pd l
119    

Legend:
Removed from v.4526  
changed lines
  Added in v.4527

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