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