e40e358b75a2a170b45b71a2bfa7eca4615bc07b
[p5sagit/p5-mst-13.2.git] / dosish.h
1 #define ABORT() abort();
2
3 #define BIT_BUCKET "\dev\nul"
4 #define PERL_SYS_INIT(c,v)
5 #define PERL_SYS_TERM()
6 #define dXSUB_SYS int dummy
7 #define TMPPATH "plXXXXXX"
8
9 /*
10  * fwrite1() should be a routine with the same calling sequence as fwrite(),
11  * but which outputs all of the bytes requested as a single stream (unlike
12  * fwrite() itself, which on some systems outputs several distinct records
13  * if the number_of_items parameter is >1).
14  */
15 #define fwrite1 fwrite
16
17 #define Stat(fname,bufptr) stat((fname),(bufptr))
18 #define Fstat(fd,bufptr)   fstat((fd),(bufptr))
19 #define Fflush(fp)         fflush(fp)
20
21 #define my_getenv(var)  getenv(var)