From 07f7fcb06023363c7745133d2f4550eb82d584fd Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Fri, 11 Dec 2015 16:25:14 +1300 Subject: [PATCH] Handy debug printing (commented out) --- prospect/actor.rkt | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/prospect/actor.rkt b/prospect/actor.rkt index fc8210a..503aa2d 100644 --- a/prospect/actor.rkt +++ b/prospect/actor.rkt @@ -284,6 +284,11 @@ (define continuation-table (actor-state-continuation-table s)) (define continuation (hash-ref continuation-table callee-id #f)) (define new-table (hash-remove continuation-table callee-id)) + ;; (log-info "invoke-stored-continuation self=~a callee=~a values=~v k=~v" + ;; (actor-state-self-id s) + ;; callee-id + ;; reply-values + ;; continuation) (handle-actor-syscall (transition (struct-copy actor-state s [continuation-table new-table]) '()) (apply continuation (actor-state-variables s) reply-values)))