diff options
Diffstat (limited to 'src/boot/scanner.boot')
| -rw-r--r-- | src/boot/scanner.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/boot/scanner.boot b/src/boot/scanner.boot index 1c731116..eb164ba9 100644 --- a/src/boot/scanner.boot +++ b/src/boot/scanner.boot @@ -49,8 +49,8 @@ dqUnit s== dqAppend(x,y)== null x => y null y => x - RPLACD (rest x,first y) - RPLACD (x, rest y) + x.rest.rest := first y + x.rest := rest y x dqConcat ld== |