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