Minor hack to revive the 6.001 REPL.

diff --git a/src/6001/nodefs.scm b/src/6001/nodefs.scm
index 28ae84a2664fe5b7b751a5afd320b1cf50d20653..a4b944eccaa29b719b980b14f8afaf4d9d5dd059 100644 (file)
--- a/src/6001/nodefs.scm
+++ b/src/6001/nodefs.scm
@@ -60,7 +60,7 @@ USA.
                      (make-sequence
                       (list expression
                             (make-combination
-                             write-definition-value
+                             (make-quotation write-definition-value)
                              (cons name
                                    (if (unassigned-reference-trap? value)
                                        '()