diff options
author | Holger Hans Peter Freyther <zecke@selfish.org> | 2013-02-23 11:41:20 +0100 |
---|---|---|
committer | Holger Hans Peter Freyther <zecke@selfish.org> | 2013-02-23 11:41:20 +0100 |
commit | c9033c0aa0cc0efa9edd579f3f20d2dcb2f85909 (patch) | |
tree | 5a704714ec38023af24ad64ce46fbf7f68829140 | |
parent | 147307900d4e9c005f67c1ac97b7a83f3cc82756 (diff) |
pharo: Add a test case for ?: syntax of the macro expansion
-rw-r--r-- | ExtensionTest.st | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/ExtensionTest.st b/ExtensionTest.st index 82e5315..1b3f845 100644 --- a/ExtensionTest.st +++ b/ExtensionTest.st @@ -23,6 +23,15 @@ TestCase subclass: StringFormatTest [ self assert: str = 'Bla Bla 10'. ] + testExpandMacrosTrue [ + | str | + str := 'Should be true=<1?true:false>' expandMacrosWith: true. + self assert: str = 'Should be true=true'. + + str := 'Should be false=<1?tue:false>' expandMacrosWith: false. + self assert: str = 'Should be false=false'. + ] + testExpandMacros2 [ | str | str := 'Bla Bla <1p> <2s>' expandMacrosWith: 10 with: '20'. |