X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=fakesdio.h;h=479123242f6285ab90656136507263dbc2297fc4;hb=cf27e83cadf62074789d2433ea86ae71021b0fc9;hp=374087f5a823fc12ae9d5d74d89bf096bcd60311;hpb=400e04b67c8e31e09c25adaea34369cb26791fdb;p=p5sagit%2Fp5-mst-13.2.git diff --git a/fakesdio.h b/fakesdio.h index 374087f..4791232 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_