Module Reductionops.ReductionBehaviour

Machinery to customize the behavior of the reduction

type t =
| NeverUnfold
| UnfoldWhen of when_flags
| UnfoldWhenNoMatch of when_flags
and when_flags = {
recargs : int list;
nargs : int option;
}
val set : local:bool -> Names.Constant.t -> t -> unit
val get : Names.Constant.t -> t option
val all_never_unfold : unit -> Names.Cpred.t
val print : Names.Constant.t -> Pp.t