## Macro: COMMON-LISP:DEFSTRUCT
[![package](https://img.shields.io/badge/Package-COMMON--LISP-5f9ea0.svg?style=social&colorA=999999)](../) [![type](https://img.shields.io/badge/Type-Macro-5f9ea0.svg?style=social&colorA=999999)](../#macro) [![clhs](https://img.shields.io/badge/CLHS-DEFSTRUCT-5f9ea0.svg?style=social&colorA=999999)](http://www.lispworks.com/documentation/HyperSpec/Body/m_defstr.htm) 

> DEFSTRUCT {Name | (Name Option*)} [Documentation] {Slot | (Slot [Default] {Key Value}*)}
> Define the structure type Name. Instances are created by MAKE-<name>,
> which takes &KEY arguments allowing initial slot values to the specified.
> A SETF'able function <name>-<slot> is defined for each slot to read and
> write slot values. <name>-p is a type predicate.
> 
> Popular DEFSTRUCT options (see manual for others):
> 
> (:CONSTRUCTOR Name)
> (:PREDICATE Name)
> Specify the name for the constructor or predicate.
> 
> (:CONSTRUCTOR Name Lambda-List)
> Specify the name and arguments for a BOA constructor
> (which is more efficient when keyword syntax isn't necessary.)
> 
> (:INCLUDE Supertype Slot-Spec*)
> Make this type a subtype of the structure type Supertype. The optional
> Slot-Specs override inherited slot options.
> 
> Slot options:
> 
> :TYPE Type-Spec
> Asserts that the value of this slot is always of the specified type.
> 
> :READ-ONLY {T | NIL}
> If true, no setter function is defined for this slot.

### Lambda list
```cl
(sb-kernel::name-and-options &rest sb-kernel::slot-descriptions)
```