Check if renamed symbol is a bound variable

This commit is contained in:
Justin Ethier 2016-09-17 17:23:26 -04:00
parent d2019bb284
commit 9555c48850

View file

@ -115,7 +115,7 @@
;; if symbol has been renamed and is not a bound variable,
;; undo the rename
(let ((val (env:lookup expr *macro:renamed-variables* #f)))
(if (and val (not (member val bv)))
(if (and val (not (member expr bv)))
(clean val bv)
expr)))
((if? expr)