1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
@initialize:ocaml@
x << virtual.x;
@@
let _ = Printf.printf "ocaml start: x is %s\n" x
@initialize:python@
x << virtual.x;
@@
print "python start: x is %s" % (x)
@@
@@
foo();
@script:ocaml@
@@
()
@finalize:ocaml@
x << virtual.x;
y << virtual.y;
@@
Printf.printf "ocaml end: x is %s\n" x;
Printf.printf "ocaml end: y is %s\n" y
@finalize:python@
x << virtual.x;
y << virtual.y;
z << virtual.z;
@@
print "python end: x is %s" % (x)
print "python end: y is %s" % (y)
|
