bldc/tests/test_mail_1.lisp

6 lines
64 B
Common Lisp

(send (self) 1)
(recv ((? x) (define a1 x)))
(check (= a1 1))