mirror of
https://gitlab.isc.org/isc-projects/kea
synced 2025-09-05 16:35:23 +00:00
24445dcc33
git-svn-id: svn://bind10.isc.org/svn/bind10/branches/f2f200910@231 e5f2f494-b856-4b98-b285-d166d9295462
27 lines
739 B
Perl
27 lines
739 B
Perl
#!/usr/bin/perl -w
|
|
#
|
|
# Boost.Function library
|
|
#
|
|
# Copyright Douglas Gregor 2001-2003. Use, modification and
|
|
# distribution is subject to the Boost Software License, Version
|
|
# 1.0. (See accompanying file LICENSE_1_0.txt or copy at
|
|
# http://www.boost.org/LICENSE_1_0.txt)
|
|
#
|
|
# For more information, see http://www.boost.org
|
|
use English;
|
|
|
|
if ($#ARGV < 0) {
|
|
print "Usage: perl gen_function_N <number of arguments>\n";
|
|
exit;
|
|
}
|
|
|
|
|
|
$totalNumArgs = $ARGV[0];
|
|
for ($numArgs = 0; $numArgs <= $totalNumArgs; ++$numArgs) {
|
|
open OUT, ">function$numArgs.hpp";
|
|
print OUT "#define BOOST_FUNCTION_NUM_ARGS $numArgs\n";
|
|
print OUT "#include <boost/function/detail/maybe_include.hpp>\n";
|
|
print OUT "#undef BOOST_FUNCTION_NUM_ARGS\n";
|
|
close OUT;
|
|
}
|