diff options
| author | Nicholas Clark <nick@ccl4.org> | 2001-07-07 00:25:14 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-07-07 15:20:44 +0000 |
| commit | 181f5113b42dc68c705079ab45842d952c071b37 (patch) | |
| tree | 41c909358d8eb8b81af3767f39c832f617d6cb7d /utils | |
| parent | 83da49e6dc02d11623dc62ca3191fd4694484ce8 (diff) | |
| download | perl-181f5113b42dc68c705079ab45842d952c071b37.tar.gz | |
h2xs
Message-ID: <20010706232514.X59620@plum.flirble.org>
p4raw-id: //depot/perl@11189
Diffstat (limited to 'utils')
| -rw-r--r-- | utils/h2xs.PL | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/utils/h2xs.PL b/utils/h2xs.PL index 6bf4be97a2..1d60d69191 100644 --- a/utils/h2xs.PL +++ b/utils/h2xs.PL @@ -442,6 +442,7 @@ version: $H2XS_VERSION -P Omit the stub POD section. -X Omit the XS portion (implies both -c and -f). -a Generate get/set accessors for struct and union members (used with -x). + -b Specify a perl version to be backwards compatibile with -c Omit the constant() function and specialised AUTOLOAD from the XS file. -d Turn on debugging messages. -f Force creation of the extension even if the C header does not exist. @@ -452,10 +453,9 @@ version: $H2XS_VERSION -o Regular expression for \"opaque\" types. -p Specify a prefix which should be removed from the Perl function names. -s Create subroutines for specified macros. + -t Default type for autoloaded constants -v Specify a version number for this extension. -x Autogenerate XSUBs using C::Scan. - -b Specify a perl version to be backwards compatibile with - -t Default type for autoloaded constants extra_libraries are any libraries that might be needed for loading the extension, e.g. -lm would try to link in the math library. @@ -1150,7 +1150,8 @@ my $types = {}; if( ! $opt_c ) { print XS constant_types(), "\n"; - foreach (C_constant (undef, $opt_t, $types, undef, undef, @const_names)) { + foreach (C_constant ($module, undef, $opt_t, $types, undef, undef, + @const_names)) { print XS $_, "\n"; } } |