summaryrefslogtreecommitdiffstats
path: root/bin/h5vers
diff options
context:
space:
mode:
authorScott Wegner <swegner@hdfgroup.org>2008-08-06 19:04:45 (GMT)
committerScott Wegner <swegner@hdfgroup.org>2008-08-06 19:04:45 (GMT)
commit35fcfd37d4ff7609dfde24452487038296f12cdc (patch)
treed120e391a51f40e4800767b4e218594d3229dc2b /bin/h5vers
parent2b3a491ee19dc9ef1b5fcd2c2dcff296174e23b6 (diff)
downloadhdf5-35fcfd37d4ff7609dfde24452487038296f12cdc.zip
hdf5-35fcfd37d4ff7609dfde24452487038296f12cdc.tar.gz
hdf5-35fcfd37d4ff7609dfde24452487038296f12cdc.tar.bz2
[svn-r15440] Purpose: Correct a few typos from my previous edit
Description: -- Remove a couple lines of debugging output -- Make sure H5_PACKAGE_NAME outputs 'HDF5' rather than 'hdf5' -- Take into account version strings with a postfix. This isn't currently used in HDF5 1.9 branch, but is in HDF5 1.8. Tested: kagiso
Diffstat (limited to 'bin/h5vers')
-rwxr-xr-xbin/h5vers19
1 files changed, 10 insertions, 9 deletions
diff --git a/bin/h5vers b/bin/h5vers
index 34f54dc..1b41d0f 100755
--- a/bin/h5vers
+++ b/bin/h5vers
@@ -363,24 +363,25 @@ sub gen_h5pubconf {
if ($contents[$i] =~ /\#\s*define\s+H5_PACKAGE\s+/) {
$contents[$i] = "\#define H5_PACKAGE \"$namelc\"\n";
} elsif ($contents[$i] =~ /\#\s*define\s+H5_PACKAGE_NAME\s+/) {
- $contents[$i] = "\#define H5_PACKAGE_NAME \"$namelc\"\n";
+ $contents[$i] = "\#define H5_PACKAGE_NAME \"$nameuc\"\n";
} elsif ($contents[$i] =~ /\#\s*define\s+H5_PACKAGE_STRING\s+/) {
- $contents[$i] = sprintf("\#define H5_PACKAGE_STRING \"$nameuc %d.%d.%d\"\n",
- @vers[0,1,2]);
+ $contents[$i] = sprintf("\#define H5_PACKAGE_STRING \"$nameuc %d.%d.%d%s\"\n",
+ @vers[0,1,2],
+ $newver[3] eq "" ? "" : "-".$newver[3]);
} elsif ($contents[$i] =~ /\#\s*define\s+H5_PACKAGE_TARNAME\s+/) {
$contents[$i] = "\#define H5_PACKAGE_TARNAME \"$namelc\"\n";
} elsif ($contents[$i] =~ /\#\s*define\s+H5_PACKAGE_VERSION\s+/) {
- $contents[$i] = sprintf("\#define H5_PACKAGE_VERSION \"%d.%d.%d\"\n",
- @vers[0,1,2]);
+ $contents[$i] = sprintf("\#define H5_PACKAGE_VERSION \"%d.%d.%d%s\"\n",
+ @vers[0,1,2],
+ $newver[3] eq "" ? "" : "-".$newver[3]);
} elsif ($contents[$i] =~ /\#\s*define\s+H5_VERSION\s+/) {
- $contents[$i] = sprintf("\#define H5_VERSION \"%d.%d.%d\"\n",
- @vers[0,1,2]);
+ $contents[$i] = sprintf("\#define H5_VERSION \"%d.%d.%d%s\"\n",
+ @vers[0,1,2],
+ $newver[3] eq "" ? "" : "-".$newver[3]);
}
}
- printf("opening file for writing");
open FILE, ">$pubconf" or die "$pubconf: $!\n";
- print FILE "this is a test";
print FILE @contents;
close FILE;
}