cffi-posix/cffi-dirent

diff --git a/cffi-fcntl.lisp b/cffi-fcntl.lisp
index f3cc80d..aec092e 100644
--- a/cffi-fcntl.lisp
+++ b/cffi-fcntl.lisp
@@ -15,10 +15,10 @@
   (cmd :int)
   (arg :pointer))
 
-(defun fcntl-getfl (fd)
+(defun getfl (fd)
   (c-fcntl fd +f-getfl+))
 
-(defun fcntl-setfl (fd flags)
+(defun setfl (fd flags)
   (c-fcntl/int fd +f-setfl+ flags))
 
 (defcfun ("open" c-open/2) :int
diff --git a/package.lisp b/package.lisp
index da48f7c..b198466 100644
--- a/package.lisp
+++ b/package.lisp
@@ -13,8 +13,8 @@
    #:c-fcntl
    #:c-fcntl/int
    #:c-fcntl/pointer
-   #:fcntl-getfl
-   #:fcntl-setfl
+   #:getfl
+   #:setfl
    #:open
    #:openat
    #:creat