simon/sidekick
1
0
Fork 0
mirror of https://github.com/c-cube/sidekick.git synced 2025-12-06 11:15:43 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

core: re-export Const.t properly

Browse source
This commit is contained in:
Simon Cruanes 2022-08-05 21:56:23 -04:00
parent 24e79df776
commit a7e7b38d1b
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
2 changed files with 1 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/core-logic/const.mli
View file

@ -4,7 +4,6 @@
open Types_ open Types_
type t = const
type view = const_view = .. type view = const_view = ..
module type DYN_OPS = sig module type DYN_OPS = sig
@ -14,6 +13,7 @@ module type DYN_OPS = sig
end end
type ops = (module DYN_OPS) type ops = (module DYN_OPS)
type t = const = { c_view: view; c_ops: ops; c_ty: term }
val view : t -> view val view : t -> view
val make : view -> ops -> ty:term -> t val make : view -> ops -> ty:term -> t

3
src/core-logic/sidekick_core_logic.ml
View file

@ -4,9 +4,6 @@ module Bvar = Bvar
module Const = Const module Const = Const
module Subst = Subst module Subst = Subst
module T_builtins = T_builtins module T_builtins = T_builtins
(* *)
module Store = Term.Store module Store = Term.Store
(* TODO: move to separate library? *) (* TODO: move to separate library? *)