X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-posix%2Fposix-tests.lisp;h=9f74b5127f1adeb376c52d4b30c2174e16e7988c;hb=0b85642df140fabd8f0a91c85edff0543dc359b1;hp=25477283e483c76fa507f2782ab672981e388dec;hpb=015dc5f920a57c2e502eef3f54d91ac8fe225747;p=sbcl.git diff --git a/contrib/sb-posix/posix-tests.lisp b/contrib/sb-posix/posix-tests.lisp index 2547728..9f74b51 100644 --- a/contrib/sb-posix/posix-tests.lisp +++ b/contrib/sb-posix/posix-tests.lisp @@ -466,6 +466,18 @@ (not (sb-posix:getpwnam "root")) nil) +#-win32 +(deftest grent.1 + ;; make sure that we found something + (not (sb-posix:getgrgid 0)) + nil) + +#-win32 +(deftest grent.2 + ;; make sure that we found something + (not (sb-posix:getgrnam "wheel")) + nil) + #+nil ;; Requires root or special group + plus a sensible thing on the port (deftest cfget/setispeed.1