From 94756b27ee8d56cd01e8591f19feffc3fa2898fa Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sun, 5 Oct 2008 14:15:17 +0000
Subject: 	* interp/c-util.boot (getFunctionReplacement): Tidy. 	*
 algebra/data.spad.pamphlet (Byte): Likewise.

---
 src/interp/c-util.boot | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/interp')

diff --git a/src/interp/c-util.boot b/src/interp/c-util.boot
index 8a6f4402..a85d8bb0 100644
--- a/src/interp/c-util.boot
+++ b/src/interp/c-util.boot
@@ -842,7 +842,7 @@ ambiguousSignatureError(op, sigs) ==
 
 getFunctionReplacement: %Symbol -> %Form
 getFunctionReplacement name ==
-  GET(compileTimeBindingOf name, "SPADreplace")
+  GET(name, "SPADreplace")
 
 ++ remove any replacement info possibly associated with `name'.
 clearReplacement name ==
-- 
cgit v1.2.3