diff --git a/syndicate/actor.rkt b/syndicate/actor.rkt index 5625af2..5dd2eb2 100644 --- a/syndicate/actor.rkt +++ b/syndicate/actor.rkt @@ -301,7 +301,8 @@ (define (turn-enqueue! turn f action) (define qs (turn-queues turn)) - (when (not qs) (error 'turn-enqueue! "Attempt to reuse a committed turn")) + (when (not qs) + (error 'turn-enqueue! "Attempt to reuse a committed turn in facet ~a" (turn-active-facet turn))) (hash-update! qs f (lambda (actions) (cons action actions)) '())) (define (turn-ref turn entity [attenuation '()])