core: Remove override hook for read-input-file.
authorJan Nieuwenhuizen <janneke@gnu.org>
Tue, 3 Apr 2018 05:45:12 +0000 (07:45 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Tue, 3 Apr 2018 05:45:12 +0000 (07:45 +0200)
* src/reader.c (read_input_file_env): Remove override hook for
read-input-file.

src/reader.c

index 8210cb30a1722b94bf0ec1d095369aefe3ef1e9d..3269c45624fc0897a72a0ba657ff0835f542feb7 100644 (file)
@@ -31,8 +31,10 @@ SCM
 read_input_file_env (SCM a)
 {
   r0 = a;
+#if 0
   if (assq_ref_env (cell_symbol_read_input_file, r0) != cell_undefined)
     return apply (cell_symbol_read_input_file, cell_nil, r0);
+#endif
   return read_input_file_env_ (read_env (r0), r0);
 }