From 5b48038ca84ff6345f0380776ca426e5e45cc357 Mon Sep 17 00:00:00 2001 From: Holger Hans Peter Freyther Date: Wed, 14 Aug 2013 15:49:16 +0200 Subject: [PATCH] tests: Move the GSNNumberDigit Test to a dedicated test class This makes jump to test work on Pharo --- Tests.st | 39 ++++++++++++++++++++++----------------- package.xml | 1 + 2 files changed, 23 insertions(+), 17 deletions(-) diff --git a/Tests.st b/Tests.st index 873bc90..ecf8504 100644 --- a/Tests.st +++ b/Tests.st @@ -282,23 +282,6 @@ TestCase subclass: GSM48Test [ self assert: msg asByteArray = res ] - testNumberDecode [ - | number res | - number := #(73 132 50 23 120). - res := GSMNumberDigits decodeFrom: number. - self assert: res = '9448237187'. - - number := #(73 132 50 23 120 186 220 174). - res := GSMNumberDigits decodeFrom: number. - self assert: res = '9448237187*#abc*'. - ] - - testNumberEncode [ - | res | - res := GSMNumberDigits encodeFrom: '9448237187*#abc*'. - self assert: res = #(73 132 50 23 120 186 220 174) asByteArray. - ] - testAuRejParsing [ | inp dec | @@ -924,3 +907,25 @@ TestCase subclass: TestGSM48ProgressIE [ self assert: prog progress = GSMProgress progressOrigNotInISDN. ] ] + +TestCase subclass: GSMNumberDigitsTest [ + + + testDecodeFrom [ + | number res | + number := #(73 132 50 23 120). + res := GSMNumberDigits decodeFrom: number. + self assert: res = '9448237187'. + + number := #(73 132 50 23 120 186 220 174). + res := GSMNumberDigits decodeFrom: number. + self assert: res = '9448237187*#abc*'. + ] + + testEncodeFrom [ + | res | + res := GSMNumberDigits encodeFrom: '9448237187*#abc*'. + self assert: res = #(73 132 50 23 120 186 220 174) asByteArray. + ] + +] diff --git a/package.xml b/package.xml index 93c60f0..1cab3dd 100644 --- a/package.xml +++ b/package.xml @@ -24,6 +24,7 @@ OsmoGSM.BitfieldTest OsmoGSM.TestGSM48ProgressIE OsmoGSM.GSM411Test + OsmoGSM.GSMNumberDigitsTest Tests.st SMSTests.st