summaryrefslogtreecommitdiff
path: root/perly.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2001-08-31 20:58:38 +0000
committerGurusamy Sarathy <gsar@cpan.org>2001-08-31 20:58:38 +0000
commitacfe0abcedaf592fb4b9cb69ce3468308ae99d91 (patch)
treea2ca08c77d2b63d1777d0b228ff53362895c1624 /perly.c
parent25f58aea15b072f74afcee1b9074d33e8e7348b5 (diff)
downloadperl-acfe0abcedaf592fb4b9cb69ce3468308ae99d91.tar.gz
remove deprecated PERL_OBJECT cruft, it has long since stopped
working in 5.7.x p4raw-id: //depot/perl@11803
Diffstat (limited to 'perly.c')
-rw-r--r--perly.c8
1 files changed, 2 insertions, 6 deletions
diff --git a/perly.c b/perly.c
index 5596768bcd..2d4d79e0b0 100644
--- a/perly.c
+++ b/perly.c
@@ -31,7 +31,7 @@ struct ysv {
YYSTYPE oldyylval;
};
-static void yydestruct(pTHXo_ void *ptr);
+static void yydestruct(pTHX_ void *ptr);
#line 51 "perly.y"
#if 0 /* get this from perly.h instead */
@@ -2528,12 +2528,8 @@ yyaccept:
return retval;
}
-#ifdef PERL_OBJECT
-#include "XSUB.h"
-#endif
-
static void
-yydestruct(pTHXo_ void *ptr)
+yydestruct(pTHX_ void *ptr)
{
struct ysv* ysave = (struct ysv*)ptr;
if (ysave->yyss) Safefree(ysave->yyss);