Tweak error message
This commit is contained in:
parent
b2c591777e
commit
4970d0fd9e
|
@ -314,7 +314,7 @@
|
|||
(define (turn-enqueue! turn f action)
|
||||
(define qs (turn-queues turn))
|
||||
(when (not qs)
|
||||
(error 'turn-enqueue! "Attempt to reuse a committed turn in facet ~a" (turn-active-facet turn)))
|
||||
(error 'turn-enqueue! "Attempt to reuse ~a in ~a" turn (turn-active-facet turn)))
|
||||
(hash-update! qs f (lambda (actions) (cons action actions)) '()))
|
||||
|
||||
(define (turn-ref turn entity [attenuation '()])
|
||||
|
|
Loading…
Reference in New Issue