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

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

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

revision 1.1 by pfdietz, Fri Oct 18 02:36:06 2002 UTC revision 1.2 by pfdietz, Mon Jan 13 14:11:49 2003 UTC
# Line 51  Line 51 
51    (eqlt #c(1 -2) (- #c(-1 2)))    (eqlt #c(1 -2) (- #c(-1 2)))
52    t)    t)
53    
54  ;;; There are many other uses of EQL in other files.  (deftest eql.error.1
55      (classify-error (eql))
56      program-error)
57    
58    (deftest eql.error.2
59      (classify-error (eql nil))
60      program-error)
61    
62    (deftest eql.error.3
63      (classify-error (eql nil nil nil))
64      program-error)
65    
66    ;;; Error tests for EQ
67    
68    (deftest eq.error.1
69      (classify-error (eq))
70      program-error)
71    
72    (deftest eq.error.2
73      (classify-error (eq nil))
74      program-error)
75    
76    (deftest eq.error.3
77      (classify-error (eq nil nil nil))
78      program-error)
79    
80      

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