[m-rev.] for review: fix mer_std.init

[Simon Taylor]

On 29-Jul-2002, Simon Taylor <stayl at cs.mu.OZ.AU> wrote:
> 
> Estimated hours taken: 1.5
> Branches: main
> 
> Fix the code to add extra initialization functions to library/mer_std.init.

This relative diff addresses Zoltan's verbal review comments.

Simon.

--- compiler/modules.m	2002/07/29 07:35:46	1.1
+++ compiler/modules.m	2002/07/29 07:43:47
@@ -4047,6 +4047,10 @@
 		"\techo > ", InitFileName, "\n"
 	]),
 	list__foldl(append_to_init_list(DepStream, InitFileName), Modules),
+
+	% $(EXTRA_INIT_COMMAND) should expand to a command to
+	% generate extra entries in the `.init' file for a library.
+	% It may expand to the empty string.
 	io__write_string(DepStream, "\t$(EXTRA_INIT_COMMAND) >> "),
 	io__write_string(DepStream, InitFileName),
 	io__write_string(DepStream, "\n"),
--- scripts/Mmake.vars.in	2002/07/29 07:42:05	1.1
+++ scripts/Mmake.vars.in	2002/07/29 07:42:16
@@ -281,6 +281,9 @@
 C2INITARGS	=
 EXTRA_C2INITARGS =
 LIB_C2INITARGS	= $(patsubst %,%.init,$(ALL_EXTRA_LIBRARIES))
+
+# $(EXTRA_INIT_COMMAND) should expand to a command to generate extra entries
+# in the `.init' file for a library. It may expand to the empty string.
 EXTRA_INIT_COMMAND =
 
 # c2init and ml take the same arguments.
--------------------------------------------------------------------------
mercury-reviews mailing list
post:  mercury-reviews at cs.mu.oz.au
administrative address: owner-mercury-reviews at cs.mu.oz.au
unsubscribe: Address: mercury-reviews-request at cs.mu.oz.au Message: unsubscribe
subscribe:   Address: mercury-reviews-request at cs.mu.oz.au Message: subscribe
--------------------------------------------------------------------------