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/xdisplay.sml
ViewVC logotype

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

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

revision 1380, Wed Sep 17 20:20:51 2003 UTC revision 1381, Wed Sep 17 21:28:41 2003 UTC
# Line 132  Line 132 
132    ])    ])
133  (*-DEBUG*)  (*-DEBUG*)
134              val reply = SockUtil.recvVec (sock, len)              val reply = SockUtil.recvVec (sock, len)
135              fun getMsg () = Byte.unpackStringVec(              fun getMsg () = Byte.unpackStringVec(Word8VectorSlice.slice(
136                    reply,                    reply,
137                    0,                    0,
138                    SOME(Word8.toIntX(W8V.sub(hdr, 1))))                    SOME(Word8.toIntX(W8V.sub(hdr, 1)))))
139              fun error msg = (Socket.close sock; MLXError.xerror msg)              fun error msg = (Socket.close sock; MLXError.xerror msg)
140              in              in
141                case W8V.sub(hdr, 0)                case W8V.sub(hdr, 0)

Legend:
Removed from v.1380  
changed lines
  Added in v.1381

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