diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-07-03 18:06:52 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-07-03 18:06:52 -0400 |
| commit | 8d4e252a0d4ac2c89805cd2785f79572cdfe7d82 (patch) | |
| tree | b40a8f79d41cd6fe1faebbca7aa44489fbaf0d42 /src/mono_util.sig | |
| parent | b11edd2101e896dd0482715686712b67f00d3099 (diff) | |
Mono optimizations (start with string concat and space eating)
Diffstat (limited to 'src/mono_util.sig')
| -rw-r--r-- | src/mono_util.sig | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/mono_util.sig b/src/mono_util.sig index 750a4d3c..ab851aea 100644 --- a/src/mono_util.sig +++ b/src/mono_util.sig @@ -109,6 +109,11 @@ structure File : sig bind : 'typtext * binder -> 'typtext} -> 'typtext -> Mono.file -> Mono.file + val map : {typ : Mono.typ' -> Mono.typ', + exp : Mono.exp' -> Mono.exp', + decl : Mono.decl' -> Mono.decl'} + -> Mono.file -> Mono.file + val fold : {typ : Mono.typ' * 'state -> 'state, exp : Mono.exp' * 'state -> 'state, decl : Mono.decl' * 'state -> 'state} |