Raw constructor for honsed glcp-obj-ctrex-p structures.
Syntax:
(honsed-glcp-obj-ctrex descrip genv obj-alist dont-care-spec)
This is identical to glcp-obj-ctrex, except that we hons the structure we are creating.
This is an ordinary honsing constructor introduced by std::defaggregate.
Function:
(defun honsed-glcp-obj-ctrex (descrip genv obj-alist dont-care-spec) (declare (xargs :guard (and))) (mbe :logic (glcp-obj-ctrex descrip genv obj-alist dont-care-spec) :exec (hons (hons descrip genv) (hons obj-alist dont-care-spec))))