/[gcl]/gcl/ansi-tests/cons-test-06.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/cons-test-06.lsp

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

revision 1.3 by pfdietz, Mon Jan 13 23:19:51 2003 UTC revision 1.4 by pfdietz, Fri Jan 24 04:22:54 2003 UTC
# Line 12  Line 12 
12  ;;; endp  ;;; endp
13    
14  (deftest endp-nil  (deftest endp-nil
15      (not (not (endp nil)))    (notnot-mv (endp nil))
16    t)    t)
17    
18  (deftest endp-cons  (deftest endp-cons
19      (endp (cons 'a 'a))    (endp (cons 'a 'a))
20    nil)    nil)
21    
22  (deftest endp-singleton-list  (deftest endp-singleton-list
23      (endp '(a))    (endp '(a))
24    nil)    nil)
25    
26  (deftest endp-symbol-error  (deftest endp-symbol-error

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

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