Staging
v0.8.1
v0.8.1
Revision 6a9ee0eeaf85590743bedcd0c32b24ae8c205f4f authored by Guido van Rossum on 09 May 1997, 03:21:12 UTC, committed by Guido van Rossum on 09 May 1997, 03:21:12 UTC
1 parent 29f6533
mwerksglue.c
/*
** Glue code for MetroWerks CodeWarrior, which misses
** unix-like routines for file-access.
*/
#ifdef __MWERKS__
#include <Types.h>
#include <Files.h>
#include <Strings.h>
#include <stdio.h>
#include <errno.h>
int
fileno(fp)
FILE *fp;
{
if (fp==stdin) return 0;
else if (fp==stdout) return 1;
else if (fp==stderr) return 2;
else return 3;
}
int
isatty(fd)
int fd;
{
return (fd >= 0 && fd <= 2);
}
int
unlink(old)
char *old;
{
OSErr err;
if ((err=FSDelete(c2pstr(old), 0)) == noErr)
return 0;
errno= err;
return -1;
}
#endif /* __MWERKS__ */
Computing file changes ...