syndicate-lang
/
syndicate-2017
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Elide spurious detail in patch actions and events

This commit is contained in:
Tony Garnock-Jones 2017-08-05 19:38:35 -04:00
parent 5bff630547
commit 4f21e9ab46
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
racket/syndicate/trace/stderr.rkt
View File

@ -156,7 +156,7 @@
(when show-actions?
(output "~a performs a patch:\n~a\n"
(format-pids process-names source)
(patch->pretty-string p)))]
(patch->pretty-string (label-patch p #t))))]
[('action (message body))
(when show-actions?
(output "~a broadcasts a message:\n~a\n"
@ -172,7 +172,7 @@
(with-color YELLOW
(output "~a receives an event:\n~a\n"
(format-pids process-names sink)
(patch->pretty-string p))))]
(patch->pretty-string (label-patch p #t)))))]
[('event (message body))
(when show-events?
(with-color YELLOW