aboutsummaryrefslogtreecommitdiff
path: root/src/interp/format.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/format.boot')
-rw-r--r--src/interp/format.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/format.boot b/src/interp/format.boot
index d7618244..4c598244 100644
--- a/src/interp/format.boot
+++ b/src/interp/format.boot
@@ -105,7 +105,7 @@ canRemoveIsDomain? pred ==
findSubstitutionOrder? alist == fn(alist,nil) where
-- returns NIL or an appropriate substituion order
fn(alist,res) ==
- null alist => NREVERSE res
+ null alist => nreverse res
choice := or/[x for (x:=[a,:b]) in alist | null containedRight(a,alist)] =>
fn(delete(choice,alist),[choice,:res])
nil