Raw constructor for token-p structures.
Syntax:
(token type text)
This is the lowest-level constructor for token-p structures. It simply conses together a structure with the specified fields.
Note: It's generally better to use macros like make-token or change-token instead. These macros lead to more readable and robust code, because you don't have to remember the order of the fields.
The token-p structures we create here are just constructed with ordinary cons. If you want to create honsed structures, see honsed-token instead.
This is an ordinary constructor function introduced by defaggregate.
Function:
(defun token (type text) (declare (xargs :guard (and (tokentype-p type) (stringp text)))) (cons type text))