(vl-empty-namedb) creates an empty name db.
(vl-empty-namedb) → db
Function:
(defun vl-empty-namedb nil (declare (xargs :guard t)) (let ((__function__ 'vl-empty-namedb)) (declare (ignorable __function__)) (make-vl-namedb :names nil :pmap nil :pset nil)))
Theorem:
(defthm vl-namedb-p-of-vl-empty-namedb (b* ((db (vl-empty-namedb))) (vl-namedb-p db)) :rule-classes :rewrite)
Theorem:
(defthm vl-namedb-allnames-of-vl-empty-namedb (equal (vl-namedb-allnames (vl-empty-namedb)) nil))