Current File : //usr/local/apps/perl/lib/site_perl/5.30.0/x86_64-linux/regex.ph |
require '_h2ph_pre.ph';
no warnings qw(redefine misc);
unless(defined(&_REGEX_H)) {
eval 'sub _REGEX_H () {1;}' unless defined(&_REGEX_H);
require 'sys/types.ph';
if(defined(&__cplusplus)) {
}
if(defined(&__USE_GNU)) {
eval 'sub RE_BACKSLASH_ESCAPE_IN_LISTS () {( 1);}' unless defined(&RE_BACKSLASH_ESCAPE_IN_LISTS);
eval 'sub RE_BK_PLUS_QM () {( &RE_BACKSLASH_ESCAPE_IN_LISTS << 1);}' unless defined(&RE_BK_PLUS_QM);
eval 'sub RE_CHAR_CLASSES () {( &RE_BK_PLUS_QM << 1);}' unless defined(&RE_CHAR_CLASSES);
eval 'sub RE_CONTEXT_INDEP_ANCHORS () {( &RE_CHAR_CLASSES << 1);}' unless defined(&RE_CONTEXT_INDEP_ANCHORS);
eval 'sub RE_CONTEXT_INDEP_OPS () {( &RE_CONTEXT_INDEP_ANCHORS << 1);}' unless defined(&RE_CONTEXT_INDEP_OPS);
eval 'sub RE_CONTEXT_INVALID_OPS () {( &RE_CONTEXT_INDEP_OPS << 1);}' unless defined(&RE_CONTEXT_INVALID_OPS);
eval 'sub RE_DOT_NEWLINE () {( &RE_CONTEXT_INVALID_OPS << 1);}' unless defined(&RE_DOT_NEWLINE);
eval 'sub RE_DOT_NOT_NULL () {( &RE_DOT_NEWLINE << 1);}' unless defined(&RE_DOT_NOT_NULL);
eval 'sub RE_HAT_LISTS_NOT_NEWLINE () {( &RE_DOT_NOT_NULL << 1);}' unless defined(&RE_HAT_LISTS_NOT_NEWLINE);
eval 'sub RE_INTERVALS () {( &RE_HAT_LISTS_NOT_NEWLINE << 1);}' unless defined(&RE_INTERVALS);
eval 'sub RE_LIMITED_OPS () {( &RE_INTERVALS << 1);}' unless defined(&RE_LIMITED_OPS);
eval 'sub RE_NEWLINE_ALT () {( &RE_LIMITED_OPS << 1);}' unless defined(&RE_NEWLINE_ALT);
eval 'sub RE_NO_BK_BRACES () {( &RE_NEWLINE_ALT << 1);}' unless defined(&RE_NO_BK_BRACES);
eval 'sub RE_NO_BK_PARENS () {( &RE_NO_BK_BRACES << 1);}' unless defined(&RE_NO_BK_PARENS);
eval 'sub RE_NO_BK_REFS () {( &RE_NO_BK_PARENS << 1);}' unless defined(&RE_NO_BK_REFS);
eval 'sub RE_NO_BK_VBAR () {( &RE_NO_BK_REFS << 1);}' unless defined(&RE_NO_BK_VBAR);
eval 'sub RE_NO_EMPTY_RANGES () {( &RE_NO_BK_VBAR << 1);}' unless defined(&RE_NO_EMPTY_RANGES);
eval 'sub RE_UNMATCHED_RIGHT_PAREN_ORD () {( &RE_NO_EMPTY_RANGES << 1);}' unless defined(&RE_UNMATCHED_RIGHT_PAREN_ORD);
eval 'sub RE_NO_POSIX_BACKTRACKING () {( &RE_UNMATCHED_RIGHT_PAREN_ORD << 1);}' unless defined(&RE_NO_POSIX_BACKTRACKING);
eval 'sub RE_NO_GNU_OPS () {( &RE_NO_POSIX_BACKTRACKING << 1);}' unless defined(&RE_NO_GNU_OPS);
eval 'sub RE_DEBUG () {( &RE_NO_GNU_OPS << 1);}' unless defined(&RE_DEBUG);
eval 'sub RE_INVALID_INTERVAL_ORD () {( &RE_DEBUG << 1);}' unless defined(&RE_INVALID_INTERVAL_ORD);
eval 'sub RE_ICASE () {( &RE_INVALID_INTERVAL_ORD << 1);}' unless defined(&RE_ICASE);
eval 'sub RE_CARET_ANCHORS_HERE () {( &RE_ICASE << 1);}' unless defined(&RE_CARET_ANCHORS_HERE);
eval 'sub RE_CONTEXT_INVALID_DUP () {( &RE_CARET_ANCHORS_HERE << 1);}' unless defined(&RE_CONTEXT_INVALID_DUP);
eval 'sub RE_NO_SUB () {( &RE_CONTEXT_INVALID_DUP << 1);}' unless defined(&RE_NO_SUB);
}
if(defined(&__USE_GNU)) {
eval 'sub RE_SYNTAX_EMACS () {0;}' unless defined(&RE_SYNTAX_EMACS);
eval 'sub RE_SYNTAX_AWK () {( &RE_BACKSLASH_ESCAPE_IN_LISTS | &RE_DOT_NOT_NULL | &RE_NO_BK_PARENS | &RE_NO_BK_REFS | &RE_NO_BK_VBAR | &RE_NO_EMPTY_RANGES | &RE_DOT_NEWLINE | &RE_CONTEXT_INDEP_ANCHORS | &RE_UNMATCHED_RIGHT_PAREN_ORD | &RE_NO_GNU_OPS);}' unless defined(&RE_SYNTAX_AWK);
eval 'sub RE_SYNTAX_GNU_AWK () {(( &RE_SYNTAX_POSIX_EXTENDED | &RE_BACKSLASH_ESCAPE_IN_LISTS | &RE_DEBUG) & ~( &RE_DOT_NOT_NULL | &RE_INTERVALS | &RE_CONTEXT_INDEP_OPS | &RE_CONTEXT_INVALID_OPS ));}' unless defined(&RE_SYNTAX_GNU_AWK);
eval 'sub RE_SYNTAX_POSIX_AWK () {( &RE_SYNTAX_POSIX_EXTENDED | &RE_BACKSLASH_ESCAPE_IN_LISTS | &RE_INTERVALS | &RE_NO_GNU_OPS);}' unless defined(&RE_SYNTAX_POSIX_AWK);
eval 'sub RE_SYNTAX_GREP () {( &RE_BK_PLUS_QM | &RE_CHAR_CLASSES | &RE_HAT_LISTS_NOT_NEWLINE | &RE_INTERVALS | &RE_NEWLINE_ALT);}' unless defined(&RE_SYNTAX_GREP);
eval 'sub RE_SYNTAX_EGREP () {( &RE_CHAR_CLASSES | &RE_CONTEXT_INDEP_ANCHORS | &RE_CONTEXT_INDEP_OPS | &RE_HAT_LISTS_NOT_NEWLINE | &RE_NEWLINE_ALT | &RE_NO_BK_PARENS | &RE_NO_BK_VBAR);}' unless defined(&RE_SYNTAX_EGREP);
eval 'sub RE_SYNTAX_POSIX_EGREP () {( &RE_SYNTAX_EGREP | &RE_INTERVALS | &RE_NO_BK_BRACES | &RE_INVALID_INTERVAL_ORD);}' unless defined(&RE_SYNTAX_POSIX_EGREP);
eval 'sub RE_SYNTAX_ED () { &RE_SYNTAX_POSIX_BASIC;}' unless defined(&RE_SYNTAX_ED);
eval 'sub RE_SYNTAX_SED () { &RE_SYNTAX_POSIX_BASIC;}' unless defined(&RE_SYNTAX_SED);
eval 'sub _RE_SYNTAX_POSIX_COMMON () {( &RE_CHAR_CLASSES | &RE_DOT_NEWLINE | &RE_DOT_NOT_NULL | &RE_INTERVALS | &RE_NO_EMPTY_RANGES);}' unless defined(&_RE_SYNTAX_POSIX_COMMON);
eval 'sub RE_SYNTAX_POSIX_BASIC () {( &_RE_SYNTAX_POSIX_COMMON | &RE_BK_PLUS_QM | &RE_CONTEXT_INVALID_DUP);}' unless defined(&RE_SYNTAX_POSIX_BASIC);
eval 'sub RE_SYNTAX_POSIX_MINIMAL_BASIC () {( &_RE_SYNTAX_POSIX_COMMON | &RE_LIMITED_OPS);}' unless defined(&RE_SYNTAX_POSIX_MINIMAL_BASIC);
eval 'sub RE_SYNTAX_POSIX_EXTENDED () {( &_RE_SYNTAX_POSIX_COMMON | &RE_CONTEXT_INDEP_ANCHORS | &RE_CONTEXT_INDEP_OPS | &RE_NO_BK_BRACES | &RE_NO_BK_PARENS | &RE_NO_BK_VBAR | &RE_CONTEXT_INVALID_OPS | &RE_UNMATCHED_RIGHT_PAREN_ORD);}' unless defined(&RE_SYNTAX_POSIX_EXTENDED);
eval 'sub RE_SYNTAX_POSIX_MINIMAL_EXTENDED () {( &_RE_SYNTAX_POSIX_COMMON | &RE_CONTEXT_INDEP_ANCHORS | &RE_CONTEXT_INVALID_OPS | &RE_NO_BK_BRACES | &RE_NO_BK_PARENS | &RE_NO_BK_REFS | &RE_NO_BK_VBAR | &RE_UNMATCHED_RIGHT_PAREN_ORD);}' unless defined(&RE_SYNTAX_POSIX_MINIMAL_EXTENDED);
if(defined(&RE_DUP_MAX)) {
undef(&RE_DUP_MAX) if defined(&RE_DUP_MAX);
}
eval 'sub RE_DUP_MAX () {(0x7fff);}' unless defined(&RE_DUP_MAX);
}
eval 'sub REG_EXTENDED () {1;}' unless defined(®_EXTENDED);
eval 'sub REG_ICASE () {( ®_EXTENDED << 1);}' unless defined(®_ICASE);
eval 'sub REG_NEWLINE () {( ®_ICASE << 1);}' unless defined(®_NEWLINE);
eval 'sub REG_NOSUB () {( ®_NEWLINE << 1);}' unless defined(®_NOSUB);
eval 'sub REG_NOTBOL () {1;}' unless defined(®_NOTBOL);
eval 'sub REG_NOTEOL () {(1<< 1);}' unless defined(®_NOTEOL);
eval 'sub REG_STARTEND () {(1<< 2);}' unless defined(®_STARTEND);
eval("sub REG_NOERROR () { 0; }") unless defined(®_NOERROR);
eval("sub REG_NOMATCH () { 1; }") unless defined(®_NOMATCH);
eval("sub REG_BADPAT () { 2; }") unless defined(®_BADPAT);
eval("sub REG_ECOLLATE () { 3; }") unless defined(®_ECOLLATE);
eval("sub REG_ECTYPE () { 4; }") unless defined(®_ECTYPE);
eval("sub REG_EESCAPE () { 5; }") unless defined(®_EESCAPE);
eval("sub REG_ESUBREG () { 6; }") unless defined(®_ESUBREG);
eval("sub REG_EBRACK () { 7; }") unless defined(®_EBRACK);
eval("sub REG_EPAREN () { 8; }") unless defined(®_EPAREN);
eval("sub REG_EBRACE () { 9; }") unless defined(®_EBRACE);
eval("sub REG_BADBR () { 10; }") unless defined(®_BADBR);
eval("sub REG_ERANGE () { 11; }") unless defined(®_ERANGE);
eval("sub REG_ESPACE () { 12; }") unless defined(®_ESPACE);
eval("sub REG_BADRPT () { 13; }") unless defined(®_BADRPT);
eval("sub REG_EEND () { 14; }") unless defined(®_EEND);
eval("sub REG_ESIZE () { 15; }") unless defined(®_ESIZE);
eval("sub REG_ERPAREN () { 16; }") unless defined(®_ERPAREN);
unless(defined(&RE_TRANSLATE_TYPE)) {
eval 'sub __RE_TRANSLATE_TYPE () {\'unsigned char\' *;}' unless defined(&__RE_TRANSLATE_TYPE);
if(defined(&__USE_GNU)) {
eval 'sub RE_TRANSLATE_TYPE () { &__RE_TRANSLATE_TYPE;}' unless defined(&RE_TRANSLATE_TYPE);
}
}
if(defined(&__USE_GNU)) {
eval 'sub __REPB_PREFIX {
my($name) = @_;
eval q($name);
}' unless defined(&__REPB_PREFIX);
} else {
eval 'sub __REPB_PREFIX {
my($name) = @_;
eval q( &__$name);
}' unless defined(&__REPB_PREFIX);
}
if(defined(&__USE_GNU)) {
eval 'sub REGS_UNALLOCATED () {0;}' unless defined(®S_UNALLOCATED);
eval 'sub REGS_REALLOCATE () {1;}' unless defined(®S_REALLOCATE);
eval 'sub REGS_FIXED () {2;}' unless defined(®S_FIXED);
}
if(defined(&__USE_GNU)) {
unless(defined(&RE_NREGS)) {
eval 'sub RE_NREGS () {30;}' unless defined(&RE_NREGS);
}
}
if(defined(&__USE_GNU)) {
}
if(defined (&_REGEX_RE_COMP) || (defined (&_LIBC) && defined (&__USE_BSD))) {
unless(defined(&_CRAY)) {
}
}
unless(defined(&__restrict)) {
if(! (2< (defined(&__GNUC__) ? &__GNUC__ : undef) || (2== (defined(&__GNUC__) ? &__GNUC__ : undef) && 95<= (defined(&__GNUC_MINOR__) ? &__GNUC_MINOR__ : undef)))) {
if(defined (&restrict) || 199901 <= (defined(&__STDC_VERSION__) ? &__STDC_VERSION__ : undef)) {
eval 'sub __restrict () { &restrict;}' unless defined(&__restrict);
} else {
eval 'sub __restrict () {1;}' unless defined(&__restrict);
}
}
}
unless(defined(&__restrict_arr)) {
if(((defined(&__GNUC__) ? &__GNUC__ : undef) > 3|| ((defined(&__GNUC__) ? &__GNUC__ : undef) == 3 && (defined(&__GNUC_MINOR__) ? &__GNUC_MINOR__ : undef) >= 1)) && !defined (&__GNUG__)) {
eval 'sub __restrict_arr () { &__restrict;}' unless defined(&__restrict_arr);
} else {
eval 'sub __restrict_arr () {1;}' unless defined(&__restrict_arr);
}
}
if(defined(&__cplusplus)) {
}
}
1;