Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/compiler/CodeGen/cpscompile/memAliasing.sml
ViewVC logotype

Diff of /sml/trunk/compiler/CodeGen/cpscompile/memAliasing.sml

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

revision 651, Thu Jun 1 18:34:03 2000 UTC revision 733, Fri Nov 17 05:13:45 2000 UTC
# Line 103  Line 103 
103         and sizeOfs([],hp)    = hp         and sizeOfs([],hp)    = hp
104           | sizeOfs(k::ks,hp) = Int.max(sizeOf(k,hp),sizeOfs(ks,hp))           | sizeOfs(k::ks,hp) = Int.max(sizeOf(k,hp),sizeOfs(ks,hp))
105    
106         val locMap = Intmap.new(37,NotFound) (* lvar -> loc *)         val locMap = IntHashTable.mkTable(37,NotFound) (* lvar -> loc *)
107         val look   = Intmap.map locMap         val look   = IntHashTable.lookup locMap
108         val bind   = Intmap.add locMap         val bind   = IntHashTable.insert locMap
109    
110         val newMem = Cells.newCell Cells.MEM         val newMem = Cells.newCell Cells.MEM
111    

Legend:
Removed from v.651  
changed lines
  Added in v.733

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