1.0.17.32: faster ADD-METHOD to PRINT-OBJECT
[sbcl.git] / tests / alien.impure.lisp
index c85ee8e..d1ee3e3 100644 (file)
          (error ()
            :ok)))))
 
-;; This used to signal an error on x86 due to primitive type T not having
-;; been compatible with ANY-REG. (On x86 and -64 ANY-REG is fine.)
-(sb-alien:with-alien ((buf (array (sb-alien:signed 8) 16))))
-
 ;;; success