Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!uunet!mcsun!cernvax!chx400!sicsun!disuns2!disuns2.epfl.ch!simon
From: simon@liasun2.epfl.ch (Simon Leinen)
Newsgroups: comp.lang.lisp
Subject: Re: Case-sensitive readtable
Message-ID: <SIMON.91Jun25104137@liasun1.epfl.ch>
Date: 25 Jun 91 08:41:37 GMT
References: <1991Jun24.224323.8453@dsd.es.com>
Sender: news@disuns2.epfl.ch
Reply-To: simon@liasun6.epfl.ch
Organization: DI-LIA -- Ecole Polytechnique Federale de Lausanne
Lines: 21
Nntp-Posting-Host: liasun1.epfl.ch
In-reply-to: ccampbel@bullwinkle.dsd.es.com's message of 24 Jun 91 22:43:23 GMT
X-Md4-Signature: f41ce590b1f6d84d43b5c0257fb1da6d

In article <1991Jun24.224323.8453@dsd.es.com>
ccampbel@bullwinkle.dsd.es.com (Colin Campbell) writes:

   Q: Is there a reasonable way to modify the readtable so that
	   foo
   reads as 
	   |foo|
   would in the default readtable?

That's what X3J13 invented the READTABLE-CASE accessor for.  I tried
Sun Common Lisp 4.0.1, Symbolics Genera 8.0.2 and Allegro Common Lisp
4.0.1, but none of them implements this function... maybe the vendors
manage to vote this useful feature out of the standard.  (remember the
environment access functions in CLtL 2?)

Allegro has a non-standard function EXCL:SET-CASE-MODE which you can
use to set the case mode *globally*.  I think this was introduced to
simplify migration from Franz Lisp, which didn't capitalize symbol
names.
-- 
Simon.