diff --git a/tests/step9_try.mal b/tests/step9_try.mal index 5f8c606b..ce6c9e17 100644 --- a/tests/step9_try.mal +++ b/tests/step9_try.mal @@ -116,9 +116,6 @@ (symbol "abc") ;=>abc -;;;TODO: all implementations should suppport this too -;;;(keyword :abc) -;;;;=>:abc (keyword "abc") ;=>:abc @@ -258,9 +255,6 @@ ;=>{:bcd 234} (keyword? (nth (keys {:abc 123 :def 456}) 0)) ;=>true -;;; TODO: support : in strings in make impl -;;;(keyword? (nth (keys {":abc" 123 ":def" 456}) 0)) -;;;;=>false (keyword? (nth (vals {"a" :abc "b" :def}) 0)) ;=>true @@ -380,3 +374,8 @@ (map? cond) ;=>false + +(keyword :abc) +;=>:abc +(keyword? (first (keys {":abc" 123 ":def" 456}))) +;=>false