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

SCM Repository

[diderot] Diff of /branches/charisee/src/compiler/mid-to-low/gen-kernel.sml
ViewVC logotype

Diff of /branches/charisee/src/compiler/mid-to-low/gen-kernel.sml

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

revision 2627, Sat May 17 00:44:22 2014 UTC revision 2628, Wed May 21 04:02:06 2014 UTC
# Line 26  Line 26 
26    
27  fun errS str=raise Fail(str)  fun errS str=raise Fail(str)
28  fun mkInt n= S3.aaV(DstOp.C(n),[],"Int",Sca)  fun mkInt n= S3.aaV(DstOp.C(n),[],"Int",Sca)
29    
30    
31  fun mkSubSca rest= S3.aaV(DstOp.subSca,rest,"subSca",Sca)  fun mkSubSca rest= S3.aaV(DstOp.subSca,rest,"subSca",Sca)
32  fun mkAddSca rest= S3.aaV(DstOp.addSca,rest,"addSca",Sca)  fun mkAddSca rest= S3.aaV(DstOp.addSca,rest,"addSca",Sca)
33  fun mkCons(shape, rest)=let  fun mkCons(shape, rest)=let

Legend:
Removed from v.2627  
changed lines
  Added in v.2628

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