tests/test.lisp
Thu Jul 2 22:48:38 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* #_ reader macro enum calls & cleanup
--- old-commonqt/tests/test.lisp 2014-10-30 07:09:28.000000000 +0100
+++ new-commonqt/tests/test.lisp 2014-10-30 07:09:28.000000000 +0100
@@ -12,7 +12,11 @@
(5am:test enum
(5am:is (enum= cl-smoke.qt:+blue+
- (#_blue "Qt"))))
+ (#_blue "Qt")))
+ (5am:is (enum= cl-smoke.qt:font.+bold+
+ (#_Bold "Font")))
+ (5am:is (enum= cl-smoke.qt:+key-enter+
+ (#_Key_Enter "Qt"))))
(5am:test new
(5am:is (cxx:= (make-instance 'cl-smoke.qt:byte-array :args '("foobar"))