Using this, test t-Symbols

(deftest t-Symbols
   (is (= 'abc (symbol "abc")))
   (is (= '*+!-_? (symbol "*+!-_?")))
   (is (= 'abc:def:ghi (symbol "abc:def:ghi")))
   (is (= 'abc/def (symbol "abc" "def")))
   (is (= 'abc.def/ghi (symbol "abc.def" "ghi")))
   (is (= 'abc/def.ghi (symbol "abc" "def.ghi")))
   (is (= 'abc:def/ghi:jkl.mno (symbol "abc:def" "ghi:jkl.mno")))
   (is (instance? clojure.lang.Symbol 'alphabet))
   )

becomes:

(deftest t-Symbols
   (check
     (:equal
       'abc (symbol "abc")
       '*+!-_? (symbol "*+!-_?")
       'abc:def:ghi (symbol "abc:def:ghi")
       'abc/def (symbol "abc" "def")
       'abc.def/ghi (symbol "abc.def" "ghi")
       'abc/def.ghi (symbol "abc" "def.ghi")
       'abc:def/ghi:jkl.mno (symbol "abc:def" "ghi:jkl.mno")
     )
     (instance? clojure.lang.Symbol 'alphabet)))

which is in my opinion much more readable. Any comments to this syntactic  
enhancement?

Thank you, Frantisek

--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups 
"Clojure" group.
To post to this group, send email to clojure@googlegroups.com
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at 
http://groups.google.com/group/clojure?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to