summaryrefslogtreecommitdiff
path: root/epoc
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 /epoc
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 'epoc')
-rw-r--r--epoc/epoc.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/epoc/epoc.c b/epoc/epoc.c
index 6652ef0ce1..e5496eafd0 100644
--- a/epoc/epoc.c
+++ b/epoc/epoc.c
@@ -99,7 +99,7 @@ __fixunsdfsi (a)
int
do_spawn( char *cmd) {
- dTHXo;
+ dTHX;
char *argv0, *ptr;
char *cmdptr = cmd;
int ret;
@@ -125,7 +125,7 @@ do_spawn( char *cmd) {
int
do_aspawn ( void *vreally, void **vmark, void **vsp) {
- dTHXo;
+ dTHX;
SV *really = (SV*)vreally;
SV **mark = (SV**)vmark;
@@ -232,7 +232,7 @@ XS(epoc_getcwd) /* more or less stolen from win32.c */
void
Perl_init_os_extras(void)
{
- dTHXo;
+ dTHX;
char *file = __FILE__;
newXS("EPOC::getcwd", epoc_getcwd, file);
}