X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=contrib%2Fsb-posix%2Fposix-tests.lisp;h=ee7399b3c94520d887903fca6da309a8b2b0f804;hb=148ae852a476ec673020ecbf99be3bcb4a70eafc;hp=cb382a36103b4c7b3dd6120b58af6e9c7e0c18c0;hpb=4898ef32c639b1c7f4ee13a5ba566ce6debd03e6;p=sbcl.git

diff --git a/contrib/sb-posix/posix-tests.lisp b/contrib/sb-posix/posix-tests.lisp
index cb382a3..ee7399b 100644
--- a/contrib/sb-posix/posix-tests.lisp
+++ b/contrib/sb-posix/posix-tests.lisp
@@ -387,3 +387,13 @@
                finally (return t)))
       (sb-posix:closedir dir)))
   t)
+
+(deftest pwent.1
+  ;; make sure that we found something
+  (not (sb-posix:getpwuid 0))
+  nil)
+
+(deftest pwent.2
+  ;; make sure that we found something
+  (not (sb-posix:getpwnam "root"))
+  nil)