8 lines
169 B
Racket
8 lines
169 B
Racket
|
#lang syndicate/test
|
||
|
|
||
|
(spawn (on (asserted "hello")
|
||
|
(printf "goodbye\n")))
|
||
|
|
||
|
(dataspace (spawn (assert (outbound "hello"))))
|
||
|
|
||
|
(trace (assertion-added "hello"))
|