diff options
| author | Andy Dougherty <doughera@lafcol.lafayette.edu> | 1996-02-28 16:49:33 -0800 |
|---|---|---|
| committer | Andy Dougherty <doughera@lafcol.lafayette.edu> | 1996-02-28 16:49:33 -0800 |
| commit | a5f75d667838e8e7bb037880391f5c44476d33b4 (patch) | |
| tree | 5005e888355c1508bc47da697efe119c1615b123 /vms/vmsish.h | |
| parent | 2920c5d2b358b11ace52104b6944bfa0e89256a7 (diff) | |
| download | perl-a5f75d667838e8e7bb037880391f5c44476d33b4.tar.gz | |
perl 5.002perl-5.002
[editor's note: changes seem to be mostly module updates,
documentation changes and some perl API macro additions]
Diffstat (limited to 'vms/vmsish.h')
| -rw-r--r-- | vms/vmsish.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/vms/vmsish.h b/vms/vmsish.h index 55508b9f97..000ba29c2a 100644 --- a/vms/vmsish.h +++ b/vms/vmsish.h @@ -189,6 +189,9 @@ struct tms { #define Stat(name,bufptr) flex_stat(name,bufptr) #define Fstat(fd,bufptr) flex_fstat(fd,bufptr) +/* By default, flush data all the way to disk, not just to RMS buffers */ +#define Fflush(fp) ((fflush(fp) || fsync(fileno(fp))) ? EOF : 0) + /* Setup for the dirent routines: * opendir(), closedir(), readdir(), seekdir(), telldir(), and * vmsreaddirversions(), and preprocessor stuff on which these depend: @@ -348,6 +351,7 @@ struct passwd * my_getpwuid _((Uid_t uid)); struct passwd * my_getpwent _(()); void my_endpwent _(()); char * my_getlogin _(()); +int rmscopy _((char *, char *)); void init_os_extras _(()); typedef char __VMS_SEPYTOTORP__; /* prototype section end marker; `typedef' passes through cpp */ |