smalltalk
/
osmo-st-smpp
Archived
1
0
Fork 0

codec: Deal with Sockets.StreamSocket returning a String

This commit is contained in:
Holger Hans Peter Freyther 2014-06-17 18:35:59 +02:00
parent c6065ab122
commit 7bee831b63
1 changed files with 2 additions and 2 deletions

View File

@ -21,9 +21,9 @@ Object subclass: SMPPMessage [
SMPPMessage class >> readFrom: aStream [
| len data stream header body |
len := ((aStream next: 4) uintAt: 1) swap32.
len := ((aStream next: 4) asByteArray uintAt: 1) swap32.
data := aStream next: len - 4.
stream := data readStream.
stream := data asByteArray readStream.
header := SMPPPDUHeader readFrom: stream.
body := SMPPBodyBase readFrom: stream for: header.