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

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

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

revision 2866, Thu Feb 5 22:39:59 2015 UTC revision 2867, Tue Feb 10 06:52:58 2015 UTC
# Line 131  Line 131 
131              assgn(opp,[nU],name,vecTy)              assgn(opp,[nU],name,vecTy)
132          end          end
133    
134    
135        fun mkSqrt(nU,code)= let
136            val opp=DstOp.Sqrt
137            val name=String.concat[Var.name nU,"_Sqrt_"]
138            val (vA,A)=assgn(opp,[nU],name,realTy)
139            in
140                (vA,code@A)
141            end
142    
143    
144    
145    
146      (* Some shortcuts. Arguements are Low-IL variables already indexed/projected      (* Some shortcuts. Arguements are Low-IL variables already indexed/projected
147      * string*Var list ->Var*LowIL.ASSGN list      * string*Var list ->Var*LowIL.ASSGN list
148      *)      *)

Legend:
Removed from v.2866  
changed lines
  Added in v.2867

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