X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-simple-streams%2Fclasses.lisp;h=0ad1d44748a52719415060cfcc1993b5a1dd9616;hb=0677c33068646b6ec33d5f622771673f3de38504;hp=1ade55e1f1395c2f6e9a46f39b1d7d03994c0197;hpb=59f1de77587818635573073a14ce80c2d398f56c;p=sbcl.git diff --git a/contrib/sb-simple-streams/classes.lisp b/contrib/sb-simple-streams/classes.lisp index 1ade55e..0ad1d44 100644 --- a/contrib/sb-simple-streams/classes.lisp +++ b/contrib/sb-simple-streams/classes.lisp @@ -10,16 +10,6 @@ ;;; (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 ;;;