axiom-developer
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Axiom-developer] src/interp/compiler.boot.pamphlet


From: daly
Subject: [Axiom-developer] src/interp/compiler.boot.pamphlet
Date: Tue, 5 Dec 2006 23:52:53 -0600

I see that there is a change to compiler.boot in the sandbox code
but I don't understand the reason for the change. I'm not sure who
made the change as it is not recorded in the changelog files.

What is the problem that this change is designed to solve?
Is there a test case for it?

Tim

=========================================================================
--- sandbox/src/interp/compiler.boot.pamphlet
+++ daly/src/interp/compiler.boot.pamphlet
@@ -494,13 +494,12 @@
     T
   T
 
+--------------------> NEW DEFINITION (override in xruncomp.boot.pamphlet)
 getFormModemaps(form is [op,:argl],e) ==
   op is ["elt",domain,op1] =>
     [x for x in getFormModemaps([op1,:argl],e) | x is [[ =domain,:.],:.]]
   null atom op => nil
   modemapList:= get(op,"modemap",e)
-  if $insideCategoryPackageIfTrue then
-    modemapList := [x for x in modemapList | x is [[dom,:.],:.] and dom ^= '$]
   if op="elt"
      then modemapList:= eltModemapFilter(LAST argl,modemapList,e) or return nil
      else




reply via email to

[Prev in Thread] Current Thread [Next in Thread]