summaryrefslogtreecommitdiff
path: root/vms/perly_c.vms
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 /vms/perly_c.vms
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 'vms/perly_c.vms')
-rw-r--r--vms/perly_c.vms8
1 files changed, 2 insertions, 6 deletions
diff --git a/vms/perly_c.vms b/vms/perly_c.vms
index bc1183f483..463a5eda78 100644
--- a/vms/perly_c.vms
+++ b/vms/perly_c.vms
@@ -32,7 +32,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 */
@@ -2530,12 +2530,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);