diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-08-31 15:32:31 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-08-31 15:32:31 -0400 |
| commit | dcd7b7d304959739432b3e2497491c36f14f2b4f (patch) | |
| tree | bad7181fcc95e17aeb1dbb130a54c7c45d444976 /src/compiler.sig | |
| parent | 959f07d717b29f083b275333b38e40e5b9f78a9d (diff) | |
Avoid unnecessary WHERE clause
Diffstat (limited to 'src/compiler.sig')
| -rw-r--r-- | src/compiler.sig | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/compiler.sig b/src/compiler.sig index 51ec0537..2549b4f1 100644 --- a/src/compiler.sig +++ b/src/compiler.sig @@ -74,9 +74,12 @@ signature COMPILER = sig val toMonoize : (job, Mono.file) transform val toMono_opt1 : (job, Mono.file) transform val toUntangle : (job, Mono.file) transform - val toMono_reduce : (job, Mono.file) transform - val toMono_shake : (job, Mono.file) transform + val toMono_reduce1 : (job, Mono.file) transform + val toMono_shake1 : (job, Mono.file) transform val toMono_opt2 : (job, Mono.file) transform + val toMono_reduce2 : (job, Mono.file) transform + val toMono_opt3 : (job, Mono.file) transform + val toMono_shake2 : (job, Mono.file) transform val toCjrize : (job, Cjr.file) transform end |