Merge qualified, alias, symbols, constants into core

[factor.git] / basis / compiler / tree / propagation / propagation-tests.factor

diff --git a/basis/compiler/tree/propagation/propagation-tests.factor b/basis/compiler/tree/propagation/propagation-tests.factor
index b324dc0fc2ee93fcba0dfb32d611f980bb98fbc9..87152a8e2bcbe7dda771537670ff23ef61fab6c2 100644 (file)
--- a/basis/compiler/tree/propagation/propagation-tests.factor
+++ b/basis/compiler/tree/propagation/propagation-tests.factor
@@ -641,7 +641,7 @@ MIXIN: empty-mixin
 ] unit-test
 
 [ V{ POSTPONE: f } ] [
-    [ { word object } declare eq? ] final-classes
+    [ { word object } declare equal? ] final-classes
 ] unit-test
 
 ! [ V{ string } ] [