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/step2.sml
ViewVC logotype

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

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

revision 2628, Wed May 21 04:02:06 2014 UTC revision 2637, Wed May 28 05:20:45 2014 UTC
# Line 39  Line 39 
39  fun mkSubSca rest= S3.aaV(DstOp.subSca,rest,"subSca",Sca)  fun mkSubSca rest= S3.aaV(DstOp.subSca,rest,"subSca",Sca)
40  fun mkDivSca rest= S3.aaV(DstOp.divSca,rest,"divSca",Sca)  fun mkDivSca rest= S3.aaV(DstOp.divSca,rest,"divSca",Sca)
41  fun mkMultipleSca(ids,rator)=S3.mkMultiple(ids,rator,Sca)  fun mkMultipleSca(ids,rator)=S3.mkMultiple(ids,rator,Sca)
42  fun mkInt n= S3.aaV(DstOp.C n,[],"Int",Sca)  fun mkInt n=S3.mkInt n
43    
44    
45    
# Line 97  Line 97 
97    
98  (*Get constant *)  (*Get constant *)
99  fun skeleton A=(case A  fun skeleton A=(case A
100      of [DstIL.ASSGN(_,DstIL.OP(DstOp.C c,_))]=>c      of [DstIL.ASSGN(_,DstIL.LIT(Literal.Int 0))]=>0
101      | _ => 9      | _ => 9
102      (*end case*))      (*end case*))
103    

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

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