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/src/eXene/lib/protocol/xsendevt.sml
ViewVC logotype

Diff of /sml/trunk/src/eXene/lib/protocol/xsendevt.sml

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

revision 1855, Wed Nov 2 21:12:31 2005 UTC revision 1856, Wed Nov 2 22:24:39 2005 UTC
# Line 26  Line 26 
26        fun putSigned8 (buf, i, x) = put8(buf, i, Word8.fromInt x)        fun putSigned8 (buf, i, x) = put8(buf, i, Word8.fromInt x)
27    
28        fun put16 (buf, i, x) =        fun put16 (buf, i, x) =
29              Pack16Big.update(v2a buf, i div 2 + eventOffset div 2, x)              PackWord16Big.update(v2a buf, i div 2 + eventOffset div 2, x)
30        fun putSigned16 (buf, i, x) = put16(buf, i, LargeWord.fromInt x)        fun putSigned16 (buf, i, x) = put16(buf, i, LargeWord.fromInt x)
31    
32        fun put32 (buf, i, x) =        fun put32 (buf, i, x) =
33              Pack32Big.update(v2a buf, i div 4 + eventOffset div 4, x)              PackWord32Big.update(v2a buf, i div 4 + eventOffset div 4, x)
34        fun putWord32 (buf, i, x) = put32(buf, i, Word.toLargeWord x)        fun putWord32 (buf, i, x) = put32(buf, i, Word.toLargeWord x)
35        fun putSigned32 (buf, i, x) = put32(buf, i, LargeWord.fromInt x)        fun putSigned32 (buf, i, x) = put32(buf, i, LargeWord.fromInt x)
36    

Legend:
Removed from v.1855  
changed lines
  Added in v.1856

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