Commit Diff


commit - 68a7ef689646791cb998ff37308ac73f8ac9c2a5
commit + 6bb3ac35fb107566e204808048e8a4c62241e66a
blob - ae631197e097cec671ae1e532638e7b487805ad2
blob + 963cda9e80bd727b1dea0152c10f7261a4181caa
--- regress/lisp/9p-test/kami-tests.lisp
+++ regress/lisp/9p-test/kami-tests.lisp
@@ -227,7 +227,8 @@
   (assert-eq   :directory
       (stat-entry-type (example-stat "/")))
   (assert-eq   :file
-      (stat-entry-type (example-stat *remote-test-path*))))
+      (stat-entry-type (example-stat *remote-test-path*)))
+  (assert-equality #'= 0 (stat-size (example-stat "/"))))
 
 (defun example-path-exists (path &optional (root "/"))
   (with-open-ssl-stream (stream