/[gcl]/gcl/ansi-tests/call-arguments-limit.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/call-arguments-limit.lsp

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

revision 1.1 by pfdietz, Fri Oct 11 03:52:18 2002 UTC revision 1.2 by pfdietz, Fri Jan 24 02:12:45 2003 UTC
# Line 6  Line 6 
6  (in-package :cl-test)  (in-package :cl-test)
7    
8  (deftest call-arguments-limit.1  (deftest call-arguments-limit.1
9    (not (constantp 'call-arguments-limit))    (notnot-mv (constantp 'call-arguments-limit))
10    nil)    t)
11    
12  (deftest call-arguments-limit.2  (deftest call-arguments-limit.2
13    (not (typep call-arguments-limit 'integer))    (notnot-mv (typep call-arguments-limit 'integer))
14    nil)    t)
15    
16  (deftest call-arguments-limit.3  (deftest call-arguments-limit.3
17    (< call-arguments-limit 50)    (< call-arguments-limit 50)

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