diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2019-10-07 06:32:50 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2019-10-07 06:32:50 -0700 |
commit | 2fb9d404b2b07cde4316614cf129e7aa9ab0e796 (patch) | |
tree | dc4448ae57493a379e0551e46bd99f2e2ce775d6 | |
parent | a7f158174e41155a119f8762f2bb36def24cb828 (diff) | |
download | txr-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.
-rw-r--r-- | parser.c | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -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; |