Author: dgilmore
Date: 2010-12-09 18:55:41 -0500 (Thu, 09 Dec 2010)
New Revision: 3430
Modified:
trunk/osprey/common/com/config.cxx
trunk/osprey/common/com/config.h
trunk/osprey/common/com/ir_reader.cxx
trunk/osprey/ipa/main/analyze/ipa_option.cxx
Log:
Enable DevWarn messages, and enable the generating ID/address
information in WHIRL trace output when the appropriate flags were
passed to ipa_link (eg -Wj,-tt3:0x240).
Added file table index information in the dump of the SRCPOS record of
WHIRL statement nodes.
Approved by Sun (with a small tweak suggested by Michael Lai).
Modified: trunk/osprey/common/com/config.cxx
===================================================================
--- trunk/osprey/common/com/config.cxx 2010-12-09 21:59:08 UTC (rev 3429)
+++ trunk/osprey/common/com/config.cxx 2010-12-09 23:55:41 UTC (rev 3430)
@@ -1321,6 +1321,31 @@
Vcast_Complex = TRUE;
#endif
}
+
+/* ====================================================================
+ *
+ * Configure_IPA
+ *
+ * Configure IPA options based on flag values.
+ *
+ * ====================================================================
+ */
+
+void
+Configure_IPA (void)
+{
+ if ( Get_Trace( TP_MISC, 0x40 ) && ! DevWarn_Enabled()) {
+ DevWarn_Toggle();
+ }
+
+ if ( Get_Trace( TP_MISC, 0x200 ) ) {
+ IR_dump_wn_addr = TRUE;
+ }
+ if ( Get_Trace( TP_MISC, 0x400 ) ) {
+ IR_dump_wn_id = TRUE;
+ }
+}
+
/* ====================================================================
*
Modified: trunk/osprey/common/com/config.h
===================================================================
--- trunk/osprey/common/com/config.h 2010-12-09 21:59:08 UTC (rev 3429)
+++ trunk/osprey/common/com/config.h 2010-12-09 23:55:41 UTC (rev 3430)
@@ -872,6 +872,9 @@
/***** Perform configuration functions after flag processing *****/
extern void Configure (void);
+/***** Perform configuration functions after flag processing for IPA *****/
+extern void Configure_IPA (void);
+
/***** Perform configuration functions for each source file *****/
extern void Configure_Source ( char *filename );
Modified: trunk/osprey/common/com/ir_reader.cxx
===================================================================
--- trunk/osprey/common/com/ir_reader.cxx 2010-12-09 21:59:08 UTC (rev
3429)
+++ trunk/osprey/common/com/ir_reader.cxx 2010-12-09 23:55:41 UTC (rev
3430)
@@ -1289,7 +1289,7 @@
USRCPOS srcpos;
USRCPOS_srcpos(srcpos) = WN_Get_Linenum(wn);
- fprintf(ir_ofile, " {line: %d}", USRCPOS_linenum(srcpos));
+ fprintf(ir_ofile, " {line: %d/%d}", USRCPOS_filenum(srcpos),
USRCPOS_linenum(srcpos));
}
#ifdef BACK_END
@@ -2947,6 +2947,8 @@
USRCPOS_srcpos(srcpos) = WN_Get_Linenum(wn);
ss << " {line: ";
+ ss << USRCPOS_filenum(srcpos);
+ ss << "/";
ss << USRCPOS_linenum(srcpos);
ss << "}";
}
Modified: trunk/osprey/ipa/main/analyze/ipa_option.cxx
===================================================================
--- trunk/osprey/ipa/main/analyze/ipa_option.cxx 2010-12-09 21:59:08 UTC
(rev 3429)
+++ trunk/osprey/ipa/main/analyze/ipa_option.cxx 2010-12-09 23:55:41 UTC
(rev 3430)
@@ -164,6 +164,8 @@
}
}
+ Configure_IPA();
+
if (LNO_Prompl)
ProMP_Listing = TRUE;
------------------------------------------------------------------------------
_______________________________________________
Open64-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/open64-devel