Module `Portability.Const`

type t =

include Ocaml_typing.Mode_intf.Const
  with type t := Ocaml_typing.Mode.Portability.Const.t

include Ocaml_typing.Mode_intf.Lattice
  with type t := Ocaml_typing.Mode.Portability.Const.t

val min : Ocaml_typing.Mode.Portability.Const.t

val max : Ocaml_typing.Mode.Portability.Const.t

val le : 
  Ocaml_typing.Mode.Portability.Const.t ->
  Ocaml_typing.Mode.Portability.Const.t ->
  bool

val equal : 
  Ocaml_typing.Mode.Portability.Const.t ->
  Ocaml_typing.Mode.Portability.Const.t ->
  bool

equal a b is equivalent to le a b && le b a, but defined separately for performance reasons

val join : 
  Ocaml_typing.Mode.Portability.Const.t ->
  Ocaml_typing.Mode.Portability.Const.t ->
  Ocaml_typing.Mode.Portability.Const.t

val meet : 
  Ocaml_typing.Mode.Portability.Const.t ->
  Ocaml_typing.Mode.Portability.Const.t ->
  Ocaml_typing.Mode.Portability.Const.t

val print : 
  Stdlib.Format.formatter ->
  Ocaml_typing.Mode.Portability.Const.t ->
  unit

val legacy : Ocaml_typing.Mode.Portability.Const.t

Module Portability.Const