summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorQuincey Koziol <koziol@hdfgroup.org>2002-10-14 18:34:01 (GMT)
committerQuincey Koziol <koziol@hdfgroup.org>2002-10-14 18:34:01 (GMT)
commit3ce3ccc9eb29dc545bd2fcfec65c2062755ab514 (patch)
tree7d735670206b60e13f4a571e1de3e8b926e75cb4
parentea08053e29da31c82afd6eb432b70b828536183e (diff)
downloadhdf5-3ce3ccc9eb29dc545bd2fcfec65c2062755ab514.zip
hdf5-3ce3ccc9eb29dc545bd2fcfec65c2062755ab514.tar.gz
hdf5-3ce3ccc9eb29dc545bd2fcfec65c2062755ab514.tar.bz2
[svn-r5984] Purpose:
Bug fix Description: Teach the perl script about the new "_API" added to all API functions. Platforms tested: FreeBSD 4.6 (sleipnir) w and w/o parallel Linux 2.2.x (eirene) w/FORTRAN & C++ Solaris 2.7 (arabica) w/FORTRAN IRIX64 6.5 (modi4) w/FORTRAN & parallel
-rwxr-xr-xbin/trace2
1 files changed, 1 insertions, 1 deletions
diff --git a/bin/trace b/bin/trace
index c2b5534..39d4889 100755
--- a/bin/trace
+++ b/bin/trace
@@ -215,7 +215,7 @@ sub rewrite_func ($$$$$) {
}
} elsif ($body =~ s/((\n[ \t]*)H5TRACE\d+\s*\(.*?\);)\n/"$2$trace"/es) {
# Replaced an H5TRACE macro
- } elsif ($body=~s/((\n[ \t]*)FUNC_ENTER(_NOINIT)*\s*\(.*?\);)\n/"$1$2$trace"/es) {
+ } elsif ($body=~s/((\n[ \t]*)FUNC_ENTER_API(_NOINIT)*\s*\(.*?\);)\n/"$1$2$trace"/es) {
# Added an H5TRACE macro after a FUNC_ENTER macro.
} else {
errmesg $file, $name, "unable to insert tracing information";