clem 0.4.1, ch-asdf 0.2.8, ch-util 0.2.2, lift 1.3.1, darcs ignored, smarkup 0.3.3
[CommonLispStat.git] / external / lift / compare / rt-tests.lisp
blob8db565634bb4a2b15f9767302fd72f5feeba5c3b
1 #|
2 can you change the equality test?
3 |#
5 (in-package #:cl)
6 (defpackage #:kmrcl-tests-rt
7 (:use #:kmrcl #:cl #:rtest))
8 (in-package #:kmrcl-tests-rt)
10 (rem-all-tests)
12 (deftest :str.0 (substitute-chars-strings "" nil) "")
13 (deftest :str.1 (substitute-chars-strings "abcd" nil) "abcd")
14 (deftest :str.2 (substitute-chars-strings "abcd" nil) "abcde")
16 (do-tests)