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"]]]
