Parent Directory | Revision Log | 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 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |