aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nrunopt.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/nrunopt.boot')
-rw-r--r--src/interp/nrunopt.boot3
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