simon/jolt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat: proper char type ({:jolt/type :jolt/char :ch N}) — reader literals, char?/char/int/str, =, seq/first/rest/nth of strings yield chars, char printing; fix REPL multi-line input accumulation

Browse source
This commit is contained in:
Yogthos 2026-06-04 15:40:59 -04:00
parent e1556fd102
commit 0d841ef83d
7 changed files with 104 additions and 24 deletions
Download patch file Download diff file Expand all files Collapse all files

8
test/reader-test.janet
View file

@ -128,13 +128,13 @@
(assert (deep= @[(sym "+") 1 3] (parse-string "(+ 1 #?(:clj 3 :cljs 4))"))
"#? inside list picks :clj")
# Characters
# Characters — the reader now produces char values {:jolt/type :jolt/char :ch N}
(let [form (parse-string "\\newline")]
(assert (struct? form) "char is struct")
(assert (= :char (form :jolt/type)) "char type")
(assert (= "newline" (form :name)) "char name"))
(assert (= :jolt/char (form :jolt/type)) "char type")
(assert (= 10 (form :ch)) "newline codepoint"))
(let [form (parse-string "\\a")]
(assert (= "a" (form :name)) "simple char name"))
(assert (= 97 (form :ch)) "simple char codepoint"))
(print "All reader tests passed!")