delegate: use string word-prop keys.

[factor.git] / basis / delegate / delegate-tests.factor

diff --git a/basis/delegate/delegate-tests.factor b/basis/delegate/delegate-tests.factor
index 9c79c5e8e511fb0e62d64405c1a96a9eb15ff03b..845e227e61ab09af3b32ad5b8ef778fb30b6363b 100644 (file)
--- a/basis/delegate/delegate-tests.factor
+++ b/basis/delegate/delegate-tests.factor
@@ -192,7 +192,7 @@ DEFER: seq-delegate
 
 { t } [
     seq-delegate
-    sequence-protocol \ protocol-consult word-prop
+    sequence-protocol "protocol-consult" word-prop
     key?
 ] unit-test
 
@@ -205,7 +205,7 @@ DEFER: seq-delegate
 
 { f } [
     seq-delegate
-    sequence-protocol \ protocol-consult word-prop
+    sequence-protocol "protocol-consult" word-prop
     key?
 ] unit-test