diff options
| author | Thomas Bauereiss | 2017-07-18 17:08:45 +0100 |
|---|---|---|
| committer | Thomas Bauereiss | 2017-07-18 17:10:56 +0100 |
| commit | a19a44469d07d5669db0691edd196b538d2cad17 (patch) | |
| tree | 09445de72c150aed898bf0f94fee79efa295d0ee /src/ast_util.mli | |
| parent | 4292253f88774f343b6643f36ec7d3cb3abd0529 (diff) | |
Add Lem pretty-printer for new typechecker
Diffstat (limited to 'src/ast_util.mli')
| -rw-r--r-- | src/ast_util.mli | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/src/ast_util.mli b/src/ast_util.mli index 9d6c5653..8902c39c 100644 --- a/src/ast_util.mli +++ b/src/ast_util.mli @@ -10,6 +10,7 @@ (* Christopher Pulte *) (* Peter Sewell *) (* Alasdair Armstrong *) +(* Thomas Bauereiss *) (* *) (* All rights reserved. *) (* *) @@ -94,3 +95,15 @@ module BE : sig type t = base_effect val compare : base_effect -> base_effect -> int end + +val is_number : typ -> bool +val is_vector_typ : typ -> bool +val is_bit_typ : typ -> bool +val is_bitvector_typ : typ -> bool + +val typ_app_args_of : typ -> string * typ_arg_aux list * Ast.l +val vector_typ_args_of : typ -> nexp * nexp * order * typ + +val is_order_inc : order -> bool + +val has_effect : effect -> base_effect_aux -> bool |
