X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=tests%2Ftest-actors.scm;h=30f13d053f847d18de56abfa00ad2eb92cf2c8d4;hb=fa598a979d510a783f1d6f097f560f23de997c88;hp=0b9adb503e34a591a9b62c336257dd96db266a8e;hpb=84a19e7d4cb97e00a64191e1ecfcf984ffae52d1;p=8sync.git diff --git a/tests/test-actors.scm b/tests/test-actors.scm index 0b9adb5..30f13d0 100644 --- a/tests/test-actors.scm +++ b/tests/test-actors.scm @@ -184,7 +184,7 @@ customer> Whaaaaat? I can't believe I got voice mail!\n" (create-friend #:init-value #f #:init-keyword #:create-friend) (actions #:allocation #:each-subclass - #:init-value (build-actions + #:init-thunk (build-actions (*init* hi-on-init-init)))) (define (hi-on-init-init actor message)