added renaming of PImplArg

This commit is contained in:
Krasimir Angelov
2026-02-12 22:21:06 +01:00
parent 5a2e80e687
commit 14b4e82067
+4
View File
@@ -340,6 +340,10 @@ renamePattern env patt =
(p',vs) <- renp p
return (PAs x p', x:vs)
PImplArg p -> do
(p,vs) <- renp p
return (PImplArg p, vs)
_ -> return (patt,[])
renid = renameIdentTerm env