[m-rev.] trivial diff: add missing MR_{save,restore}_transient_hp in string.m

[Simon Taylor]

Estimated hours taken: 0.1
Branches: main, release

library/string.m:
	Add missing calls to MR_{save,restore}_transient_hp
	around a call to MR_make_string.

Index: string.m
===================================================================
RCS file: /home/mercury1/repository/mercury/library/string.m,v
retrieving revision 1.202
diff -u -u -r1.202 string.m
--- string.m	29 May 2003 12:08:25 -0000	1.202
+++ string.m	4 Jun 2003 08:19:13 -0000
@@ -1888,7 +1888,9 @@
 	native_format_string(FormatStr::in, Val::in) = (Str::out),
 	[will_not_call_mercury, promise_pure, thread_safe],
 "{
+	MR_save_transient_hp();
 	Str = MR_make_string(MR_PROC_LABEL, FormatStr, Val);
+	MR_restore_transient_hp();
 }").
 
 	% Create a string from a char using the format string.
--------------------------------------------------------------------------
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
--------------------------------------------------------------------------