[ cleanup ] Remove unused expression

This commit is contained in:
Denis Buzdalov 2022-06-03 13:25:06 +03:00 committed by G. Allais
parent bdf3833df5
commit e590014fb7

View File

@ -234,7 +234,6 @@ checkRunElab rig elabinfo nest env fc script exp
unless (isExtension ElabReflection defs) $
throw (GenericMsg fc "%language ElabReflection not enabled")
let n = NS reflectionNS (UN $ Basic "Elab")
let ttn = reflectiontt "TT"
elabtt <- appCon fc defs n [expected]
(stm, sty) <- runDelays (const True) $
check rig elabinfo nest env script (Just (gnf env elabtt))