Parent Directory | Revision Log | Patch
revision 1.1 by pfdietz, Sun Apr 20 13:17:46 2003 UTC | revision 1.2 by pfdietz, Mon Jun 16 11:38:15 2003 UTC | |
---|---|---|
# | Line 121 | Line 121 |
121 | nil))) | nil))) |
122 | t) | t) |
123 | ||
124 | (defharmless subsetp.test-and-test-not.1 | |
125 | (subsetp '(a b c) '(a g c e b) :test #'eql :test-not #'eql)) | |
126 | ||
127 | (defharmless subsetp.test-and-test-not.3 | |
128 | (subsetp '(a b c) '(a g c e b) :test-not #'eql :test #'eql)) | |
129 | ||
130 | ;;; Order of argument evaluation tests | ;;; Order of argument evaluation tests |
131 | ||
132 | (deftest subsetp.order.1 | (deftest subsetp.order.1 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |