Commit | Line | Data |
---|---|---|
3028581b GS |
1 | #ifndef H_PERLDIR |
2 | #define H_PERLDIR 1 | |
3 | ||
4 | #ifdef PERL_OBJECT | |
5 | #else | |
f7d144c8 | 6 | #define PerlDir_mkdir(name, mode) Mkdir((name), (mode)) |
3028581b GS |
7 | #define PerlDir_chdir(name) chdir((name)) |
8 | #define PerlDir_rmdir(name) rmdir((name)) | |
9 | #define PerlDir_close(dir) closedir((dir)) | |
10 | #define PerlDir_open(name) opendir((name)) | |
11 | #define PerlDir_read(dir) readdir((dir)) | |
12 | #define PerlDir_rewind(dir) rewinddir((dir)) | |
13 | #define PerlDir_seek(dir, loc) seekdir((dir), (loc)) | |
14 | #define PerlDir_tell(dir) telldir((dir)) | |
15 | #endif /* PERL_OBJECT */ | |
16 | ||
17 | #endif /* Include guard */ | |
18 |