on master help sign in
Substitute default args in elab scripts

Fixes #2209.

commit045320060f2acc2b6ed9f55d32fc69931c65449d authorDavid Raymond Christiansen <david@davidchristiansen.dk> dateWed 29 Apr 2015, 23:04 (11 years ago) parent06a3406
1 file changed+1
src/Idris/AbsSyntax.hs+1
src/Idris/AbsSyntax.hs+1
@@ -2023,6 +2023,7 @@ substMatchShadow n shs tm t = sm shs t where
20232023 sm xs (PHidden x) = PHidden (sm xs x)
20242024 sm xs (PUnifyLog x) = PUnifyLog (sm xs x)
20252025 sm xs (PNoImplicits x) = PNoImplicits (sm xs x)
2026+ sm xs (PRunElab fc script) = PRunElab fc (sm xs script)
20262027 sm xs x = x
20272028
20282029 fullApp (PApp _ (PApp fc f args) xs) = fullApp (PApp fc f (args ++ xs))