diff options
Diffstat (limited to 'src/interp/sys-utility.boot')
-rw-r--r-- | src/interp/sys-utility.boot | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/interp/sys-utility.boot b/src/interp/sys-utility.boot index 96bd829b..31168d54 100644 --- a/src/interp/sys-utility.boot +++ b/src/interp/sys-utility.boot @@ -388,6 +388,9 @@ remove!(l,x) == return l p := rest p +sortBy(k,l) == + SORT(copyList l,function GGREATERP,key <- k) + ++ Return the list of objects that follow x in l, including x itself. ++ Otherwise return nil. upwardCut(x,l) == |