Login
7 branches 0 tags
Ben (X13/Arch) Some runtime cleanup a16a3cf 2 years ago 1165 Commits
nujel / tests / testsuite / keyword.nuj
("asd" (:string asd:))
(:asd (:keyword "asd"))
(:type-error (try car (:keyword #nil)))
(:type-error (try car (:keyword 123)))
(#t (keyword? :asd))
(#f (keyword? (:symbol ":asd")))
(#t (keyword? (:keyword ":asd")))
(#f (keyword? 'asd))
(#f (keyword? (:symbol "asd")))
(#f (keyword? 123))
(:read-error (try car (read/single ":asd:qwe:")))
(:read-error (try car (read/single ":asd:qwe")))
(:read-error (try car (read/single "asd:qwe")))
(:read-error (try car (read/single "a:sd:qw:e")))