Parent Directory | Revision Log | Patch
revision 1.1 by pfdietz, Sun Apr 20 13:17:45 2003 UTC | revision 1.2 by pfdietz, Mon Jun 16 11:38:15 2003 UTC | |
---|---|---|
# | Line 194 | Line 194 |
194 | (not (eql x y)))))) | (not (eql x y)))))) |
195 | (4)) | (4)) |
196 | ||
197 | (defharmless nintersection.test-and-test-not.1 | |
198 | (nintersection (list 'a 'b 'c) (list 'a 'c 'e) :test #'eql :test-not #'eql)) | |
199 | ||
200 | (defharmless nintersection.test-and-test-not.2 | |
201 | (nintersection (list 'a 'b 'c) (list 'a 'c 'e) :test-not #'eql :test #'eql)) | |
202 | ||
203 | ;;; Order of argument evaluation tests | ;;; Order of argument evaluation tests |
204 | ||
205 | (deftest nintersection.order.1 | (deftest nintersection.order.1 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |