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 2694, Wed Sep 10 22:55:58 2014 UTC revision 2695, Fri Sep 12 01:55:00 2014 UTC
# Line 86  Line 86 
86        | S_Die        | S_Die
87        | S_StoreVec of exp * bool*int *int * Ty.ty* exp list        | S_StoreVec of exp * bool*int *int * Ty.ty* exp list
88              (*lhs var, isAligned, newSize,origSize,pieces, Operations, isArr*)              (*lhs var, isAligned, newSize,origSize,pieces, Operations, isArr*)
89        | S_Cons of var  * Ty.ty * exp list (* Cons->Array*)        | S_Cons of var * Ty.ty *Ty.ty * exp list (* Cons->Array  ,var,OriginalType,pieceSizes *)
90    
91    
92      and exp      and exp
# Line 100  Line 100 
100          (*aligned, newVecSize,originalVecSize, addr, offset *)          (*aligned, newVecSize,originalVecSize, addr, offset *)
101        | E_LoadVec of bool*int * int * exp * exp        | E_LoadVec of bool*int * int * exp * exp
102        | E_Mux of bool*int *int * Ty.ty*exp list (* same as storeVec stmt*)        | E_Mux of bool*int *int * Ty.ty*exp list (* same as storeVec stmt*)
103                (*eventual Merging of these two expressions*)
104    
105    
106    (*When occurance >1  local variables are created, and the expression list are vars. Then other operators call the vars*)    (*When occurance >1  local variables are created, and the expression list are vars. Then other operators call the vars*)
107   (*otherwise use entire expression.*)   (*otherwise use entire expression.*)
# Line 179  Line 181 
181              ":",iTos  oSize, ">", "( ", toString arg, ",", toString offset, ")"]              ":",iTos  oSize, ">", "( ", toString arg, ",", toString offset, ")"]
182       |  toString(E_LoadVec(_,nSize,oSize, arg, offset)) = String.concat[" LDVec<",iTos nSize ,       |  toString(E_LoadVec(_,nSize,oSize, arg, offset)) = String.concat[" LDVec<",iTos nSize ,
183              ":",iTos  oSize, ">", "( ", toString arg, ",", toString offset, ")"]              ":",iTos  oSize, ">", "( ", toString arg, ",", toString offset, ")"]
184       | toString (E_Op(rator, args)) = String.concat[Op.toString rator,"(",       | toString (E_Op(rator, args)) = String.concat["OP",Op.toString rator,"(",
185          String.concatWith"," (List.map toString args),")"]          String.concatWith"," (List.map toString args),")"]
186       | toString (E_Cons(ty, args)) =String.concat ["ConsExp:", Ty.toString ty, "(",       | toString (E_Cons(ty, args)) =String.concat ["ConsExp:", Ty.toString ty, "(",
187          String.concatWith"," (List.map toString args),")"]          String.concatWith"," (List.map toString args),")"]
# Line 210  Line 212 
212                  String.concat["Statment Store-Arr: ",toString x,  "=",iTos tyNew,"|",iTos tyOrig,"@ [",                  String.concat["Statment Store-Arr: ",toString x,  "=",iTos tyNew,"|",iTos tyOrig,"@ [",
213                  Ty.toString pieces ,"]",a]                  Ty.toString pieces ,"]",a]
214              end              end
215           | toStringS (S_Cons(x,ty, args)) = String.concat ["ConsStmt:", Var.name x,  "=",Ty.toString ty, "(",           | toStringS (S_Cons(x,_,ty, args)) = String.concat ["ConsStmt:", Var.name x, "] =",Ty.toString ty, "(",
216           String.concatWith"," (List.map toString args),")"]           String.concatWith"," (List.map toString args),")"]
217    
218    

Legend:
Removed from v.2694  
changed lines
  Added in v.2695

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