Rename and add sorting words

[factor.git] / basis / compiler / tests / redefine9.factor

diff --git a/basis/compiler/tests/redefine9.factor b/basis/compiler/tests/redefine9.factor
index b8320d67490479ebe51830b1a8ce748a002f69b2..57ec3c8b268b9348093519360b905331d878ec72 100644 (file)
--- a/basis/compiler/tests/redefine9.factor
+++ b/basis/compiler/tests/redefine9.factor
@@ -14,7 +14,7 @@ IN: compiler.tests.redefine9
     GENERIC: my-generic ( a -- b )
     ! We add the bogus quotation here to hinder inlining
     ! since otherwise we cannot trigger this bug.
-    M: my-mixin my-generic 1 + [ [ <=> ] sort ] drop ;"
+    M: my-mixin my-generic 1 + [ sort ] drop ;"
     eval( -- )
 ] unit-test