diff options
Diffstat (limited to 'src/interp/g-util.boot')
| -rw-r--r-- | src/interp/g-util.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/g-util.boot b/src/interp/g-util.boot index bd50fd14..f2ddb1b8 100644 --- a/src/interp/g-util.boot +++ b/src/interp/g-util.boot @@ -142,8 +142,8 @@ mkList u == ELEMN(x, n, d) == null x => d - n = 1 => car x - ELEMN(cdr x, n-1, d) + n = 1 => first x + ELEMN(rest x, n-1, d) PPtoFile(x, fname) == stream := DEFIOSTREAM([['MODE, :'OUTPUT], ['FILE, :fname]], 80, 0) |