summaryrefslogtreecommitdiffstats
path: root/parser.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2019-10-07 06:32:50 -0700
committerKaz Kylheku <kaz@kylheku.com>2019-10-07 06:32:50 -0700
commit2fb9d404b2b07cde4316614cf129e7aa9ab0e796 (patch)
treedc4448ae57493a379e0551e46bd99f2e2ce775d6 /parser.c
parenta7f158174e41155a119f8762f2bb36def24cb828 (diff)
downloadtxr-2fb9d404b2b07cde4316614cf129e7aa9ab0e796.tar.gz
txr-2fb9d404b2b07cde4316614cf129e7aa9ab0e796.tar.bz2
txr-2fb9d404b2b07cde4316614cf129e7aa9ab0e796.zip
circle notation: bugfix for hash_userdata.
* parser.c (circ_backpatch): Fix neglect to recurse into hash table's userdata object to look for circle notation references.
Diffstat (limited to 'parser.c')
-rw-r--r--parser.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/parser.c b/parser.c
index d8619832..7661d60c 100644
--- a/parser.c
+++ b/parser.c
@@ -367,6 +367,9 @@ tail:
val ru = patch_ref(p, u);
if (ru)
set_hash_userdata(obj, ru);
+ else
+ circ_backpatch(p, &cs, u);
+
if (p->circ_count) {
val iter = hash_begin(obj);
val cell;