summaryrefslogtreecommitdiffstats
path: root/parser.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2019-10-11 08:29:04 -0700
committerKaz Kylheku <kaz@kylheku.com>2019-10-11 08:29:04 -0700
commitaed772ac4e9c8d6ff641013c05645c3d3614d997 (patch)
tree5417108803f043da21aabb12fbb2f176991a9f04 /parser.c
parent860f0d04fd5f60d9d3e85debd2d158d5073da568 (diff)
downloadtxr-aed772ac4e9c8d6ff641013c05645c3d3614d997.tar.gz
txr-aed772ac4e9c8d6ff641013c05645c3d3614d997.tar.bz2
txr-aed772ac4e9c8d6ff641013c05645c3d3614d997.zip
parser: use eq-based hash for circular notation.
* parser.c (parser_circ_def): Instantiate p->circ_ref_hash as eq-based hash, not eql-based.
Diffstat (limited to 'parser.c')
-rw-r--r--parser.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/parser.c b/parser.c
index 03e99750..b05892bb 100644
--- a/parser.c
+++ b/parser.c
@@ -456,7 +456,7 @@ void parser_resolve_circ(parser_t *p)
void parser_circ_def(parser_t *p, val num, val expr)
{
if (!p->circ_ref_hash) {
- p->circ_ref_hash = make_hash(nil, nil, nil);
+ p->circ_ref_hash = make_eq_hash(nil, nil);
setcheck(p->parser, p->circ_ref_hash);
}