diff options
| -rw-r--r-- | share/txr/stdlib/compiler.tl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/share/txr/stdlib/compiler.tl b/share/txr/stdlib/compiler.tl index 59050ff5..6b1c1a17 100644 --- a/share/txr/stdlib/compiler.tl +++ b/share/txr/stdlib/compiler.tl @@ -1504,10 +1504,10 @@ (defmeth compiler optimize (me insns) (let* ((lt-dregs (mapcar .oreg me.lt-frags)) (bb (new (basic-blocks insns lt-dregs)))) - bb.(calc-liveness) - bb.(peephole) bb.(thread-jumps) bb.(elim-dead-code) + bb.(calc-liveness) + bb.(peephole) bb.(get-insns))) (defun true-const-p (arg) |