summaryrefslogtreecommitdiff
path: root/regcomp.h
diff options
context:
space:
mode:
authorJeffrey Friedl <jfriedl@regex.info>2000-08-08 17:59:43 -0700
committerJarkko Hietaniemi <jhi@iki.fi>2000-08-09 23:05:47 +0000
commitb45f050a81173020b0089d3ff02fa0276958461a (patch)
tree9ba9f52c16593c4b22ca597ee69abdc99927555b /regcomp.h
parent68d47915e40dc6ab5050a2c749c177f42d1374ff (diff)
downloadperl-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.h14
1 files changed, 0 insertions, 14 deletions
diff --git a/regcomp.h b/regcomp.h
index 3624917c6e..34c5c251be 100644
--- a/regcomp.h
+++ b/regcomp.h
@@ -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