mirror of
https://github.com/c-cube/sidekick.git
synced 2026-01-23 18:06:41 -05:00
22 lines
489 B
OCaml
22 lines
489 B
OCaml
|
|
open Base_types
|
|
|
|
type view = cst_view
|
|
type t = cst
|
|
|
|
val id : t -> ID.t
|
|
val view : t -> view
|
|
val equal : t -> t -> bool
|
|
val compare : t -> t -> int
|
|
val hash : t -> int
|
|
val as_undefined : t -> (t * Ty.Fun.t) option
|
|
val as_undefined_exn : t -> t * Ty.Fun.t
|
|
val is_undefined : t -> bool
|
|
|
|
val do_cc : t -> bool
|
|
val mk_undef : ID.t -> Ty.Fun.t -> t
|
|
val mk_undef_const : ID.t -> Ty.t -> t
|
|
|
|
val pp : t Fmt.printer
|
|
module Map : CCMap.S with type key = t
|
|
module Tbl : CCHashtbl.S with type key = t
|