application/octet-stream
•
530 B
•
15 lines
("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:")))
(: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")))
