]> gitweb.factorcode.org Git - factor.git/commitdiff
Revert "move a word out of private vocab"
authorDoug Coleman <doug.coleman@gmail.com>
Sun, 30 Aug 2009 19:53:19 +0000 (14:53 -0500)
committerDoug Coleman <doug.coleman@gmail.com>
Sun, 30 Aug 2009 19:53:19 +0000 (14:53 -0500)
This reverts commit 978de4476ccd1acf734c600da1802b1d4e0000df.

basis/concurrency/messaging/messaging.factor

index e8bf0d9baa249e14517fe16aa5f2488555951a1e..904660428238367e8cfe3f1bdd8fb64549f92927 100644 (file)
@@ -120,11 +120,15 @@ M: cannot-send-synchronous-to-self summary
         '[ _ synchronous-reply? ] (receive-if-timeout) data>>\r
     ] if ;   \r
 \r
+<PRIVATE\r
+\r
 : reply-synchronous ( message synchronous -- )\r
     dup expired?\r
     [ 2drop ] \r
     [ [ <reply> ] keep sender>> send ] if ;\r
 \r
+PRIVATE>\r
+\r
 : handle-synchronous ( quot -- )\r
     (receive) [\r
         data>> swap call\r