[m-dev.] [reuse] diff: move creation of transopt file

[Peter Ross]

Hi,


===================================================================


Estimated hours taken: 0.25

mercury_compile.m:
    The transopt files must be created after the structure reuse phase.
    So move the creation of the file to after the middle pass.


Index: mercury_compile.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/mercury_compile.m,v
retrieving revision 1.175.2.2
diff -u -r1.175.2.2 mercury_compile.m
--- mercury_compile.m	2000/09/20 11:16:44	1.175.2.2
+++ mercury_compile.m	2000/09/20 17:59:24
@@ -434,8 +434,6 @@
 	    ; { MakeOptInt = yes } ->
 		% only run up to typechecking when making the .opt file
 	    	[]
-	    ; { MakeTransOptInt = yes } ->
-	    	mercury_compile__output_trans_opt_file(HLDS21)
 	    ;
 		{ module_imports_get_module_name(Module, ModuleName) },
 		mercury_compile__maybe_output_prof_call_graph(HLDS21,
@@ -453,6 +451,8 @@
 				Verbose, MaybeRLFile),
 		    ( { AditiOnly = yes } ->
 		    	[]
+		    ; { MakeTransOptInt = yes } ->
+			mercury_compile__output_trans_opt_file(HLDS50)
 		    ; { HighLevelCode = yes } ->
 			mercury_compile__mlds_backend(HLDS50, MLDS),
 			mercury_compile__mlds_to_high_level_c(MLDS),

--------------------------------------------------------------------------
mercury-developers mailing list
Post messages to:       mercury-developers at cs.mu.oz.au
Administrative Queries: owner-mercury-developers at cs.mu.oz.au
Subscriptions:          mercury-developers-request at cs.mu.oz.au
--------------------------------------------------------------------------