X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=contrib%2Fsb-posix%2Finterface.lisp;h=8b8d2b4ab6d14272b81c9ef6183ac8b546d1005a;hb=6cb4f9ea3f4e35a5a8e75922833e14575ae92180;hp=2569a723731b1992a11b486efe7286724ac74acf;hpb=3eb0a28fe6a7912d6ff2b97221325c0e3bfc5703;p=sbcl.git diff --git a/contrib/sb-posix/interface.lisp b/contrib/sb-posix/interface.lisp index 2569a72..8b8d2b4 100644 --- a/contrib/sb-posix/interface.lisp +++ b/contrib/sb-posix/interface.lisp @@ -169,7 +169,7 @@ (define-call "setfsuid" int minusp (uid uid-t)) (define-call "setreuid" int minusp (ruid uid-t) (euid uid-t)) (define-call "setresuid" int minusp (ruid uid-t) (euid uid-t) (suid uid-t)) - (define-call "setuid" int minusp (uid uid-t)) + (define-call "setuid" int minusp (uid uid-t)) (define-call "getegid" gid-t never-fails) (define-call "getgid" gid-t never-fails) (define-call "getresgid" gid-t never-fails)