diff: fix warnings in mercury_trace_external.c

[Fergus Henderson]

trace/mercury_trace_external.c:
	Add some casts and #includes to fix some compiler warnings.

Index: trace/mercury_trace_external.c
===================================================================
RCS file: /home/staff/zs/imp/mercury/trace/mercury_trace_external.c,v
retrieving revision 1.13
diff -u -r1.13 mercury_trace_external.c
--- mercury_trace_external.c	1999/03/11 19:18:11	1.13
+++ mercury_trace_external.c	1999/03/21 18:12:02
@@ -27,6 +27,10 @@
 #include "mercury_trace_external.h"
 #include "mercury_trace_util.h"
 #include "mercury_layout_util.h"
+
+#include "debugger_interface.h"
+#include "std_util.h"
+
 #include <stdio.h>
 #include <errno.h>
 #include <stdarg.h>
@@ -363,7 +367,7 @@
 	Word		var;
 	Code		*jumpaddr = NULL;
 	MR_Event_Details	event_details;
-	char		*message;
+	const char	*message;
         bool		include_trace_data = TRUE;
 	const MR_Stack_Layout_Label *layout = event_info->MR_event_sll;
 	Unsigned	seqno = event_info->MR_call_seqno;
@@ -562,9 +566,13 @@
 			seqno,
 			depth,
 			port,
+			(String)
 			layout->MR_sll_entry->MR_sle_comp.MR_comp_type_name,
+			(String)
 			layout->MR_sll_entry->MR_sle_comp.MR_comp_type_module,
+			(String)
 			layout->MR_sll_entry->MR_sle_comp.MR_comp_def_module,
+			(String)
 			layout->MR_sll_entry->MR_sle_comp.MR_comp_pred_name,
 			layout->MR_sll_entry->MR_sle_comp.MR_comp_arity,
 			layout->MR_sll_entry->MR_sle_comp.MR_comp_mode,
@@ -580,8 +588,11 @@
 			depth,
 			port,
 			layout->MR_sll_entry->MR_sle_user.MR_user_pred_or_func,
+			(String)
 			layout->MR_sll_entry->MR_sle_user.MR_user_decl_module,
+			(String)
 			layout->MR_sll_entry->MR_sle_user.MR_user_def_module,
+			(String)
 			layout->MR_sll_entry->MR_sle_user.MR_user_name,
 			layout->MR_sll_entry->MR_sle_user.MR_user_arity,
 			layout->MR_sll_entry->MR_sle_user.MR_user_mode,
@@ -657,9 +668,13 @@
 			seqno,
 			depth,
 			port,
+			(String)
 			layout->MR_sll_entry->MR_sle_comp.MR_comp_type_name,
+			(String)
 			layout->MR_sll_entry->MR_sle_comp.MR_comp_type_module,
+			(String)
 			layout->MR_sll_entry->MR_sle_comp.MR_comp_def_module,
+			(String)
 			layout->MR_sll_entry->MR_sle_comp.MR_comp_pred_name,
 			layout->MR_sll_entry->MR_sle_comp.MR_comp_arity,
 			layout->MR_sll_entry->MR_sle_comp.MR_comp_mode,
@@ -676,14 +691,17 @@
 			depth,
 			port,
 			layout->MR_sll_entry->MR_sle_user.MR_user_pred_or_func,
+			(String)
 			layout->MR_sll_entry->MR_sle_user.MR_user_decl_module,
+			(String)
 			layout->MR_sll_entry->MR_sle_user.MR_user_def_module,
+			(String)
 			layout->MR_sll_entry->MR_sle_user.MR_user_name,
 			layout->MR_sll_entry->MR_sle_user.MR_user_arity,
 			layout->MR_sll_entry->MR_sle_user.MR_user_mode,
 			layout->MR_sll_entry->MR_sle_detism,
 			arguments,
-			(String) (Word) path,
+			(String) path,
 			search_data);
 		    );
 	}

-- 
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.