diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2001-08-31 20:58:38 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2001-08-31 20:58:38 +0000 |
| commit | acfe0abcedaf592fb4b9cb69ce3468308ae99d91 (patch) | |
| tree | a2ca08c77d2b63d1777d0b228ff53362895c1624 /NetWare/nw5.c | |
| parent | 25f58aea15b072f74afcee1b9074d33e8e7348b5 (diff) | |
| download | perl-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 'NetWare/nw5.c')
| -rw-r--r-- | NetWare/nw5.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/NetWare/nw5.c b/NetWare/nw5.c index a701c654d0..44bb853802 100644 --- a/NetWare/nw5.c +++ b/NetWare/nw5.c @@ -17,7 +17,7 @@ -#include <perl.h> // For dTHXo, etc. +#include <perl.h> // For dTHX, etc. #include "nwpipe.h" @@ -211,7 +211,7 @@ nw_stdout() long nw_telldir(DIR *dirp) { - dTHXo; + dTHX; Perl_croak(aTHX_ "telldir function is not implemented"); return 0l; } @@ -292,7 +292,7 @@ nw_write(int fd, const void *buf, unsigned int cnt) char * nw_crypt(const char *txt, const char *salt) { - dTHXo; + dTHX; #ifdef HAVE_DES_FCRYPT dTHR; @@ -752,7 +752,7 @@ nw_rename(const char *oname, const char *newname) void nw_rewinddir(DIR *dirp) { - dTHXo; + dTHX; Perl_croak(aTHX_ "rewinddir function is not implemented"); } @@ -766,7 +766,7 @@ nw_rewind(FILE *pf) void nw_seekdir(DIR *dirp, long loc) { - dTHXo; + dTHX; Perl_croak(aTHX_ "seekdir function is not implemented"); } |