X-Git-Url: https://jxself.org/git/?p=8sync.git;a=blobdiff_plain;f=8sync%2Frepl.scm;h=006540367dcea540a8046bff154f17264e6f0770;hp=16e246699fe1af49573ddb221ba7bbce839cdda3;hb=47de7ccf21d3a2a615271d0ab007ce3d15ffa23d;hpb=c98c1f91b9b408972f9728f63988fbb25c0ec416

diff --git a/8sync/repl.scm b/8sync/repl.scm
index 16e2466..0065403 100644
--- a/8sync/repl.scm
+++ b/8sync/repl.scm
@@ -52,7 +52,7 @@
   (define server
     (spawn-coop-repl-server socket))
   (set! (repl-manager-socket repl-manager) socket)
-  (while (actor-am-i-alive? repl-manager)
+  (while (actor-alive? repl-manager)
     (poll-coop-repl-server server)
     (8sleep (repl-manager-poll-every repl-manager))))