]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/compiler/cfg/useless-blocks/useless-blocks.factor
Resolved merge.
[factor.git] / basis / compiler / cfg / useless-blocks / useless-blocks.factor
index f543aa4036d816c3216c049ccd00c0a0815a2946..05cb13748b3120cbefb5dec542e1a4314424708b 100644 (file)
@@ -37,7 +37,7 @@ IN: compiler.cfg.useless-blocks
 
 : delete-conditional? ( bb -- ? )
     dup instructions>> [ drop f ] [
-        peek class {
+        last class {
             ##compare-branch
             ##compare-imm-branch
             ##compare-float-branch