		Search-engine friendly clone of the ACL2 documentation.

Following-hids

Vl-flatten-hidexpr

Converts a hierarchical identifier expression into a string like foo.bar[3][4][5].baz.

Signature
(vl-flatten-hidexpr x) → flat-string
Arguments: x — Guard (vl-expr-p x).
Returns: flat-string — Type (stringp flat-string).

Definitions and Theorems

Function: vl-flatten-hidexpr

(defun vl-flatten-hidexpr (x)
  (declare (xargs :guard (vl-expr-p x)))
  (declare (xargs :guard (and (vl-hidexpr-p x)
                              (vl-hidexpr-resolved-p x))))
  (let ((__function__ 'vl-flatten-hidexpr))
    (declare (ignorable __function__))
    (if (vl-hidexpr->endp x)
        (vl-hidname->name x)
      (cat (vl-flatten-hidindex (vl-hidexpr->first x))
           "."
           (vl-flatten-hidexpr (vl-hidexpr->rest x))))))

Theorem: stringp-of-vl-flatten-hidexpr

(defthm stringp-of-vl-flatten-hidexpr
  (b* ((flat-string (vl-flatten-hidexpr x)))
    (stringp flat-string))
  :rule-classes :type-prescription)

Theorem: vl-flatten-hidexpr-of-vl-expr-fix-x

(defthm vl-flatten-hidexpr-of-vl-expr-fix-x
  (equal (vl-flatten-hidexpr (vl-expr-fix x))
         (vl-flatten-hidexpr x)))

Theorem: vl-flatten-hidexpr-vl-expr-equiv-congruence-on-x

(defthm vl-flatten-hidexpr-vl-expr-equiv-congruence-on-x
  (implies (vl-expr-equiv x x-equiv)
           (equal (vl-flatten-hidexpr x)
                  (vl-flatten-hidexpr x-equiv)))
  :rule-classes :congruence)