aboutsummaryrefslogtreecommitdiff
path: root/src/interp/package.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/package.boot')
-rw-r--r--src/interp/package.boot6
1 files changed, 5 insertions, 1 deletions
diff --git a/src/interp/package.boot b/src/interp/package.boot
index 131ba589..baf88ac7 100644
--- a/src/interp/package.boot
+++ b/src/interp/package.boot
@@ -39,7 +39,11 @@ isPackageFunction() ==
-- called by compile/putInLocalDomainReferences
--+
nil
-
+
+isCategoryPackageName nam ==
+ p := PNAME opOf nam
+ p.(MAXINDEX p) = char '_&
+
processFunctorOrPackage(form,signature,data,localParList,m,e) ==
--+
processFunctor(form,signature,data,localParList,e)