diff --git a/basis/compiler/cfg/linearization/linearization.factor b/basis/compiler/cfg/linearization/linearization.factor index 34ae7f8cc6..a0360e9d9c 100644 --- a/basis/compiler/cfg/linearization/linearization.factor +++ b/basis/compiler/cfg/linearization/linearization.factor @@ -42,7 +42,7 @@ M: ##branch linearize-insn : successors ( bb -- first second ) successors>> first2 ; inline -:: conditional ( bb insn n conditional-quot negate-cc-quot -- bb successor label ... ) +:: conditional ( bb insn n conditional-quot negate-cc-quot -- bb successor label etc... ) bb insn conditional-quot [ drop dup successors>> second useless-branch? ] 2bi