X-Git-Url: https://jxself.org/git/?p=8sync.git;a=blobdiff_plain;f=tests%2Ftest-actors.scm;fp=tests%2Ftest-actors.scm;h=30f13d053f847d18de56abfa00ad2eb92cf2c8d4;hp=0b9adb503e34a591a9b62c336257dd96db266a8e;hb=8bdfa5c8f81d4e46d57c367da23cd8ea676ad717;hpb=c32aa0d308ce33667168dc2c2f41b30f423fe158 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)