From 0582848626e2b57a4e6d4d7525efd91c5401edf4 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sun, 19 May 2013 04:55:38 +0000
Subject: 	* interp/define.boot (getSignature): Third parameter need not
 be fluid.

---
 src/interp/define.boot | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'src/interp')

diff --git a/src/interp/define.boot b/src/interp/define.boot
index c5f7e073..c11a4fbf 100644
--- a/src/interp/define.boot
+++ b/src/interp/define.boot
@@ -2019,14 +2019,14 @@ addDomain(domain,e) ==
   e        --is not a functor
  
 
-getSignature(op,argModeList,$e) ==
-  mmList := get(op,'modemap,$e)
+getSignature(op,argModeList,e) ==
+  mmList := get(op,'modemap,e)
   sigl := removeDuplicates
       [sig for [[dc,:sig],[pred,:.]] in mmList
-         | dc='$ and sig.source = argModeList and knownInfo(pred,$e)]
+         | dc='$ and sig.source = argModeList and knownInfo(pred,e)]
   sigl is [sig] => sig
   null sigl =>
-    getXmode(op,$e) is ['Mapping,:sig] => sig
+    getXmode(op,e) is ['Mapping,:sig] => sig
     SAY '"************* USER ERROR **********"
     SAY("available signatures for ",op,": ")
     if null mmList
-- 
cgit v1.2.3