Compare commits

...

1 Commits

Author SHA1 Message Date
Leonardo de Moura
4ad71a31ec chore: cleanup
closes #4287
closes #4288
2024-06-18 16:25:30 -07:00
2 changed files with 1 additions and 4 deletions

View File

@@ -2976,7 +2976,7 @@ def MonadExcept.ofExcept [Monad m] [MonadExcept ε m] : Except ε α → m α
export MonadExcept (throw tryCatch ofExcept)
instance (ε : outParam (Type u)) (m : Type v Type w) [MonadExceptOf ε m] : MonadExcept ε m where
instance (ε : Type u) (m : Type v Type w) [MonadExceptOf ε m] : MonadExcept ε m where
throw := throwThe ε
tryCatch := tryCatchThe ε

View File

@@ -194,9 +194,6 @@ def checkSystem : SynthM Unit := do
Core.checkInterrupted
Core.checkMaxHeartbeatsCore "typeclass" `synthInstance.maxHeartbeats ( read).maxHeartbeats
@[inline] def mapMetaM (f : forall {α}, MetaM α MetaM α) {α} : SynthM α SynthM α :=
monadMap @f
instance : Inhabited (SynthM α) where
default := fun _ _ => default