diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2000-12-07 21:43:32 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2000-12-07 21:43:32 +0000 |
| commit | 766a733e849204725c27391cf2992d649af4aba6 (patch) | |
| tree | 7935daf06a9e30818e169d984bb68417c31b3745 /fakesdio.h | |
| parent | be696b0a6b61315b71a751e7291be8d8a9066650 (diff) | |
| download | perl-766a733e849204725c27391cf2992d649af4aba6.tar.gz | |
Change PerlIO_(get|set)pos to take SV *
Should fix, OS/2, VMS, (sfio??)
p4raw-id: //depot/perlio@8025
Diffstat (limited to 'fakesdio.h')
| -rw-r--r-- | fakesdio.h | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/fakesdio.h b/fakesdio.h index 374087f5a8..479123242f 100644 --- a/fakesdio.h +++ b/fakesdio.h @@ -71,9 +71,7 @@ #define fread(b,s,c,f) _CANNOT fread #define fwrite(b,s,c,f) _CANNOT fwrite #endif -#define fgetpos(f,p) PerlIO_getpos(f,p) #define fseek(f,o,w) PerlIO_seek(f,o,w) -#define fsetpos(f,p) PerlIO_setpos(f,p) #define ftell(f) PerlIO_tell(f) #define rewind(f) PerlIO_rewind(f) #define clearerr(f) PerlIO_clearerr(f) @@ -84,6 +82,9 @@ #define popen(c,m) my_popen(c,m) #define pclose(f) my_pclose(f) +#define fsetpos(f,p) _CANNOT _fsetpos_ +#define fgetpos(f,p) _CANNOT _fgetpos_ + #define __filbuf(f) _CANNOT __filbuf_ #define _filbuf(f) _CANNOT _filbuf_ #define __flsbuf(c,f) _CANNOT __flsbuf_ |