Path: utzoo!utgpu!water!watmath!clyde!att!osu-cis!tut.cis.ohio-state.edu!mailrus!nrl-cmf!ukma!rutgers!rochester!uhura.cc.rochester.edu!sunybcs!boulder!ncar!tank!uxc!uxc.cso.uiuc.edu!a.cs.uiuc.edu!uicslsv!bharat
From: bharat@uicslsv.cs.uiuc.edu
Newsgroups: comp.lang.lisp
Subject: *readtable* and read macros
Message-ID: <4400005@uicslsv>
Date: 17 Oct 88 05:06:00 GMT
Lines: 27
Nf-ID: #N:uicslsv:4400005:000:829
Nf-From: uicslsv.cs.uiuc.edu!bharat    Oct 17 00:06:00 1988


I'm using a read macro with set-macro-character as in

(set-macro-character #\? #'create-variable)

After reading the data file I want to restore the original readtable,
and the following should work (if I'm understanding Steele correctly).

(setq *readtable* (copy-readtable nil)) -------1

But this doesn't and I make do with the foll. code.

(defvar *temp-readtable* (copy-readtable))
(load "read-macros.lisp") etc....
(setq *readtable* (copy-readtable *temp-readtable*)) ------2

This is quite kludgy.

Is this the only way to do it, or should (1) work (i.e. is the LISP on
the TI explorer buggy)?

-Bharat

************************************************************************
R.Bharat Rao
bharat%uicsl@uxc.cso.uiuc.edu , bharat@uicsl.csl.uiuc.edu
************************************************************************