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

SCM Repository

[diderot] Diff of /branches/charisee/src/compiler/tree-il/tree-il.sml
ViewVC logotype

Diff of /branches/charisee/src/compiler/tree-il/tree-il.sml

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

revision 2681, Sun Aug 24 18:59:07 2014 UTC revision 2686, Mon Aug 25 19:10:16 2014 UTC
# Line 97  Line 97 
97        | E_LoadArr of bool*int * int * exp * exp        | E_LoadArr of bool*int * int * exp * exp
98          (*aligned, newVecSize,originalVecSize, addr, offset *)          (*aligned, newVecSize,originalVecSize, addr, offset *)
99    
100        | E_tmp of exp list (*holds exps for store *)        | E_mux of exp list (*holds exps for store *)
101          | E_tmpmux of exp list (*same as ^ but should not exist past this stage *)
102    
103    
104      and var = V of {      and var = V of {
# Line 181  Line 182 
182       | toString (E_Lit lit) = Literal.toString lit       | toString (E_Lit lit) = Literal.toString lit
183       | toString(E_Apply(mathfn, args))=String.concat["Apply (",       | toString(E_Apply(mathfn, args))=String.concat["Apply (",
184          String.concatWith"," (List.map toString args),")"]          String.concatWith"," (List.map toString args),")"]
185       | toString(E_tmp args) =let       | toString(E_mux args) =let
186          val a= String.concatWith "," (List.map toString args)          val a= String.concatWith "," (List.map toString args)
187          in          in
188                  String.concat["tmp: ",a]                  String.concat["Mux: ",a]
189          end          end
190         | toString(E_tmpmux args) =let
191            val a= String.concatWith "," (List.map toString args)
192            in
193            String.concat["tmpMux: ",a]
194            end
195    
196    
197    
198    

Legend:
Removed from v.2681  
changed lines
  Added in v.2686

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