diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2009-10-25 14:07:10 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2009-10-25 14:07:10 -0400 |
| commit | 5a88b41a6655f601c989ae94ce1fc8bb391ca630 (patch) | |
| tree | 95685ca6f24d0e3511588ae55bbdd8a121f97994 /src/compiler.sml | |
| parent | 31da370dd5fae72ddf756aa5ef54241b099fd617 (diff) | |
RPC uses VM support for call/cc
Diffstat (limited to 'src/compiler.sml')
| -rw-r--r-- | src/compiler.sml | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/src/compiler.sml b/src/compiler.sml index b1939356..6fd107a7 100644 --- a/src/compiler.sml +++ b/src/compiler.sml @@ -779,14 +779,7 @@ val toShake3 = transform shake "shake3" o toSpecialize val toEspecialize = transform especialize "especialize" o toShake3 -val tailify = { - func = Tailify.frob, - print = CorePrint.p_file CoreEnv.empty -} - -val toTailify = transform tailify "tailify" o toEspecialize - -val toReduce2 = transform reduce "reduce2" o toTailify +val toReduce2 = transform reduce "reduce2" o toEspecialize val toShake4 = transform shake "shake4" o toReduce2 |