module DatatypeSlevel:Datatype.Make
(
sig
include Datatype.Undefinedtypet =
Per_stmt_slevel.slevel
val reprs :Per_stmt_slevel.slevel list
val name :string
val mem_project :(Project_skeleton.t -> bool) -> 'a -> bool
end
)
include Datatype.S_no_copy
val copy : Datatype.t -> Datatype.t
x
and copy x
.