Parent Directory | Revision Log | Patch
revision 1.37 by rms, Sat Dec 7 21:34:00 2002 UTC | revision 1.38 by lektu, Tue Feb 4 12:53:34 2003 UTC | |
---|---|---|
# | Line 1368 lexical closures as in Common Lisp." | Line 1368 lexical closures as in Common Lisp." |
1368 | (set (car cl-closure-vars) [bad-lexical-ref]) | (set (car cl-closure-vars) [bad-lexical-ref]) |
1369 | (list (car x) (cadr x) (car cl-closure-vars)))) | (list (car x) (cadr x) (car cl-closure-vars)))) |
1370 | bindings)) | bindings)) |
1371 | (ebody | (ebody |
1372 | (cl-macroexpand-all | (cl-macroexpand-all |
1373 | (cons 'progn body) | (cons 'progn body) |
1374 | (nconc (mapcar (function (lambda (x) | (nconc (mapcar (function (lambda (x) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |