0.8.0.47
[sbcl.git] / contrib / sb-simple-streams / classes.lisp
index 1ade55e..0ad1d44 100644 (file)
 
 ;;; (pushnew :sb-simple-stream *features*)
 
-(eval-when (:compile-toplevel :load-toplevel :execute)
-  #+(or X86) (pushnew :little-endian *features*))
-
-(eval-when (:compile-toplevel :load-toplevel :execute)
-  #-little-endian (pushnew :big-endian *features*))
-
-(eval-when (:compile-toplevel :load-toplevel :execute)
-  #-(or big-endian little-endian) (error "Unsupported architecture"))
-
-
 ;;;
 ;;; TYPES FOR BUFFER AND STRATEGY FUNCTIONS
 ;;;