From cb3eee64dc94c23fe9e90d1180ace2672e22675e Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Sun, 13 Aug 2017 22:40:28 -0400 Subject: [PATCH] Avoid serialization problems for exceptions --- racket/syndicate/trace/msd.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/racket/syndicate/trace/msd.rkt b/racket/syndicate/trace/msd.rkt index 516a3c3..9342f03 100644 --- a/racket/syndicate/trace/msd.rkt +++ b/racket/syndicate/trace/msd.rkt @@ -41,7 +41,7 @@ (hash-set! names (spacetime-space sink) name) (write-event! source sink 'spawn (format "~a" name))] [('exit exn-or-false) - (write-event! source sink 'exit exn-or-false)] + (write-event! source sink 'exit (format "~a" exn-or-false))] [('actions-produced actions) (when (positive? (length actions)) (write-event! source sink 'actions-produced (length actions)))]