diff options
author | Quincey Koziol <koziol@hdfgroup.org> | 2002-10-14 18:34:01 (GMT) |
---|---|---|
committer | Quincey Koziol <koziol@hdfgroup.org> | 2002-10-14 18:34:01 (GMT) |
commit | 3ce3ccc9eb29dc545bd2fcfec65c2062755ab514 (patch) | |
tree | 7d735670206b60e13f4a571e1de3e8b926e75cb4 /bin/trace | |
parent | ea08053e29da31c82afd6eb432b70b828536183e (diff) | |
download | hdf5-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
Diffstat (limited to 'bin/trace')
-rwxr-xr-x | bin/trace | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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"; |