/[gcl]/gcl/ansi-tests/multiple-value-setq.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/multiple-value-setq.lsp

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

revision 1.5 by pfdietz, Sat Jan 17 20:04:52 2004 UTC revision 1.6 by pfdietz, Fri Jun 24 14:11:45 2005 UTC
# Line 107  Line 107 
107       collect (list i form)))       collect (list i form)))
108    nil)    nil)
109    
110    (deftest multiple-value-setq.13
111      (multiple-value-setq nil :good)
112      :good)
113    
114    ;;; Error tests
115    
116  (deftest multiple-value-setq.error.1  (deftest multiple-value-setq.error.1
117    (signals-error (funcall (macro-function 'multiple-value-setq))    (signals-error (funcall (macro-function 'multiple-value-setq))
118                   program-error)                   program-error)

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

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