projects
/
pintos-anon
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
08dc1612734966f0ad460ffb5a589e9e6aa8583c
[pintos-anon]
/
read-boundary.ck
1
# -*- perl -*-
2
use strict;
3
use warnings;
4
use tests::tests;
5
check_expected ([<<'EOF']);
6
(read-boundary) begin
7
(read-boundary) open "sample.txt"
8
(read-boundary) end
9
read-boundary: exit(0)
10
EOF
11
pass;