diff options
Diffstat (limited to 'src/interp/dq.boot')
| -rw-r--r-- | src/interp/dq.boot | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/interp/dq.boot b/src/interp/dq.boot index 103b9b54..0735d26b 100644 --- a/src/interp/dq.boot +++ b/src/interp/dq.boot @@ -47,7 +47,9 @@ namespace BOOT -- dqToList transforms a dq to a list -dqUnit s==(a:=[s];CONS(a,a)) +dqUnit s== + a := [s] + [a,:a] dqUnitCopy s== dqUnit(CAAR s) |