diff options
author | Adam Chlipala <adamc@hcoop.net> | 2009-04-04 12:54:39 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2009-04-04 12:54:39 -0400 |
commit | 8e8c217003dcda28e14b330039062d9bf8463e64 (patch) | |
tree | fffd7969dc6117fb442be22dfcbb86c15df35d0d /src/compiler.sig | |
parent | 0e5d32d1caf9b4267c76193fc787e12ea7691fc8 (diff) |
Fix overzealous Marshalcheck; garbage-collect string-embedded closures when no dyns are active
Diffstat (limited to 'src/compiler.sig')
-rw-r--r-- | src/compiler.sig | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/compiler.sig b/src/compiler.sig index d932c906..94dac67a 100644 --- a/src/compiler.sig +++ b/src/compiler.sig @@ -69,10 +69,10 @@ signature COMPILER = sig val shake : (Core.file, Core.file) phase val rpcify : (Core.file, Core.file) phase val tag : (Core.file, Core.file) phase - val marshalcheck : (Core.file, Core.file) phase val reduce : (Core.file, Core.file) phase val unpoly : (Core.file, Core.file) phase val specialize : (Core.file, Core.file) phase + val marshalcheck : (Core.file, Core.file) phase val monoize : (Core.file, Mono.file) phase val mono_opt : (Mono.file, Mono.file) phase val untangle : (Mono.file, Mono.file) phase @@ -100,11 +100,11 @@ signature COMPILER = sig val toCore_untangle2 : (string, Core.file) transform val toShake2 : (string, Core.file) transform val toTag : (string, Core.file) transform - val toMarshalcheck : (string, Core.file) transform val toReduce : (string, Core.file) transform val toUnpoly : (string, Core.file) transform val toSpecialize : (string, Core.file) transform val toShake3 : (string, Core.file) transform + val toMarshalcheck : (string, Core.file) transform val toMonoize : (string, Mono.file) transform val toMono_opt1 : (string, Mono.file) transform val toUntangle : (string, Mono.file) transform |