summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--share/txr/stdlib/optimize.tl1
1 files changed, 1 insertions, 0 deletions
diff --git a/share/txr/stdlib/optimize.tl b/share/txr/stdlib/optimize.tl
index 305bab9d..e2cb0020 100644
--- a/share/txr/stdlib/optimize.tl
+++ b/share/txr/stdlib/optimize.tl
@@ -161,6 +161,7 @@
((and xlabel ylabel)
(set [bb.hash ylabel]
^(,ylabel ,(car insns) ,*(cdr yinsns)))
+ (push ylabel bb.rescan)
^((if (t ,reg) ,xlabel)))
(t insns))))
(@jelse insns))))