| Paste number 49645: | anyone got any clues why this might not be defined here?! |
| Pasted by: | baggles |
| 9 months, 2 weeks ago | |
| #lispcafe | Context in IRC logs | |
| Paste contents: |
| (eval-when (:compile-toplevel :load-toplevel :execute) (defmacro define-arb-and-non-arb (form) (let ((extension nil)) (declare (special extension)) (labels ((expand-extension (form) (if (listp form) (if (eql (first form) '?extension) (if extension (second form) (third form)) (mapcar #'expand-extension form)) form)))) (list 'progn (let ((extension t)) (declare (special extension)) (expand-extension form)) ; undefined function: EXPAND-EXTENSION (expand-extension form))))) |
This paste has no annotations.