basis: ERROR: changes.

[factor.git] / basis / concurrency / messaging / messaging.factor

diff --git a/basis/concurrency/messaging/messaging.factor b/basis/concurrency/messaging/messaging.factor
index dc3e810871157f0418abb05c11b33edd4b38529a..e685f243f689ad42ce9577cdad3426fe3e104e42 100644 (file)
--- a/basis/concurrency/messaging/messaging.factor
+++ b/basis/concurrency/messaging/messaging.factor
@@ -56,7 +56,7 @@ M: cannot-send-synchronous-to-self summary
 
 : send-synchronous ( message thread -- reply )
     dup self eq? [
-        cannot-send-synchronous-to-self
+        throw-cannot-send-synchronous-to-self
     ] [
         [ <synchronous> dup ] dip send
         '[ _ synchronous-reply? ] receive-if