failing test case for reader macros

This commit is contained in:
2024-12-06 14:15:57 -06:00
parent a1cdf75140
commit 5d0fce9298
2 changed files with 17 additions and 0 deletions

View File

@@ -26,4 +26,9 @@ class ReaderMacroTestCase extends Test {
function testQuasiquoteMacro() { function testQuasiquoteMacro() {
_testQuasiquoteMacro(); _testQuasiquoteMacro();
} }
function testStartOfLineInMiddle() {
_testStartOfLineInMiddle();
}
} }

View File

@@ -30,6 +30,8 @@
rassert fluffers rassert fluffers
(Assert.pass)) (Assert.pass))
(undefReaderMacro ["b" "c"])
(function _testCommentAtBlockOrArrayEnd [] (function _testCommentAtBlockOrArrayEnd []
[ [
(+ 1 2) (+ 1 2)
@@ -40,3 +42,13 @@
// Comment // Comment
} }
(Assert.pass)) (Assert.pass))
(function _testStartOfLineInMiddle []
(let [bob "first"
bob2 "second"]
(defReaderMacro &start "bob" [stream] `bob)
(defReaderMacro "bob" [stream] `bob2)
(Assert.equals "firstsecond" (+
bob bob))))