From 10c66565cb293dd955ca11b20fc5c553dcc63cd1 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Fri, 21 Dec 2001 18:18:21 +0000
Subject: [PATCH] Fix bug: looking up a macro returns the trap, not the
 transformer.

---
 v7/src/microcode/lookup.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v7/src/microcode/lookup.c b/v7/src/microcode/lookup.c
index 283d2872a..ec55a9ff8 100644
--- 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:
-- 
2.25.1