smalltalk
/
osmo-st-asn1
Archived
1
0
Fork 0
Code Pull Requests Releases Activity

ber: Add one more GSM decoding test.. just execute it.

This commit is contained in:
Holger Hans Peter Freyther 2011-04-01 13:54:59 +02:00
parent 4d5a287b1b
commit 18bdf9d5a0
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
BERTLVStreamTest.st
View File

@ -111,6 +111,16 @@ TestCase subclass: BERTLVStreamTest [
self assert: value first asTuple = #(2 true 1).
self assert: value second size = 3.
]
testMoreGSM [
| data |
data := #(16rA1 16r20 16r02 16r01 16r01 16r02 16r01 16r3B
16r30 16r18 16r04 16r01 16r0F 16r04 16r13 16r2A
16rD5 16r4C 16r26 16r53 16rC5 16r64 16rB1 16r18
16r2D 16r16 16rAB 16rC9 16r68 16rB1 16rD8 16r0D
16r37 16r02) asByteArray.
(BERTLVStream on: data readStream) nextAllRecursive inspect.
]
]
TestCase subclass: DERTLVStreamTest [