|
From: | Andreas Schwab |
Subject: | Re: Common Lisp like feature expressions (was: How and when to use GCPRO?) |
Date: | Mon, 27 Dec 2010 20:38:21 +0100 |
User-agent: | Gnus/5.13 (Gnus v5.13) Emacs/23.2.91 (gnu/linux) |
Leo <address@hidden> writes: > +(defun eval-feature-expression (form) > + (cond > + ((atom form) (featurep form nil)) > + ;; ensure form is a proper list > + ((condition-case nil > + (and (length form) nil) Nice quadratic behaviour. Andreas. -- Andreas Schwab, address@hidden GPG Key fingerprint = 58CA 54C7 6D53 942B 1756 01D3 44D5 214B 8276 4ED5 "And now for something completely different."
[Prev in Thread] | Current Thread | [Next in Thread] |