diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2015-12-29 06:49:17 -0800 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2015-12-29 06:49:17 -0800 |
commit | 52a90ab0eb45508c98d4338ff28722dadbe28ee9 (patch) | |
tree | 600dfbab73c5ca13fb0006274476abdd356519f0 | |
parent | ffada96ffdf3dae7c1932deebd6f512ede5f2aa5 (diff) | |
download | txr-52a90ab0eb45508c98d4338ff28722dadbe28ee9.tar.gz txr-52a90ab0eb45508c98d4338ff28722dadbe28ee9.tar.bz2 txr-52a90ab0eb45508c98d4338ff28722dadbe28ee9.zip |
Don't record nil as the macro ancestor of a form.
* eval.c (set_origin): Don't store nil value
in the origin_hash.
-rw-r--r-- | eval.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -223,7 +223,8 @@ val lookup_origin(val form) static val set_origin(val form, val origin) { - (void) sethash(origin_hash, form, origin); + if (origin) + sethash(origin_hash, form, origin); return form; } |