From 4ab17aa2ce7df0020431eafd4b441a707f1aa8d5 Mon Sep 17 00:00:00 2001 From: Matt Birkholz Date: Wed, 1 Jul 2015 08:03:48 -0700 Subject: [PATCH] Punt unused variable slots and mention of dangerous bindings. --- src/microcode/scode.h | 10 +--------- src/microcode/sdata.h | 9 +++------ 2 files changed, 4 insertions(+), 15 deletions(-) diff --git a/src/microcode/scode.h b/src/microcode/scode.h index 851c3424b..9a1f622a5 100644 --- a/src/microcode/scode.h +++ b/src/microcode/scode.h @@ -146,17 +146,9 @@ USA. /* 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 f0625b81e..1d3b950bd 100644 --- 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. -- 2.25.1