projects
/
pintos-anon
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
e013123a13d6bf53893628a519c48aa56dc435cd
[pintos-anon]
/
wait-twice.ck
1
# -*- perl -*-
2
use strict;
3
use warnings;
4
use tests::tests;
5
check_expected ([<<'EOF']);
6
(wait-twice) begin
7
(child-simple) run
8
child-simple: exit(81)
9
(wait-twice) wait(exec()) = 81
10
(wait-twice) wait(exec()) = -1
11
(wait-twice) end
12
wait-twice: exit(0)
13
EOF