1 files changed, 0 insertions, 12 deletions
diff --git a/third_party/lisp/mime4cl/ex-sclf.lisp b/third_party/lisp/mime4cl/ex-sclf.lisp
index 8b71a2f2c6c9..e6246c1499f4 100644
--- a/third_party/lisp/mime4cl/ex-sclf.lisp
+++ b/third_party/lisp/mime4cl/ex-sclf.lisp
@@ -63,8 +63,6 @@
    #:save-file-excursion
    #:read-file
 
-   #:file-size
-
    #:promise
    #:make-promise
    #:lazy
@@ -267,16 +265,6 @@ ELEMENT-TYPE."
           seq)
         default)))
 
-;; FILES
-
-;; FILE-LENGTH is a bit idiosyncratic in this respect.  Besides, Unix
-;; allows to get to know the file size without being able to open a
-;; file; just ask politely.
-(defun file-size (pathname)
-  #+sbcl (sb-posix:stat-size (sb-posix:stat pathname))
-  #+ccl (ccl:file-data-size pathname)
-  #-(or sbcl ccl) (error "nyi"))
-
 ;; LAZY
 
 (defstruct promise