Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Tracker SCM

SCM Repository

[smlnj] Diff of /sml/trunk/src/MLRISC/graphs/node-priqueue.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/graphs/node-priqueue.sml

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

revision 1349, Wed Sep 3 22:22:18 2003 UTC revision 1350, Fri Sep 5 21:34:27 2003 UTC
# Line 110  Line 110 
110    
111         val _ = make_heap((N+1) div 2)         val _ = make_heap((N+1) div 2)
112    
113         val _ = A.appi (fn (i,x) => A.update(pos,x,i)) (heap,0,NONE)         val _ = A.appi (fn (i,x) => A.update(pos,x,i)) heap
114    
115     in  Q{ less = less, heap = heap, pos = pos, size = ref N }     in  Q{ less = less, heap = heap, pos = pos, size = ref N }
116     end     end

Legend:
Removed from v.1349  
changed lines
  Added in v.1350

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