Skip to content
Snippets Groups Projects
Commit 665db747 authored by toy's avatar toy
Browse files

Enable vector-elt-width for all endians, not just non big-endian.

parent bfbb8fd1
No related branches found
No related tags found
No related merge requests found
......@@ -5,7 +5,7 @@
;;; domain.
;;;
(ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/simple-streams/internal.lisp,v 1.4 2003/06/26 13:27:43 toy Exp $")
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/simple-streams/internal.lisp,v 1.5 2003/06/27 15:12:47 toy Exp $")
;;;
;;; **********************************************************************
;;;
......@@ -256,7 +256,6 @@
(eval-when (:compile-toplevel)
(push (c::backend-byte-order c::*backend*) *features*))
#-big-endian
(defun vector-elt-width (vector)
;; Return octet-width of vector elements
(etypecase vector
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment