]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/compiler/tree/dead-code/dead-code-tests.factor
Fixing various test failures and updating some more vocabs for >r/r> removal
[factor.git] / basis / compiler / tree / dead-code / dead-code-tests.factor
index 1e9e93fa7c67afa0762554ba9733d26b67a8e5f9..7c28866e94ba4770322b2b6b723532280baf0d29 100644 (file)
@@ -79,7 +79,7 @@ IN: compiler.tree.dead-code.tests
 
 [ [ read drop 1 2 ] ] [ [ read [ 1 2 ] dip drop ] optimize-quot ] unit-test
 
-[ [ over [ + ] dip ] ] [ [ [ + ] [ drop ] 2bi ] optimize-quot ] unit-test
+[ [ over >R + R> ] ] [ [ [ + ] [ drop ] 2bi ] optimize-quot ] unit-test
 
 [ [ [ ] [ ] if ] ] [ [ [ 1 ] [ 2 ] if drop ] optimize-quot ] unit-test