X-Git-Url: https://jxself.org/git/?p=8sync.git;a=blobdiff_plain;f=demos%2Factors%2Frobotscanner.scm;h=80cd2e57bc10259a469b0183e0f7bd753ef75829;hp=f2d1d93f5f0cc765601e41e520991ab0a006a16e;hb=9414dea358e9067f1d333650df1a228dcc4bf378;hpb=c3beb2929546c0deb1b6a6398b2439cfc7ae00a7

diff --git a/demos/actors/robotscanner.scm b/demos/actors/robotscanner.scm
index f2d1d93..80cd2e5 100644
--- a/demos/actors/robotscanner.scm
+++ b/demos/actors/robotscanner.scm
@@ -261,9 +261,9 @@
    (send-message actor overseer 'transmission
                  #:message "Mission accomplished.")))
 
-(define (main)
+(define (main . args)
   (define hive (make-hive))
   (define overseer (hive-create-actor hive <overseer>))
   (define initial-messages
-    (list (hive-bootstrap-message hive overseer 'init-world)))
+    (list (bootstrap-message hive overseer 'init-world)))
   (ez-run-hive hive initial-messages))