diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-07-08 18:47:35 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-07-08 18:47:35 +0000 |
| commit | 51371543ca1a75ed152020ad0846b5b8cf11c32f (patch) | |
| tree | 9bfd9a21697b0769e2681483631c742642dd8c45 /regcomp.h | |
| parent | 4d61ec052de5c3a91dc64c80c032c2cbec44d845 (diff) | |
| download | perl-51371543ca1a75ed152020ad0846b5b8cf11c32f.tar.gz | |
more PERL_OBJECT cleanups (changes still untested on Unix!)
p4raw-id: //depot/perl@3660
Diffstat (limited to 'regcomp.h')
| -rw-r--r-- | regcomp.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -241,14 +241,14 @@ struct regnode_2 { #define FAIL(m) \ STMT_START { \ if (!SIZE_ONLY) \ - SAVEDESTRUCTOR(S_clear_re,(void*)PL_regcomp_rx); \ + SAVEDESTRUCTOR(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(S_clear_re,(void*)PL_regcomp_rx); \ + SAVEDESTRUCTOR(clear_re,(void*)PL_regcomp_rx); \ S_re_croak2(aTHX_ "/%.127s/: ",pat,PL_regprecomp,m); \ } STMT_END |