0.8.9.44:

[sbcl.git] / src / code / unix.lisp

diff --git a/src/code/unix.lisp b/src/code/unix.lisp
index 74f98be..b0e1811 100644 (file)
--- a/src/code/unix.lisp
+++ b/src/code/unix.lisp
@@ -390,12 +390,6 @@
             (cast buf c-string)
             (cast buf (* char)) 256)))
 
-;;; Write the core image of the file described by FD to disk.
-(defun unix-fsync (fd)
-  (declare (type unix-fd fd))
-  (void-syscall ("fsync" int) fd))
-\f
-
 (defun unix-setsid ()
   (int-syscall ("setsid")))