		Search-engine friendly clone of the ACL2 documentation.

Specialize

Specialize-extdecl-list

Transform a list of external declarations.

Signature
(specialize-extdecl-list extdecls target-fn target-param const) → new-extdecls
Arguments: extdecls — Guard (extdecl-listp extdecls).; target-fn — Guard (identp target-fn).; target-param — Guard (identp target-param).; const — Guard (exprp const).
Returns: new-extdecls — Type (extdecl-listp new-extdecls).

Definitions and Theorems

Function: specialize-extdecl-list

(defun specialize-extdecl-list
       (extdecls target-fn target-param const)
 (declare (xargs :guard (and (extdecl-listp extdecls)
                             (identp target-fn)
                             (identp target-param)
                             (exprp const))))
 (let ((__function__ 'specialize-extdecl-list))
  (declare (ignorable __function__))
  (b* (((when (endp extdecls)) nil)
       ((mv found extdecl)
        (specialize-extdecl (first extdecls)
                            target-fn target-param const)))
   (cons
       extdecl
       (if found (extdecl-list-fix (rest extdecls))
         (specialize-extdecl-list (rest extdecls)
                                  target-fn target-param const))))))

Theorem: extdecl-listp-of-specialize-extdecl-list

(defthm extdecl-listp-of-specialize-extdecl-list
  (b* ((new-extdecls (specialize-extdecl-list
                          extdecls target-fn target-param const)))
    (extdecl-listp new-extdecls))
  :rule-classes :rewrite)