diff --git a/src/lsp/top.lsp b/src/lsp/top.lsp
index 5c40ae930..550c7df4f 100644
--- a/src/lsp/top.lsp
+++ b/src/lsp/top.lsp
@@ -498,7 +498,7 @@ file.  When the saved image is invoked, it will start the redefined top-level."
 	  (- *tpl-level* *step-level* -1)
 	  ""))
 
-(defun tpl-read (&aux (*readtable* (sys::standard-readtable)))
+(defun tpl-read ()
   (finish-output)
   (loop
     (case (peek-char nil *standard-input* nil :EOF)