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 /MLRISC/trunk/mltree/machine-int.sml
ViewVC logotype

Diff of /MLRISC/trunk/mltree/machine-int.sml

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

revision 2945, Fri Feb 15 22:20:08 2008 UTC revision 2946, Sat Feb 16 00:14:43 2008 UTC
# Line 126  Line 126 
126         in  tow32 lo + Word32.<<(tow32 hi, 0w16) end         in  tow32 lo + Word32.<<(tow32 hi, 0w16) end
127     fun toInt32(sz, i) = Int32.fromLarge(narrow(sz, i))     fun toInt32(sz, i) = Int32.fromLarge(narrow(sz, i))
128    
129       fun toInt64(sz, i) = Int64.fromLarge(narrow(sz, i))
130    
131     fun hash i = Word.fromInt(I.toInt(I.andb(i,0x1fffffff)))     fun hash i = Word.fromInt(I.toInt(I.andb(i,0x1fffffff)))
132    
133     fun isInRange(sz, i) = I.<=(minOfSize sz,i) andalso I.<=(i,maxOfSize sz)     fun isInRange(sz, i) = I.<=(minOfSize sz,i) andalso I.<=(i,maxOfSize sz)

Legend:
Removed from v.2945  
changed lines
  Added in v.2946

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