artulab
projects
/
guile-orca
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Use html for the code block in README
[guile-orca]
/
examples
/
rpc-apply-scatter-sum.scm
1
#!/usr/bin/env -S guile -s
2
!#
3
4
(add-to-load-path "..")
5
(use-modules (srfi srfi-1))
6
(use-modules (orca))
7
8
(define (sum-it a b) (+ a b))
9
10
(rpc-start)
11
12
(format #t "I'm master process. Received ~s ~%"
13
(rpc-apply-scatter sum-it '(10 20 30 40) '(1 2 3 4)))
14
15
(rpc-finalize)