diff --git a/src/mzscheme/src/read.c b/src/mzscheme/src/read.c
index 050b396bd5..0f18b20ba7 100644
--- a/src/mzscheme/src/read.c
+++ b/src/mzscheme/src/read.c
@@ -429,7 +429,7 @@ void scheme_init_read(Scheme_Env *env)
     delim['`'] -= SCHEME_OK;
     delim['_'] |= HONU_OK;
     {
-      GC_CAN_IGNORE const char *syms = "+-_=?:<>.!%^&*/~|";
+      GC_CAN_IGNORE const char *syms = "+-=?:<>.!%^&*/~|";
       for (i = 0; syms[i]; i++) {
 	delim[(int)syms[i]] |= HONU_SYM_OK;
       }