mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-06 11:15:43 -05:00
feat: reexport type state
This commit is contained in:
parent
0aa13ca808
commit
fd8b598650
2 changed files with 2 additions and 0 deletions
|
|
@ -659,6 +659,7 @@ module type SOLVER = sig
|
||||||
|
|
||||||
val stats : t -> Stat.t
|
val stats : t -> Stat.t
|
||||||
val tst : t -> T.Term.state
|
val tst : t -> T.Term.state
|
||||||
|
val ty_st : t -> T.Ty.state
|
||||||
|
|
||||||
val create :
|
val create :
|
||||||
?stat:Stat.t ->
|
?stat:Stat.t ->
|
||||||
|
|
|
||||||
|
|
@ -498,6 +498,7 @@ module Make(A : ARG)
|
||||||
let[@inline] cc self = Solver_internal.cc self.si
|
let[@inline] cc self = Solver_internal.cc self.si
|
||||||
let[@inline] stats self = self.stat
|
let[@inline] stats self = self.stat
|
||||||
let[@inline] tst self = Solver_internal.tst self.si
|
let[@inline] tst self = Solver_internal.tst self.si
|
||||||
|
let[@inline] ty_st self = Solver_internal.ty_st self.si
|
||||||
|
|
||||||
let[@inline] mk_atom_lit_ self lit : Atom.t = Sat_solver.make_atom self.solver lit
|
let[@inline] mk_atom_lit_ self lit : Atom.t = Sat_solver.make_atom self.solver lit
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue