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

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

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by pfdietz, Mon Oct 7 01:43:04 2002 UTC revision 1.2 by pfdietz, Fri Oct 18 11:58:46 2002 UTC
# Line 6  Line 6 
6  (in-package :cl-test)  (in-package :cl-test)
7    
8  (deftest complement.1  (deftest complement.1
9    (funcall (cl::complement #'identity) nil)    (not (funcall (cl::complement #'identity) nil))
10    t)    nil)
11    
12  (deftest complement.2  (deftest complement.2
13    (funcall (cl::complement #'identity) t)    (funcall (cl::complement #'identity) t)

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