0.6.11.10:

[sbcl.git] / src / code / readtable.lisp

diff --git a/src/code/readtable.lisp b/src/code/readtable.lisp
index a4d412d..a93b895 100644 (file)
--- a/src/code/readtable.lisp
+++ b/src/code/readtable.lisp
@@ -15,8 +15,7 @@
   '(simple-array (unsigned-byte 8) (#.char-code-limit)))
 
 (sb!xc:defstruct (readtable (:conc-name nil)
-                           (:predicate readtablep)
-                           (:copier nil))
+                           (:predicate readtablep))
   #!+sb-doc
   "Readtable is a data structure that maps characters into syntax
    types for the Common Lisp expression reader."