/[gcl]/gcl/ansi-tests/union.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/union.lsp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch 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 259  Line 259 
259       #'<))       #'<))
260    (1 2 3 4 5 6))    (1 2 3 4 5 6))
261    
262    (defharmless union.test-and-test-not.1
263      (union (list 1 4 8 10) (list 1 2 3 9 10 13) :test #'eql :test-not #'eql))
264    
265    (defharmless union.test-and-test-not.2
266      (union (list 1 4 8 10) (list 1 2 3 9 10 13) :test-not #'eql :test #'eql))
267    
268    
269  ;;; Order of evaluation tests  ;;; Order of evaluation tests
270    
271  (deftest union.order.1  (deftest union.order.1

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26