X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=actors.git;a=blobdiff_plain;f=testing_factorial3.scm;h=1cb9dd9172ca93ebed3b5caae7fc75b81618b5f6;hp=b3450aae1efd9b4d2bfe3e7973407a916e496fe4;hb=f1da9dd563657b366b9918d5d5e6b61c1e59c43b;hpb=0dadc9967c78efaafcfbbc48897163e6bfc93c8b diff --git a/testing_factorial3.scm b/testing_factorial3.scm index b3450aa..1cb9dd9 100644 --- a/testing_factorial3.scm +++ b/testing_factorial3.scm @@ -12,8 +12,8 @@ (lambda (self m) (send-message customer (* n m)) 'done)))) - (send-message self fact-acc (- n 1)) - 'sleep))))) + (send-message self fact-acc (- n 1)))) + 'sleep))) (define println (make-actor-with-address 'println @@ -22,4 +22,5 @@ 'sleep))) (send-message factorial println 5) +(send-message factorial println 7) (run)