diff options
Diffstat (limited to 'src/ast_util.mli')
| -rw-r--r-- | src/ast_util.mli | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/ast_util.mli b/src/ast_util.mli index ae340839..b0ccb7b8 100644 --- a/src/ast_util.mli +++ b/src/ast_util.mli @@ -46,6 +46,10 @@ open Ast val mk_nc : n_constraint_aux -> n_constraint val mk_nexp : nexp_aux -> nexp +val mk_exp : unit exp_aux -> unit exp +val mk_lit : lit_aux -> lit + +val unaux_exp : 'a exp -> 'a exp_aux (* Functions to map over the annotations in sub-expressions *) val map_exp_annot : ('a annot -> 'b annot) -> 'a exp -> 'b exp @@ -86,6 +90,8 @@ val string_of_index_range : index_range -> string val id_of_fundef : 'a fundef -> id +val id_of_kid : kid -> id + module Id : sig type t = id val compare : id -> id -> int |