diff options
| author | Alasdair Armstrong | 2019-03-27 19:21:24 +0000 |
|---|---|---|
| committer | Alasdair Armstrong | 2019-03-27 19:30:43 +0000 |
| commit | 989c7f8ab0bf908d0cd26b58c542d264c63b72fe (patch) | |
| tree | a29829bf822ad5ad1ab51e16a36a88961a231f1c /src/slice.mli | |
| parent | 368168f2254d9e4de0c3fac599855e0cf5a0afaa (diff) | |
C: Generate C from sliced specifications
Diffstat (limited to 'src/slice.mli')
| -rw-r--r-- | src/slice.mli | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/slice.mli b/src/slice.mli index 0eefd087..04f140fe 100644 --- a/src/slice.mli +++ b/src/slice.mli @@ -49,6 +49,7 @@ (**************************************************************************) open Ast +open Ast_util type node = | Register of id @@ -67,4 +68,4 @@ val graph_of_ast : Type_check.tannot defs -> Graph.Make(Node).graph val dot_of_ast : out_channel -> Type_check.tannot defs -> unit -val filter_ast : Graph.Make(Node).graph -> Type_check.tannot defs -> Type_check.tannot defs +val filter_ast : IdSet.t -> Graph.Make(Node).graph -> Type_check.tannot defs -> Type_check.tannot defs |