swh:1:snp:ca722f838562be139d7880d2b37d9db111694bf0
Tip revision: f938f3815f806f96b58417a9fb91ad0e5df8f7cc authored by François Dupressoir on 24 March 2022, 15:55:56 UTC
Tighten the ROM bad call results
Tighten the ROM bad call results
Tip revision: f938f38
ecHiPredicates.mli
(* -------------------------------------------------------------------- *)
open EcLocation
open EcSymbols
open EcParsetree
(* -------------------------------------------------------------------- *)
type tperror =
| TPE_Typing of EcTyping.tyerror
| TPE_TyNotClosed
| TPE_DuplicatedConstr of symbol
exception TransPredError of EcLocation.t * EcEnv.env * tperror
val tperror : EcLocation.t -> EcEnv.env -> tperror -> 'a
(* -------------------------------------------------------------------- *)
val trans_preddecl : EcEnv.env -> ppredicate located -> EcDecl.operator