[p5sagit/p5-mst-13.2.git] / perllio.h

#ifndef H_PERLLIO
#define H_PERLLIO 1

#ifdef PERL_OBJECT
#else
#define PerlLIO_access(file, mode) access((file), (mode))
#define PerlLIO_chmod(file, mode) chmod((file), (mode))
#define PerlLIO_chsize(fd, size) chsize((fd), (size))
#define PerlLIO_close(fd) close((fd))
#define PerlLIO_dup(fd) dup((fd))
#define PerlLIO_dup2(fd1, fd2) dup2((fd1), (fd2))
#define PerlLIO_fstat(fd, buf) Fstat((fd), (buf))
#define PerlLIO_isatty(fd) isatty((fd))
#define PerlLIO_lseek(fd, offset, mode) lseek((fd), (offset), (mode))
#define PerlLIO_lstat(name, buf) lstat((name), (buf))
#define PerlLIO_mktemp(file) mktemp((file))
#define PerlLIO_open(file, flag) open((file), (flag))
#define PerlLIO_open3(file, flag, perm) open((file), (flag), (perm))
#define PerlLIO_read(fd, buf, count) read((fd), (buf), (count))
#define PerlLIO_rename(oldname, newname) rename((oldname), (newname))
#define PerlLIO_setmode(fd, mode) setmode((fd), (mode))
#define PerlLIO_stat(name, buf) Stat((name), (buf))
#define PerlLIO_tmpnam(str) tmpnam((str))
#define PerlLIO_umask(mode) umask((mode))
#define PerlLIO_unlink(file) unlink((file))
#define PerlLIO_utime(file, time) utime((file), (time))
#define PerlLIO_write(fd, buf, count) write((fd), (buf), (count))
#endif	/* PERL_OBJECT */

#endif /* Include guard */
Commit	Line	Data
3028581b	1	#ifndef H_PERLLIO
	2	#define H_PERLLIO 1
	3
	4	#ifdef PERL_OBJECT
	5	#else
	6	#define PerlLIO_access(file, mode) access((file), (mode))
	7	#define PerlLIO_chmod(file, mode) chmod((file), (mode))
	8	#define PerlLIO_chsize(fd, size) chsize((fd), (size))
	9	#define PerlLIO_close(fd) close((fd))
	10	#define PerlLIO_dup(fd) dup((fd))
	11	#define PerlLIO_dup2(fd1, fd2) dup2((fd1), (fd2))
	12	#define PerlLIO_fstat(fd, buf) Fstat((fd), (buf))
	13	#define PerlLIO_isatty(fd) isatty((fd))
	14	#define PerlLIO_lseek(fd, offset, mode) lseek((fd), (offset), (mode))
	15	#define PerlLIO_lstat(name, buf) lstat((name), (buf))
	16	#define PerlLIO_mktemp(file) mktemp((file))
	17	#define PerlLIO_open(file, flag) open((file), (flag))
	18	#define PerlLIO_open3(file, flag, perm) open((file), (flag), (perm))
	19	#define PerlLIO_read(fd, buf, count) read((fd), (buf), (count))
	20	#define PerlLIO_rename(oldname, newname) rename((oldname), (newname))
	21	#define PerlLIO_setmode(fd, mode) setmode((fd), (mode))
	22	#define PerlLIO_stat(name, buf) Stat((name), (buf))
	23	#define PerlLIO_tmpnam(str) tmpnam((str))
	24	#define PerlLIO_umask(mode) umask((mode))
	25	#define PerlLIO_unlink(file) unlink((file))
	26	#define PerlLIO_utime(file, time) utime((file), (time))
	27	#define PerlLIO_write(fd, buf, count) write((fd), (buf), (count))
	28	#endif /* PERL_OBJECT */
	29
	30	#endif /* Include guard */
	31