1898184e3Ssthenpackage ExtUtils::ParseXS::Constants;
2898184e3Ssthenuse strict;
3898184e3Ssthenuse warnings;
4898184e3Ssthenuse Symbol;
5898184e3Ssthen
6*e0680481Safresh1our $VERSION = '3.51';
7898184e3Ssthen
8898184e3Ssthen=head1 NAME
9898184e3Ssthen
10898184e3SsthenExtUtils::ParseXS::Constants - Initialization values for some globals
11898184e3Ssthen
12898184e3Ssthen=head1 SYNOPSIS
13898184e3Ssthen
14898184e3Ssthen  use ExtUtils::ParseXS::Constants ();
15898184e3Ssthen
16898184e3Ssthen  $PrototypeRegexp = $ExtUtils::ParseXS::Constants::PrototypeRegexp;
17898184e3Ssthen
18898184e3Ssthen=head1 DESCRIPTION
19898184e3Ssthen
20898184e3SsthenInitialization of certain non-subroutine variables in ExtUtils::ParseXS and some of its
21898184e3Ssthensupporting packages has been moved into this package so that those values can
22898184e3Ssthenbe defined exactly once and then re-used in any package.
23898184e3Ssthen
24898184e3SsthenNothing is exported.  Use fully qualified variable names.
25898184e3Ssthen
26898184e3Ssthen=cut
27898184e3Ssthen
28898184e3Ssthen# FIXME: THESE ARE NOT CONSTANTS!
29898184e3Ssthenour @InitFileCode;
30898184e3Ssthen
31898184e3Ssthen# Note that to reduce maintenance, $PrototypeRegexp is used
32898184e3Ssthen# by ExtUtils::Typemaps, too!
33898184e3Ssthenour $PrototypeRegexp = "[" . quotemeta('\$%&*@;[]_') . "]";
34898184e3Ssthenour @XSKeywords      = qw(
35898184e3Ssthen  REQUIRE BOOT CASE PREINIT INPUT INIT CODE PPCODE
36898184e3Ssthen  OUTPUT CLEANUP ALIAS ATTRS PROTOTYPES PROTOTYPE
37898184e3Ssthen  VERSIONCHECK INCLUDE INCLUDE_COMMAND SCOPE INTERFACE
38898184e3Ssthen  INTERFACE_MACRO C_ARGS POSTCALL OVERLOAD FALLBACK
39898184e3Ssthen  EXPORT_XSUB_SYMBOLS
40898184e3Ssthen);
41898184e3Ssthen
426fb12b70Safresh1our $XSKeywordsAlternation = join('|', @XSKeywords);
436fb12b70Safresh1
44898184e3Ssthen1;
45