tools.test: Make the flag public. Finish porting tester changes to fuzzer.

[factor.git] / unmaintained / modules / rpc / rpc.factor

diff --git a/unmaintained/modules/rpc/rpc.factor b/unmaintained/modules/rpc/rpc.factor
index b394090d553dca0318d51b30edb30ee2ad46d135..85f9b8ae8c23382598283e391ca96d63a4a14a7d 100644 (file)
--- a/unmaintained/modules/rpc/rpc.factor
+++ b/unmaintained/modules/rpc/rpc.factor
@@ -11,7 +11,7 @@ TUPLE: rpc-request args vocabspec wordname ;
     serialize flush deserialize dup no-vocab? [ throw ] when ;
 
 :: define-remote ( str effect addrspec vocabspec -- )
-    str create-in effect [ in>> length ] [ out>> length ] bi
+    str create-word-in effect [ in>> length ] [ out>> length ] bi
     '[ _ narray vocabspec str rpc-request boa addrspec 9012 <inet> binary
     [ "doer" serialize send-with-check ] with-client _ firstn ]
     effect define-declared ;
@@ -24,4 +24,4 @@ TUPLE: rpc-request args vocabspec wordname ;
 
 : remote-load ( addr vocabspec -- voabspec ) [ swap
     9012 <inet> binary [ "loader" serialize serialize flush deserialize ] with-client ] keep
-    [ dictionary get-global set-at ] keep ;
\ No newline at end of file
+    [ dictionary get-global set-at ] keep ;