diff options
author | Jeffrey Friedl <jfriedl@regex.info> | 2000-08-08 17:59:43 -0700 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-09 23:05:47 +0000 |
commit | b45f050a81173020b0089d3ff02fa0276958461a (patch) | |
tree | 9ba9f52c16593c4b22ca597ee69abdc99927555b /regcomp.h | |
parent | 68d47915e40dc6ab5050a2c749c177f42d1374ff (diff) | |
download | perl-b45f050a81173020b0089d3ff02fa0276958461a.tar.gz |
Re: enhanced(?) regex error messages
Message-Id: <200008090759.AAA07144@ventrue.yahoo.com>
(plus two small patches sent privately)
(this still seems to leave few test failures)
p4raw-id: //depot/perl@6560
Diffstat (limited to 'regcomp.h')
-rw-r--r-- | regcomp.h | 14 |
1 files changed, 0 insertions, 14 deletions
@@ -269,20 +269,6 @@ struct regnode_charclass_class { #define UCHARAT(p) PL_regdummy #endif /* lint */ -#define FAIL(m) \ - STMT_START { \ - if (!SIZE_ONLY) \ - SAVEDESTRUCTOR_X(clear_re,(void*)PL_regcomp_rx); \ - Perl_croak(aTHX_ "/%.127s/: %s", PL_regprecomp,m); \ - } STMT_END - -#define FAIL2(pat,m) \ - STMT_START { \ - if (!SIZE_ONLY) \ - SAVEDESTRUCTOR_X(clear_re,(void*)PL_regcomp_rx); \ - S_re_croak2(aTHX_ "/%.127s/: ",pat,PL_regprecomp,m); \ - } STMT_END - #define EXTRA_SIZE(guy) ((sizeof(guy)-1)/sizeof(struct regnode)) #define REG_SEEN_ZERO_LEN 1 |