diff --git a/core/classes/algebra/algebra-tests.factor b/core/classes/algebra/algebra-tests.factor
index d9ac9263ac..ab77e6e5b0 100644
--- a/core/classes/algebra/algebra-tests.factor
+++ b/core/classes/algebra/algebra-tests.factor
@@ -354,7 +354,7 @@ TUPLE: xh < xb ;
 
 { t } [ { xa xb xc xd xe xf xg xh } sort-classes dup sort-classes = ] unit-test
 
-{ H{ { word word } } } [
+{ { word } } [
     generic-class flatten-class
 ] unit-test