summaryrefslogtreecommitdiffstats
path: root/stdlib
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib')
-rw-r--r--stdlib/optimize.tl2
1 files changed, 1 insertions, 1 deletions
diff --git a/stdlib/optimize.tl b/stdlib/optimize.tl
index bf82e5c1..9950d934 100644
--- a/stdlib/optimize.tl
+++ b/stdlib/optimize.tl
@@ -642,7 +642,7 @@
@lab1
. @rest)
(let* ((bl [bb.hash lab2]))
- (if (some bl.rlinks (op eq bb) .next)
+ (if (cdr bl.rlinks)
insns
^((ifq ,reg (t 0) ,lab3)
,lab1