Commit | Line | Data |
79072805 |
1 | #define ABORT() abort(); |
a0d0e21e |
2 | |
59c30bed |
3 | #define BIT_BUCKET "\dev\nul" |
c07a80fd |
4 | #define PERL_SYS_INIT(c,v) |
59c30bed |
5 | #define PERL_SYS_TERM() |
6 | #define dXSUB_SYS int dummy |
e632a5f6 |
7 | #define TMPPATH "plXXXXXX" |
c07a80fd |
8 | |
a0d0e21e |
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)) |
a5f75d66 |
19 | #define Fflush(fp) fflush(fp) |
a0d0e21e |
20 | |
21 | #define my_getenv(var) getenv(var) |