|
From: <sv...@va...> - 2005-12-29 17:46:08
|
Author: sewardj
Date: 2005-12-29 17:46:04 +0000 (Thu, 29 Dec 2005)
New Revision: 5459
Log:
preferSym: prefer PMPI_Foo over MPI_Foo as the latter are invariably weak=
syms.
Modified:
branches/FNWRAP/coregrind/m_debuginfo/symtab.c
Modified: branches/FNWRAP/coregrind/m_debuginfo/symtab.c
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- branches/FNWRAP/coregrind/m_debuginfo/symtab.c 2005-12-29 17:45:11 UT=
C (rev 5458)
+++ branches/FNWRAP/coregrind/m_debuginfo/symtab.c 2005-12-29 17:46:04 UT=
C (rev 5459)
@@ -644,6 +644,17 @@
=20
TRACE_SYMTAB("choosing between '%s' and '%s'\n", a->name, b->name);
=20
+ /* MPI hack: prefer PMPI_Foo over MPI_Foo */
+ if (0=3D=3DVG_(strncmp)(a->name, "MPI_", 4)
+ && 0=3D=3DVG_(strncmp)(b->name, "PMPI_", 5)
+ && 0=3D=3DVG_(strcmp)(a->name, 1+b->name))
+ return b;
+ else
+ if (0=3D=3DVG_(strncmp)(b->name, "MPI_", 4)
+ && 0=3D=3DVG_(strncmp)(a->name, "PMPI_", 5)
+ && 0=3D=3DVG_(strcmp)(b->name, 1+a->name))
+ return a;
+
/* Select the shortest unversioned name */
if (vlena < vlenb)
return a;
|