From ... Path: archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news.tele.dk!news.tele.dk!small.news.tele.dk!newsfeed1.bredband.com!bredband!uio.no!nntp.uio.no!ifi.uio.no!not-for-mail From: Erik Naggum Newsgroups: comp.lang.lisp Subject: Re: prog@ Date: 19 Nov 2002 21:34:54 +0000 Organization: Naggum Software, Oslo, Norway Lines: 16 Message-ID: <3246730494173301@naggum.no> References: <3DD3C637.1060702@web.de> <7h3n0o5vjg1.fsf@pc150.maths.bris.ac.uk> <86adk5tzhf.fsf@raw.grenland.fast.no> Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit X-Trace: maud.ifi.uio.no 1037741694 23900 129.240.65.5 (19 Nov 2002 21:34:54 GMT) X-Complaints-To: abuse@ifi.uio.no NNTP-Posting-Date: 19 Nov 2002 21:34:54 GMT Mail-Copies-To: never User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.2 Xref: archiver1.google.com comp.lang.lisp:47201 * Raymond Wiker | Is it possible to use eval-when instead? I have tried this, | with the meta package, but have not had any success: | | (eval-when (:compile-toplevel :load-toplevel :execute) | (setf *readtable* *meta-readtable*)) Allegro CL offers a convenient way to access readtables via the named readtables features. The obvious macro `in-syntax´ then takes a symbol as argument and assigns the corresponding readtable to *readtable*. -- Erik Naggum, Oslo, Norway Act from reason, and failure makes you rethink and study harder. Act from faith, and failure makes you blame someone and push harder.