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 2837, Wed Nov 19 23:42:17 2014 UTC revision 2838, Tue Nov 25 03:40:24 2014 UTC
# Line 203  Line 203 
203   | preBool(_,false)=""   | preBool(_,false)=""
204    
205      fun toString(E_LoadArr(_,nSize,oSize, arg, offset)) = String.concat[" LDArray<",iTos nSize ,      fun toString(E_LoadArr(_,nSize,oSize, arg, offset)) = String.concat[" LDArray<",iTos nSize ,
206              ":",iTos  oSize, ">", "( ", toString arg, ",", toString offset, ")"]              ":",iTos  oSize, ">", "( ", toString arg, ",offset", toString offset, ")"]
207       | toString (E_Op(rator, args)) = String.concat["OP_",Op.toString rator,"\n\t(",       | toString (E_Op(rator, args)) = String.concat["OP_",Op.toString rator,"\n\t(",
208          String.concatWith",\n\t" (List.map toString args),")"]          String.concatWith",\n\t" (List.map toString args),")"]
209       | toString (E_Cons(nSize, oSize,args)) =String.concat ["ConsExp:", Int.toString nSize,Int.toString oSize, "(",       | toString (E_Cons(nSize, oSize,args)) =String.concat ["ConsExp:", Int.toString nSize,Int.toString oSize, "(",
210          String.concatWith"," (List.map toString args),")"]          String.concatWith"," (List.map toString args),")"]
211       | toString (E_State x) = "StateVar"^stateVarToString x          | toString (E_State x) = "Exp:STATEVar"^stateVarToString x
212       | toString (E_Var x) = varToString x       | toString (E_Var x) = varToString x
213       | toString (E_Lit lit) = Literal.toString lit       | toString (E_Lit lit) = Literal.toString lit
214       | toString(E_Apply(mathfn, args))=String.concat["Apply (",       | toString(E_Apply(mathfn, args))=String.concat["Apply (",
# Line 227  Line 227 
227          | toStringS(S_LoadImage _ )=String.concat["ldimage"]          | toStringS(S_LoadImage _ )=String.concat["ldimage"]
228          | toStringS( S_Input _ )=String.concat["input"]          | toStringS( S_Input _ )=String.concat["input"]
229          | toStringS( S_New _ )=String.concat["new"]          | toStringS( S_New _ )=String.concat["new"]
230          | toStringS( S_Save (xs,e) )=String.concat["savestmt:\n\t(", toString e,")"]          | toStringS( S_Save ([x],e) )=String.concat["savestmt: x",stateVarToString x," e-", toString e,")"]
231            | toStringS( S_Save (xs,e) )=String.concat["savestmt:xs- e-", toString e,")"]
232          | toStringS( S_Copy( _ ,e, offset,n ) )=String.concat["Copy:\n\t(", toString e,") " ,iTos n ,"_offset_",iTos offset ]          | toStringS( S_Copy( _ ,e, offset,n ) )=String.concat["Copy:\n\t(", toString e,") " ,iTos n ,"_offset_",iTos offset ]
233          | toStringS( S_Exit _ )=String.concat["exit"]          | toStringS( S_Exit _ )=String.concat["exit"]
234          | toStringS(S_Active  )=String.concat["active"]          | toStringS(S_Active  )=String.concat["active"]

Legend:
Removed from v.2837  
changed lines
  Added in v.2838

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