diff options
Diffstat (limited to 'src/interp/package.boot')
-rw-r--r-- | src/interp/package.boot | 6 |
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) |