/[gcl]/gcl/ansi-tests/ensure-generic-function.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/ensure-generic-function.lsp

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

revision 1.1 by pfdietz, Sat Mar 29 03:55:28 2003 UTC revision 1.2 by pfdietz, Tue May 13 03:45:32 2003 UTC
# Line 56  Line 56 
56        'error)))        'error)))
57    nil t t t)    nil t t t)
58    
59    ;;; Many more tests are needed for other combinations of keyword parameters
60    
61    (deftest ensure-generic-function.error.1
62      (classify-error (ensure-generic-function))
63      program-error)
64    
65    (deftest ensure-generic-function.error.2
66      (classify-error (ensure-generic-function (gensym) :lambda-list))
67      program-error)
68    
69    (deftest ensure-generic-function.error.3
70      (classify-error (ensure-generic-function (gensym) :allow-other-keys t
71                                               '("not a valid keyword") nil))
72      program-error)
73    
74    
75    
76    
77    

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