Fix bug: looking up a macro returns the trap, not the transformer.

diff --git a/v7/src/microcode/lookup.c b/v7/src/microcode/lookup.c
index 283d2872a2fa946094e9b270d65fa5d707f5cf76..ec55a9ff8dceb6efd87b94fcc02aef109ee933e0 100644 (file)
--- a/v7/src/microcode/lookup.c
+++ b/v7/src/microcode/lookup.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: lookup.c,v 9.67 2001/12/21 04:36:07 cph Exp $
+$Id: lookup.c,v 9.68 2001/12/21 18:18:21 cph Exp $
 
 Copyright (c) 1988-2001 Massachusetts Institute of Technology
 
@@ -238,7 +238,7 @@ lookup_variable_cache (SCHEME_OBJECT cache, SCHEME_OBJECT * value_ret)
       return (ERR_UNBOUND_VARIABLE);
 
     case TRAP_MACRO:
-      (*value_ret) = (GET_TRAP_EXTRA (value));
+      (*value_ret) = value;
       return (ERR_MACRO_BINDING);
 
     default: