1 files changed, 13 insertions, 0 deletions
diff --git a/tests/userprog/close-bad-fd.ck b/tests/userprog/close-bad-fd.ck
new file mode 100644
index 0000000..497b17c
--- /dev/null
+++ b/tests/userprog/close-bad-fd.ck
@@ -0,0 +1,13 @@
+# -*- perl -*-
+use strict;
+use warnings;
+use tests::tests;
+check_expected ([<<'EOF', <<'EOF']);
+(close-bad-fd) begin
+(close-bad-fd) end
+close-bad-fd: exit(0)
+EOF
+(close-bad-fd) begin
+close-bad-fd: exit(-1)
+EOF
+pass;

diff --git a/tests/userprog/close-bad-fd.ck b/tests/userprog/close-bad-fd.ck new file mode 100644 index 0000000..497b17c --- /dev/null +++ b/tests/userprog/close-bad-fd.ck
@@ -0,0 +1,13 @@
	1	# -- perl --
	2	use strict;
	3	use warnings;
	4	use tests::tests;
	5	check_expected ([<<'EOF', <<'EOF']);
	6	(close-bad-fd) begin
	7	(close-bad-fd) end
	8	close-bad-fd: exit(0)
	9	EOF
	10	(close-bad-fd) begin
	11	close-bad-fd: exit(-1)
	12	EOF
	13	pass;