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

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

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

revision 1.10 by pfdietz, Sun Feb 23 17:11:14 2003 UTC revision 1.11 by pfdietz, Sat Mar 1 03:35:48 2003 UTC
# Line 202  Line 202 
202               :test #'(lambda (x y)               :test #'(lambda (x y)
203                         (unless (eqt x 'a) (return-from fail 'fail))                         (unless (eqt x 'a) (return-from fail 'fail))
204                         (eqt x y))))                         (eqt x y))))
205    (A . 3))    (a . 3))
206    
207  ;;; Order of argument evaluation  ;;; Order of argument evaluation
208    

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11

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