aboutsummaryrefslogtreecommitdiff
path: root/src/interp/define.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-11-29 02:07:10 +0000
committerdos-reis <gdr@axiomatics.org>2008-11-29 02:07:10 +0000
commit4df5483287dd753065b3697cfa8b6525f8f76ec3 (patch)
treea59e97251cd706aa53852aca4332b0706e05b5a7 /src/interp/define.boot
parente8ad2f9f2b60fe586d02c8681c5d85de4ef89b18 (diff)
downloadopen-axiom-4df5483287dd753065b3697cfa8b6525f8f76ec3.tar.gz
* interp/define.boot (compCapsuleInner): Call processFunctor.
* interp/wi2.boot (compCapsuleInner): Likewise. * interp/functor.boot (processFunctorOrPackage): Remove. (processPackage): Likewise. (subTree): Likewise. (setPackageLocals): Likewise. (PackageDescendCode): Likewise.
Diffstat (limited to 'src/interp/define.boot')
-rw-r--r--src/interp/define.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/define.boot b/src/interp/define.boot
index e8f9e9e9..5da7a327 100644
--- a/src/interp/define.boot
+++ b/src/interp/define.boot
@@ -1456,7 +1456,7 @@ compCapsuleInner(itemList,m,e) ==
if $addForm then data:= ['add,$addForm,data]
code:=
$insideCategoryIfTrue and not $insideCategoryPackageIfTrue => data
- processFunctorOrPackage($form,$signature,data,localParList,m,e)
+ processFunctor($form,$signature,data,localParList,e)
[MKPF([:$getDomainCode,code],"PROGN"),m,e]
--% PROCESS FUNCTOR CODE