artulab
projects
/
guile-orca
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Commit initial version
[guile-orca]
/
examples
/
rpc-make-throw-error.scm
1
#!/usr/bin/env -S guile -s
2
!#
3
4
(add-to-load-path "..")
5
(use-modules (orca))
6
7
(define (throw-error) (error "something bad happened"))
8
9
(rpc-start)
10
11
(format #t "I'm master process. Received ~s ~%" (rpc-make '(throw-error)))
12
13
(rpc-finalize)