835ffc02529ac0cfcec88877ef0c0e0c1cc00449
[fleet.git] / tests / stack / stack-test.fleet
1 #ship stack : Stack
2 #ship debug : Debug
3
4 #expect 4
5 #expect 3
6 #expect 2
7 #expect 1
8 #expect 0
9
10 stack.push: [5] take, deliver; notify stack.pop;
11
12 0: sendto stack.push;
13 1: sendto stack.push;
14 2: sendto stack.push;
15 3: sendto stack.push;
16 4: sendto stack.push;
17
18 stack.pop: wait; [*] take, sendto debug.in;
19 debug.in:  [*] take, deliver;
20
21