Transform a translation unit ensemble.
(specialize-transunit-ensemble tunits target-fn target-param const) → new-tunits
Function:
(defun specialize-transunit-ensemble (tunits target-fn target-param const) (declare (xargs :guard (and (transunit-ensemblep tunits) (identp target-fn) (identp target-param) (exprp const)))) (let ((__function__ 'specialize-transunit-ensemble)) (declare (ignorable __function__)) (b* (((transunit-ensemble tunits) tunits)) (transunit-ensemble (specialize-filepath-transunit-map tunits.unwrap target-fn target-param const)))))
Theorem:
(defthm transunit-ensemblep-of-specialize-transunit-ensemble (b* ((new-tunits (specialize-transunit-ensemble tunits target-fn target-param const))) (transunit-ensemblep new-tunits)) :rule-classes :rewrite)