diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-10-30 16:58:54 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-10-30 16:58:54 -0400 |
| commit | 0e88aba4fcbcf9587c289a555315ec30a112a2f0 (patch) | |
| tree | 2b080558e197d010a6a3f570fb9aa138534d991a /src/core_util.sig | |
| parent | c6f6a629256d7292ae7c18428656eda4130391bd (diff) | |
Especialize
Diffstat (limited to 'src/core_util.sig')
| -rw-r--r-- | src/core_util.sig | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/core_util.sig b/src/core_util.sig index 43750698..2ae75305 100644 --- a/src/core_util.sig +++ b/src/core_util.sig @@ -107,6 +107,11 @@ structure Exp : sig val exists : {kind : Core.kind' -> bool, con : Core.con' -> bool, exp : Core.exp' -> bool} -> Core.exp -> bool + + val foldMap : {kind : Core.kind' * 'state -> Core.kind' * 'state, + con : Core.con' * 'state -> Core.con' * 'state, + exp : Core.exp' * 'state -> Core.exp' * 'state} + -> 'state -> Core.exp -> Core.exp * 'state end structure Decl : sig |