blob: 7fc53c90f20c44a5d7eeeaf83ebc6d503f82e4b9 [file] [log] [blame]
Jeff Thompsonef2d5a42013-08-22 19:09:24 -07001#!/usr/bin/perl -w
2#
3# Boost.Function library
4#
5# Copyright Douglas Gregor 2001-2003. Use, modification and
6# distribution is subject to the Boost Software License, Version
7# 1.0. (See accompanying file LICENSE_1_0.txt or copy at
8# http://www.boost.org/LICENSE_1_0.txt)
9#
10# For more information, see http://www.boost.org
11use English;
12
13if ($#ARGV < 0) {
14 print "Usage: perl gen_function_N <number of arguments>\n";
15 exit;
16}
17
18
19$totalNumArgs = $ARGV[0];
20for ($numArgs = 0; $numArgs <= $totalNumArgs; ++$numArgs) {
21 open OUT, ">function$numArgs.hpp";
22 print OUT "#define BOOST_FUNCTION_NUM_ARGS $numArgs\n";
23 print OUT "#include <ndnboost/function/detail/maybe_include.hpp>\n";
24 print OUT "#undef BOOST_FUNCTION_NUM_ARGS\n";
25 close OUT;
26}