Parent Directory | Revision Log | Patch
revision 1.5 by pfdietz, Sat Apr 19 16:13:34 2003 UTC | revision 1.6 by pfdietz, Sat Apr 19 17:15:02 2003 UTC | |
---|---|---|
# | Line 333 | Line 333 |
333 | (nil 2) | (nil 2) |
334 | (1 2)) | (1 2)) |
335 | ||
336 | ;;; &whole is followed by a destructuring pattern (see 3.4.4.1.2) | |
337 | (deftest macrolet.36 | |
338 | (macrolet ((%m (&whole (m a b) c d) `(quote (,m ,a ,b ,c ,d)))) | |
339 | (%m 1 2)) | |
340 | (%m 1 2 1 2)) | |
341 | ||
342 | ;;; Symbol-macrolet tests | ;;; Symbol-macrolet tests |
343 | ||
344 | (deftest symbol-macrolet.1 | (deftest symbol-macrolet.1 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |