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/branches/idlbasis-devel/src/MLRISC/library/hash-array.sml
ViewVC logotype

Diff of /sml/branches/idlbasis-devel/src/MLRISC/library/hash-array.sml

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

revision 1232, Tue Jun 4 21:11:15 2002 UTC revision 1233, Wed Jun 5 21:47:29 2002 UTC
# Line 39  Line 39 
39    
40      fun copy_array(ARRAY(ref a,d,ref n,ref c)) =      fun copy_array(ARRAY(ref a,d,ref n,ref c)) =
41           let val a' = A.array(n,[])           let val a' = A.array(n,[])
42               val _  = A.copy{src=a,dst=a',si=0,di=0,len=NONE}               val _  = A.copy{src=a,dst=a',di=0}
43           in  ARRAY(ref a',d,ref n,ref c)           in  ARRAY(ref a',d,ref n,ref c)
44           end           end
45    

Legend:
Removed from v.1232  
changed lines
  Added in v.1233

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