[m-rev.] trivial diff: add a missing promise_pure

[Simon Taylor]

Estimated hours taken: 0.1

deep_profiler/array_util.m:
	Add a missing `promise_pure' on a `:- pragma foreign_proc'.

Index: array_util.m
===================================================================
RCS file: /home/mercury1/repository/mercury/deep_profiler/array_util.m,v
retrieving revision 1.3
diff -u -u -r1.3 array_util.m
--- array_util.m	3 Jul 2001 08:16:17 -0000	1.3
+++ array_util.m	31 Jan 2002 02:42:49 -0000
@@ -106,7 +106,7 @@
 :- import_module int, string.
 
 :- pragma foreign_proc("C", u(A::in) = (B::array_uo),
-	[will_not_call_mercury, thread_safe],
+	[will_not_call_mercury, thread_safe, promise_pure],
 	"B = A;"
 ).
 
--------------------------------------------------------------------------
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
--------------------------------------------------------------------------