hdf5_chunking_query_bmr

#!/usr/bin/perl -w

require 5.003;

​

# Global settings

# (The max_idx parameter is the only thing that needs to be changed when adding

#       support for a new major release.  If support for a prior major release

#       is added (like support for 1.4, etc), the min_sup_idx parameter will

#       need to be decremented. - QAK)

​

# Max. library "index" (0 = v1.0, 1 = 1.2, 2 = 1.4, 3 = 1.6, 4 = 1.8, 5 = 1.10, 6 = 1.12, etc)

$max_idx = 6;

​

# Min. supported previous library version "index" (0 = v1.0, 1 = 1.2, etc)

$min_sup_idx = 3;

​

# Number of spaces to indent preprocessor commands inside ifdefs

$indent = 2;

​

#

# Copyright by The HDF Group.

# Copyright by the Board of Trustees of the University of Illinois.

# All rights reserved.

#

# This file is part of HDF5.  The full HDF5 copyright notice, including

# terms governing use, modification, and redistribution, is contained in

# the COPYING file, which can be found at the root of the source code

# distribution tree, or in https://support.hdfgroup.org/ftp/HDF5/releases.

# If you do not have access to either file, you may request a copy from

# help@hdfgroup.org.

#

​

# Create public symbol version headers

#

# Read in the public symbol version description text file and create the

# appropriate headers needed by the library.

#

# Programmer: Quincey Koziol

# Creation Date: 2007/07/10

​

##############################################################################

# Print the copyright into an open file

#

sub print_copyright ($) {

    my $fh = shift;

​

    print $fh "/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *\n";

    print $fh " * Copyright by The HDF Group.                                               *\n";

    print $fh " * Copyright by the Board of Trustees of the University of Illinois.         *\n";

    print $fh " * All rights reserved.                                                      *\n";

    print $fh " *                                                                           *\n";

    print $fh " * This file is part of HDF5.  The full HDF5 copyright notice, including     *\n";