Subject: Re: You want abbreviations? You can't handle abbreviations!
From: rpw3@rpw3.org (Rob Warnock)
Date: Wed, 07 May 2008 21:18:28 -0500
Newsgroups: comp.lang.lisp
Message-ID: <h9idnXd9Nb9p_7_VnZ2dnUVZ_uidnZ2d@speakeasy.net>
Ken Tilton  <kentilton@gmail.com> wrote:
+---------------
| Everyone knows how much I love Arc, I guess it has influenced my Lisp:
| 
| (deftoc |Reducing|
|      (category "Algebra I"  "Fractions")
|    (genner ... ))
+---------------

Heh! You missed an opportunity! If you compile (or load) this code
with READTABLE-CASE set to :INVERT, you can save two more characters:  ;-}

  (deftoc Reducing
       (category "Algebra I"  "Fractions")
     (genner ... ))


-Rob

-----
Rob Warnock			<rpw3@rpw3.org>
627 26th Avenue			<URL:http://rpw3.org/>
San Mateo, CA 94403		(650)572-2607