0.6.10.21:
[sbcl.git] / src / compiler / backend.lisp
index ef13dc7..0752e42 100644 (file)
 
 (defun backend-byte-fasl-file-implementation ()
   *backend-byte-order*)
-
-(defun backend-byte-fasl-file-type ()
-  (ecase *backend-byte-order*
-    (:big-endian "bytef")
-    (:little-endian "lbytef")))