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 LW |
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 LW |
20 | |
21 | #define my_getenv(var) getenv(var) |