From 9555c48850b231def70c01c507b72549917ffb39 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Sat, 17 Sep 2016 17:23:26 -0400 Subject: [PATCH] Check if renamed symbol is a bound variable --- scheme/cyclone/macros.sld | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scheme/cyclone/macros.sld b/scheme/cyclone/macros.sld index 8d3f335a..8114bff0 100644 --- a/scheme/cyclone/macros.sld +++ b/scheme/cyclone/macros.sld @@ -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)