<div dir="ltr"><div class="gmail_extra"><br><div class="gmail_quote">On Wed, Feb 20, 2013 at 11:18 PM, Faré <span dir="ltr"><<a href="mailto:fahree@gmail.com" target="_blank">fahree@gmail.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">

<div id=":13t">Implementations that make the standard <span class="">readtable</span> <span class="">read</span>-only:<br>
allegro sbcl<br>
Implementations that don't:<br>
abcl ccl clisp cmucl ecl lispworks scl<br></div></blockquote></div><br>This is not true</div><div class="gmail_extra"><br></div><div class="gmail_extra"><div class="gmail_extra">> (with-standard-io-syntax</div><div class="gmail_extra">

  (set-dispatch-macro-character #\! #\Y (constantly nil)))</div><div class="gmail_extra"><br></div><div class="gmail_extra">Condition of type: SIMPLE-ERROR</div><div class="gmail_extra">Change readtable</div><div class="gmail_extra">

<br></div><div class="gmail_extra">Available restarts:</div><div class="gmail_extra"><br></div><div class="gmail_extra">1. (RESTART-TOPLEVEL) Go back to Top-Level REPL.</div><div class="gmail_extra"><br></div><div class="gmail_extra">

Broken at SI:BYTECODES. [Evaluation of: (WITH-STANDARD-IO-SYNTAX (SET-DISPATCH-MACRO-CHARACTER #\! ...))] In: #<process TOP-LEVEL>.</div><div><br></div><div style>I just realized the error message is broken, but ECL does have read-only readtables and a function to lock them (ext:readtable-lock readtable &optional yes-or-no)</div>

<div style><br></div><div style>I am not sure about the pprint dispatch table, though. We just recycled old SBCL/CMUCL code for that.</div><div style><br></div><div style>Juanjo</div><div><br></div>-- <br>Instituto de Física Fundamental, CSIC<br>

c/ Serrano, 113b, Madrid 28006 (Spain) <br><a href="http://juanjose.garciaripoll.googlepages.com" target="_blank">http://juanjose.garciaripoll.googlepages.com</a>
</div></div>