aboutsummaryrefslogtreecommitdiff
path: root/src/interp/htsetvar.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/htsetvar.boot')
-rw-r--r--src/interp/htsetvar.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/htsetvar.boot b/src/interp/htsetvar.boot
index ab5e9a6b..f788a852 100644
--- a/src/interp/htsetvar.boot
+++ b/src/interp/htsetvar.boot
@@ -340,7 +340,7 @@ htMakePathKey path ==
fn(STRCONC(a,'".",PNAME first b),rest b)
htMarkTree(tree,n) ==
- RPLACD(LASTTAIL tree,n)
+ LASTTAIL(tree).rest := n
for branch in tree repeat
branch.3 = 'TREE => htMarkTree(branch.5,n + 1)