diff options
| author | dos-reis <gdr@axiomatics.org> | 2008-12-01 08:13:31 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2008-12-01 08:13:31 +0000 |
| commit | 4bd99bf416b826b7cc94bc2b2290b0b540a30bae (patch) | |
| tree | f1e2093a1899c2cfe25f8010ffbbcad9252d7b95 /src/interp/define.boot | |
| parent | c3b50d06f5f3be949d42619a014e4744853db68a (diff) | |
| download | open-axiom-4bd99bf416b826b7cc94bc2b2290b0b540a30bae.tar.gz | |
* interp/define.boot (compile): Don't check for PAC names.
* interp/g-opt.boot (optCall): Likewise.
* interp/functor.boot (SetFunctionSlots): Likewise.
(mkOperatorEntry): Lose first parameter.
(optPackageCall): Remove.
* interp/category.boot (mkCategory): Document. Adjust call to
mkOperatorEntry.
Diffstat (limited to 'src/interp/define.boot')
| -rw-r--r-- | src/interp/define.boot | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/src/interp/define.boot b/src/interp/define.boot index 8e684640..6225e63b 100644 --- a/src/interp/define.boot +++ b/src/interp/define.boot @@ -1247,7 +1247,6 @@ compile u == INTERN STRCONC(encodeItem $prefix,'";",encodeItem op) isPackageFunction() and KAR $functorForm^="CategoryDefaults" => if null opmodes then userError ['"no modemap for ",op] - opmodes is [['PAC,.,name]] => name encodeFunctionName(op,$functorForm,$signatureOfForm,";",$suffix) encodeFunctionName(op,$functorForm,$signatureOfForm,";",$suffix) where |