projects
/
pintos-anon
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
93a10588453b20446e9a26eb8fc838e22791cf67
[pintos-anon]
/
create-empty.ck
1
# -*- perl -*-
2
use strict;
3
use warnings;
4
use tests::tests;
5
check_expected ([<<'EOF', <<'EOF']);
6
(create-empty) begin
7
(create-empty) create(""): 0
8
(create-empty) end
9
create-empty: exit(0)
10
EOF
11
(create-empty) begin
12
create-empty: exit(-1)
13
EOF
14
pass;