summaryrefslogtreecommitdiff
path: root/src/specialize.mli
diff options
context:
space:
mode:
authorBrian Campbell2019-01-29 18:46:58 +0000
committerBrian Campbell2019-01-29 18:46:58 +0000
commit36fd3c158c08af5b48d9801a607f3be812d2ecc7 (patch)
tree64dcabf7f53d55471da4a8534f36531798693a04 /src/specialize.mli
parent29ce01be165b8ed46cb2f8edacfc91b653efb869 (diff)
Add an option to crudely slice a function out of a Sail model
Not ideal because it keeps everything that's not a function, but good enough for quick tests extracted from arm.
Diffstat (limited to 'src/specialize.mli')
-rw-r--r--src/specialize.mli3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/specialize.mli b/src/specialize.mli
index f2c94a48..28029747 100644
--- a/src/specialize.mli
+++ b/src/specialize.mli
@@ -71,3 +71,6 @@ val specialize : tannot defs -> Env.t -> tannot defs * Env.t
val instantiations_of : id -> tannot defs -> typ_arg KBindings.t list
val string_of_instantiation : typ_arg KBindings.t -> string
+
+(* Remove all function definitions except for the given set *)
+val slice_defs : Env.t -> tannot defs -> IdSet.t -> tannot defs