Flag saying whether GCC extensions are enabled or not.
Function:
(defun ienv->gcc (ienv) (declare (xargs :guard (ienvp ienv))) (c::version-gccp (ienv->version ienv)))
Theorem:
(defthm booleanp-of-ienv->gcc (b* ((yes/no (ienv->gcc ienv))) (booleanp yes/no)) :rule-classes :rewrite)
Theorem:
(defthm ienv->gcc-of-ienv-fix-ienv (equal (ienv->gcc (ienv-fix ienv)) (ienv->gcc ienv)))
Theorem:
(defthm ienv->gcc-ienv-equiv-congruence-on-ienv (implies (ienv-equiv ienv ienv-equiv) (equal (ienv->gcc ienv) (ienv->gcc ienv-equiv))) :rule-classes :congruence)