trivial diff: fix warning

Fergus Henderson fjh at cs.mu.oz.au
Fri Dec 19 02:54:14 AEDT 1997


library/mercury_builtin.m:
	Fix a warning: in the definition of copy/2,
	cast the 2nd argument of deep_copy() to the right type.

Index: mercury_builtin.m
===================================================================
RCS file: /home/staff/zs/imp/mercury/library/mercury_builtin.m,v
retrieving revision 1.86
diff -u -u -r1.86 mercury_builtin.m
--- mercury_builtin.m	1997/12/03 07:05:08	1.86
+++ mercury_builtin.m	1997/12/18 15:52:52
@@ -743,7 +743,7 @@
 	value = r2;
 
 	save_transient_registers();
-	copy = deep_copy(value, type_info, NULL, NULL);
+	copy = deep_copy(value, (Word *) type_info, NULL, NULL);
 	restore_transient_registers();
 
 #ifdef	COMPACT_ARGS

-- 
Fergus Henderson <fjh at cs.mu.oz.au>   |  "I have always known that the pursuit
WWW: <http://www.cs.mu.oz.au/~fjh>   |  of excellence is a lethal habit"
PGP: finger fjh at 128.250.37.3         |     -- the last words of T. S. Garp.



More information about the developers mailing list