diff options
-rw-r--r-- | share/txr/stdlib/optimize.tl | 1 |
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)))) |