application/octet-stream
•
816 B
•
20 lines
("asd" (keyword->string asd:))
(:asd (string->keyword "asd"))
(:type-error (try car (keyword->string #nil)))
(:type-error (try car (keyword->string 123)))
(:type-error (try car (keyword->string 'asd)))
(:type-error (try car (keyword->string "asd")))
(:type-error (try car (string->keyword #nil)))
(:type-error (try car (string->keyword 123)))
(:type-error (try car (string->keyword 'asd)))
(:type-error (try car (string->keyword asd:)))
(#t (keyword? :asd))
(#f (keyword? (string->symbol ":asd")))
(#t (keyword? (string->keyword ":asd")))
(#f (keyword? 'asd))
(#f (keyword? (string->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")))
