diff options
-rw-r--r-- | stdlib/optimize.tl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/stdlib/optimize.tl b/stdlib/optimize.tl index c3387a37..5a299a01 100644 --- a/stdlib/optimize.tl +++ b/stdlib/optimize.tl @@ -475,7 +475,7 @@ (set ybl.insns ^(,ybl.label ,(car insns) ,*(cdr yinsns))) (pushnew ybl bb.rescan) (set bb.recalc t) - (set bb.links (list ybl xbl)) + (set bl.links (list ybl xbl)) ^((if (t ,reg) ,xbl.label))) (t insns)))) (@nil insns)))) |