aboutsummaryrefslogtreecommitdiffstats
path: root/Tests.st
diff options
context:
space:
mode:
authorHolger Hans Peter Freyther <holger@moiji-mobile.com>2013-08-14 15:49:16 +0200
committerHolger Hans Peter Freyther <holger@moiji-mobile.com>2013-08-14 15:50:10 +0200
commit5b48038ca84ff6345f0380776ca426e5e45cc357 (patch)
tree2c51ba5ea9f8ee358ef5a217ed53b51485b018f2 /Tests.st
parentac5b3c08fcf0b515839aa607f7dcd3a109955135 (diff)
tests: Move the GSNNumberDigit Test to a dedicated test class
This makes jump to test work on Pharo
Diffstat (limited to 'Tests.st')
-rw-r--r--Tests.st39
1 files changed, 22 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 [
+ <category: 'OsmoGSM-Test'>
+
+ 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.
+ ]
+
+]