diff --git a/basis/compiler/tree/cleanup/cleanup-tests.factor b/basis/compiler/tree/cleanup/cleanup-tests.factor
index f81f5a0937..6919e2b022 100644
--- a/basis/compiler/tree/cleanup/cleanup-tests.factor
+++ b/basis/compiler/tree/cleanup/cleanup-tests.factor
@@ -407,7 +407,7 @@ cell-bits 32 = [
 ] unit-test
 
 [ ] [
-    [ { merge } declare accum>> 0 >>length ] cleaned-up-tree drop
+    [ { merge-state } declare accum>> 0 >>length ] cleaned-up-tree drop
 ] unit-test
 
 [ ] [