(in-package "SB!KERNEL")
+(/show0 "code/alien-type.lisp 16")
+
(!begin-collecting-cold-init-forms)
(defstruct (alien-type-type
(:include ctype
(class-info (type-class-or-lose 'alien)))
- (:constructor %make-alien-type-type (alien-type)))
+ (:constructor %make-alien-type-type (alien-type))
+ (:copier nil))
(alien-type nil :type alien-type))
(!define-type-class alien)
*universal-type*))
(!defun-from-collected-cold-init-forms !alien-type-cold-init)
+
+(/show0 "code/alien-type.lisp end of file")