diff options
Diffstat (limited to 'src/mono_util.sig')
-rw-r--r-- | src/mono_util.sig | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/mono_util.sig b/src/mono_util.sig index 2a96211a..06290e7d 100644 --- a/src/mono_util.sig +++ b/src/mono_util.sig @@ -72,6 +72,10 @@ structure Exp : sig val exists : {typ : Mono.typ' -> bool, exp : Mono.exp' -> bool} -> Mono.exp -> bool + val existsB : {typ : Mono.typ' -> bool, + exp : 'context * Mono.exp' -> bool, + bind : 'context * binder -> 'context} -> 'context -> Mono.exp -> bool + val foldB : {typ : Mono.typ' * 'state -> 'state, exp : 'context * Mono.exp' * 'state -> 'state, bind : 'context * binder -> 'context} |