diff options
| author | Peter Sewell | 2016-02-25 11:56:53 +0000 |
|---|---|---|
| committer | Peter Sewell | 2016-02-25 11:56:53 +0000 |
| commit | 45c7902a41a8f160900bc6a8ed7c212093e89983 (patch) | |
| tree | 21286c488477181877487a800fea36012364af1e /src/initial_check_full_ast.mli | |
| parent | 835b289f41e5f55b9c365edc920501290d79b667 (diff) | |
| parent | 655d8f0b01b6d7f06c08c9b5d4a3b177d802c609 (diff) | |
Merge branch 'master' of bitbucket.org:Peter_Sewell/l2
Conflicts:
src/Makefile
Diffstat (limited to 'src/initial_check_full_ast.mli')
| -rw-r--r-- | src/initial_check_full_ast.mli | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/initial_check_full_ast.mli b/src/initial_check_full_ast.mli new file mode 100644 index 00000000..57346dcf --- /dev/null +++ b/src/initial_check_full_ast.mli @@ -0,0 +1,10 @@ + +open Ast +open Type_internal + +(*Envs is a tuple of used names (currently unused), map from id to kind, default order for vector types and literal vectors *) +type envs = Nameset.t * kind Envmap.t * Ast.order +type 'a envs_out = 'a * envs + +val to_checked_ast : Nameset.t -> kind Envmap.t -> Ast.order -> tannot defs -> tannot defs * kind Envmap.t * Ast.order +val to_exp : kind Envmap.t -> Ast.order -> exp -> exp |
