[m-dev.] diff: print pred_id of proc

[Peter Ross]

Hi,


===================================================================


Estimated hours taken: 0.2

compiler/hlds_out.m:
    Print the pred_id of every procedure.


Index: hlds_out.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/hlds_out.m,v
retrieving revision 1.239
diff -u -r1.239 hlds_out.m
--- hlds_out.m	2000/07/25 08:50:45	1.239
+++ hlds_out.m	2000/07/27 08:52:11
@@ -2812,6 +2812,11 @@
 	{ Indent1 is Indent + 1 },
 
 	hlds_out__write_indent(Indent1),
+	io__write_string("% pred id "),
+	{ pred_id_to_int(PredId, PredInt) },
+	io__write_int(PredInt),
+	io__nl,
+	hlds_out__write_indent(Indent1),
 	io__write_string("% mode number "),
 	{ proc_id_to_int(ProcId, ProcInt) },
 	io__write_int(ProcInt),

--------------------------------------------------------------------------
mercury-developers mailing list
Post messages to:       mercury-developers at cs.mu.oz.au
Administrative Queries: owner-mercury-developers at cs.mu.oz.au
Subscriptions:          mercury-developers-request at cs.mu.oz.au
--------------------------------------------------------------------------