Module Reductionops.ReductionBehaviour

Machinery to customize the behavior of the reduction

type t =
  1. | NeverUnfold
  2. | UnfoldWhen of when_flags
  3. | UnfoldWhenNoMatch of when_flags
and when_flags = {
  1. recargs : int list;
  2. nargs : int option;
}
module Db : sig ... end
val set : local:bool -> Names.Constant.t -> t option -> unit
val get_from_db : Db.t -> Names.Constant.t -> t option
val get : Names.Constant.t -> t option
val print : Names.Constant.t -> Pp.t