diff --git a/kiss/src/test/cases/BasicTestCase.kiss b/kiss/src/test/cases/BasicTestCase.kiss index 9f597281..b6d02f41 100644 --- a/kiss/src/test/cases/BasicTestCase.kiss +++ b/kiss/src/test/cases/BasicTestCase.kiss @@ -527,7 +527,7 @@ From:[(assert false (+ \"false \" \"should \" \"have \" \"been \" \"true\"))]" m (Assert.equals "\"#" ##""#"##)) (function _testKissStrings [] - (Assert.equals #| "\\\t\r\n\"$" |# "\\\t\r\n\"\$") + (Assert.equals #( "\\\t\r\n\"$"; }# "\\\t\r\n\"\$") (let [str "it's" num 3 l1 ["a" "b" "c"] diff --git a/kiss/src/test/cases/DSL.kiss b/kiss/src/test/cases/DSL.kiss index 1437a1da..4baece2e 100644 --- a/kiss/src/test/cases/DSL.kiss +++ b/kiss/src/test/cases/DSL.kiss @@ -1,3 +1,3 @@ // TODO make a better position reification scheme here -(defReaderMacro "goop" [stream] #|ReaderExp.CallExp({pos: {file: "bleh", line: 1, column: 1, absoluteChar: 1}, def: ReaderExp.Symbol("Assert.isTrue")}, [{pos: {file: "bleh", line: 1, column: 1, absoluteChar: 1}, def: ReaderExp.Symbol("true")}])|#) -(defReaderMacro "gloop" [stream] #|ReaderExp.CallExp({pos: {file: "bleh", line: 1, column: 1, absoluteChar: 1}, def: ReaderExp.Symbol("Assert.isFalse")}, [{pos: {file: "bleh", line: 1, column: 1, absoluteChar: 1}, def: ReaderExp.Symbol("false")}])|#) \ No newline at end of file +(defReaderMacro "goop" [stream] `(Assert.isTrue true)) +(defReaderMacro "gloop" [stream] `(Assert.isFalse false)) \ No newline at end of file