mirror of
https://review.haiku-os.org/buildtools
synced 2025-01-31 10:34:41 +01:00
5873a060ca
* these are dependencies for gcc 4 Graphite engine build. * CLooG 0.18.0 includes ISL 0.11.1 which is the backend that the build script enables. * PPL is needed by GCC build even if it isn't the chosen backend.
63 lines
1.8 KiB
Perl
63 lines
1.8 KiB
Perl
#! @PERL@
|
|
# -*- Perl -*-
|
|
# @configure_input@
|
|
|
|
eval 'case $# in 0) exec @PERL@ -S "$0";; *) exec @PERL@ -S "$0" "$@";; esac'
|
|
if 0;
|
|
|
|
# Convert an ASCII text into the declaration of a C++ array.
|
|
# Copyright (C) 2001-2010 Roberto Bagnara <bagnara@cs.unipr.it>
|
|
# Copyright (C) 2010-2011 BUGSENG srl (http://bugseng.com)
|
|
#
|
|
# This file is part of the Parma Polyhedra Library (PPL).
|
|
#
|
|
# The PPL is free software; you can redistribute it and/or modify it
|
|
# under the terms of the GNU General Public License as published by the
|
|
# Free Software Foundation; either version 3 of the License, or (at your
|
|
# option) any later version.
|
|
#
|
|
# The PPL is distributed in the hope that it will be useful, but WITHOUT
|
|
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
# FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
# for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with this program; if not, write to the Free Software Foundation,
|
|
# Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02111-1307, USA.
|
|
#
|
|
# For the most up-to-date information see the Parma Polyhedra Library
|
|
# site: http://www.cs.unipr.it/ppl/ .
|
|
|
|
use Getopt::Long;
|
|
|
|
sub usage {
|
|
print STDERR <<EOF;
|
|
Convert ASCII text into the declaration of a C++ array.
|
|
Usage: text2cxxarray [OPTIONS] [FILE ...]
|
|
[FILE ...] ASCII text file(s) to convert.
|
|
|
|
[OPTIONS]
|
|
--name=NAME Use NAME as the array name.
|
|
-h, --help Display this help message.
|
|
EOF
|
|
exit 1;
|
|
}
|
|
|
|
my $array_name = "a";
|
|
|
|
GetOptions(
|
|
'name=s' => \$array_name,
|
|
'help|h' => \&usage,
|
|
) || usage();
|
|
|
|
print "extern const char* const $array_name" . "[] = {\n";
|
|
while (<>) {
|
|
chop;
|
|
s/\\/\\\\/g;
|
|
s/\t/\\t/g;
|
|
s/\"/\\"/g;
|
|
print " \"$_\",\n";
|
|
}
|
|
print " 0";
|
|
print "};\n";
|