Punt unused variable slots and mention of dangerous bindings.

diff --git a/src/microcode/scode.h b/src/microcode/scode.h
index 851c3424b895d1018f4d7659eda74c7a3c45b323..9a1f622a581f5fcf1e71c48bcded4f5bee8d5c7f 100644 (file)
--- a/src/microcode/scode.h
+++ b/src/microcode/scode.h
@@ -146,17 +146,9 @@ USA.
 \f
 /* VARIABLE operation.
  * Corresponds to a variable lookup or variable reference. Contains the
- * symbol referenced, and (if it has been compiled) the frame and
- * offset in the frame in which it was found.  One of these cells is
- * multiplexed by having its type code indicate one of several modes
- * of reference: not yet compiled, local reference, formal reference,
- * auxiliary reference, or global value reference.
- * There are extra definitions in lookup.h.
+ * symbol referenced
  */
 #define VARIABLE_SYMBOL                0
-#define VARIABLE_FRAME_NO      1
-#define VARIABLE_OFFSET                2
-#define VARIABLE_COMPILED_TYPE 1
 
 #define GET_VARIABLE_SYMBOL(variable)                                  \
   (MEMORY_REF ((variable), VARIABLE_SYMBOL))

diff --git a/src/microcode/sdata.h b/src/microcode/sdata.h
index f0625b81e28901ecc69258bb6375f1ae99a4fac3..1d3b950bd1df2a551e54b54706faa82ac1d55535 100644 (file)
--- a/src/microcode/sdata.h
+++ b/src/microcode/sdata.h
@@ -124,12 +124,9 @@ USA.
  * call) or a incremental (run-time) DEFINE (known as an 'auxilliary'
  * binding).
  * When an environment frame is created, it only contains lambda
- * bindings.  If incremental defines are performed in it or its
- * children, it acquires an extension which contains a list of the
- * auxiliary bindings.  Some of these bindings are fictitious in that
- * their only purpose is to make the real bindings (if and when they
- * occur) become automatically dangerous.  Bindings become dangerous
- * when they are shadowed by incremental bindings in children frames.
+ * bindings.  If incremental defines are performed in it, it acquires
+ * an extension which contains a list of the auxiliary bindings.
+ *
  * Besides the lambda bindings, an environment frame contains a
  * pointer to the procedure which created it.  It is through this
  * procedure that the parent frame is found.