diff options
| author | dos-reis <gdr@axiomatics.org> | 2010-06-05 00:45:29 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2010-06-05 00:45:29 +0000 |
| commit | 08ba464573978a0bded6932d00770890f6b9a349 (patch) | |
| tree | 2e6917ee95fe54c2c9bd4aef1f2fb106775ea443 /src/interp/nrunopt.boot | |
| parent | c4abad6da39c2c2d064b8d4e5c7210cf51ce7afc (diff) | |
| download | open-axiom-08ba464573978a0bded6932d00770890f6b9a349.tar.gz | |
More cleanup
Diffstat (limited to 'src/interp/nrunopt.boot')
| -rw-r--r-- | src/interp/nrunopt.boot | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/interp/nrunopt.boot b/src/interp/nrunopt.boot index 3d93d870..9457e2e4 100644 --- a/src/interp/nrunopt.boot +++ b/src/interp/nrunopt.boot @@ -391,7 +391,8 @@ hasDefaultPackage catname == --======================================================================= -- Generate Category Level Alist --======================================================================= -orderCatAnc x == nreverse ASSOCLEFT SORTBY('CDR,rest depthAssoc x) +orderCatAnc x == + nreverse ASSOCLEFT SORTBY(function rest,rest depthAssoc x) depthAssocList u == u := delete('DomainSubstitutionMacro,u) --hack by RDJ 8/90 |