commit - 99a435901454cc6ca529a783486c83ffddadb110
commit + 250220f1325224c083bce598a4769d84d76b373a
blob - fa58b7276325c65d3859238346b4fab028f14090
blob + 04a8bbb65d0a5db17f04c37b5d37d85b0a6c6c98
--- regress/io-suite.9ps
+++ regress/io-suite.9ps
@@ -13,3 +13,29 @@ testing "open + clunk works" dir "./root" {
 	m = recv()
 	assert m.type == Rclunk
 }
+
+testing "can open directories" dir "./root" {
+	mount(0, "/")
+	walk(0, 1, "dir", "subdir")
+	walk-ok()
+
+	open(1, OREAD)
+	m = recv()
+	assert m.type == Ropen
+
+	clunk(1)
+	m = recv()
+	assert m.type == Rclunk
+}
+
+testing "can't open directories for writing" dir "./root" {
+	mount(0, "/")
+	walk(0, 1, "dir")
+	walk-ok()
+
+	open(1, OWRITE)
+	expect-error()
+
+	open(1, ORDWR)
+	expect-error()
+}