diff options
author | 2000-04-06 17:03:22 +0000 | |
---|---|---|
committer | 2000-04-06 17:03:22 +0000 | |
commit | e2e5c5d36e4398ba94879f0a31b0307421edcfdb (patch) | |
tree | 15b8472335eac9359a0b196bf3480d422401d8ff /gnu/usr.bin/perl/win32/include | |
parent | only call get_random_bytes() once in m_pad() (diff) | |
download | wireguard-openbsd-e2e5c5d36e4398ba94879f0a31b0307421edcfdb.tar.xz wireguard-openbsd-e2e5c5d36e4398ba94879f0a31b0307421edcfdb.zip |
perl-5.6.0 + local changes
Diffstat (limited to 'gnu/usr.bin/perl/win32/include')
-rw-r--r-- | gnu/usr.bin/perl/win32/include/dirent.h | 46 | ||||
-rw-r--r-- | gnu/usr.bin/perl/win32/include/sys/socket.h | 6 |
2 files changed, 27 insertions, 25 deletions
diff --git a/gnu/usr.bin/perl/win32/include/dirent.h b/gnu/usr.bin/perl/win32/include/dirent.h index be363ce8044..a66901234fe 100644 --- a/gnu/usr.bin/perl/win32/include/dirent.h +++ b/gnu/usr.bin/perl/win32/include/dirent.h @@ -1,49 +1,53 @@ -// dirent.h +/* dirent.h */ -// djl -// Provide UNIX compatibility +/* djl + * Provide UNIX compatibility + */ #ifndef _INC_DIRENT #define _INC_DIRENT -// -// NT versions of readdir(), etc -// From the MSDOS implementation -// +/* + * NT versions of readdir(), etc + * From the MSDOS implementation + */ -// Directory entry size +/* Directory entry size */ #ifdef DIRSIZ #undef DIRSIZ #endif #define DIRSIZ(rp) (sizeof(struct direct)) -// needed to compile directory stuff +/* needed to compile directory stuff */ #define DIRENT direct -// structure of a directory entry +/* structure of a directory entry */ typedef struct direct { - long d_ino; // inode number (not used by MS-DOS) - int d_namlen; // Name length - char d_name[257]; // file name + long d_ino; /* inode number (not used by MS-DOS) */ + long d_namlen; /* name length */ + char d_name[257]; /* file name */ } _DIRECT; -// structure for dir operations +/* structure for dir operations */ typedef struct _dir_struc { - char *start; // Starting position - char *curr; // Current position - long size; // Size of string table - long nfiles; // number if filenames in table - struct direct dirstr; // Directory structure to return + char *start; /* starting position */ + char *curr; /* current position */ + long size; /* allocated size of string table */ + long nfiles; /* number of filenames in table */ + struct direct dirstr; /* directory structure to return */ + void* handle; /* system handle */ + char *end; /* position after last filename */ } DIR; +#if 0 /* these have moved to win32iop.h */ DIR * win32_opendir(char *filename); struct direct * win32_readdir(DIR *dirp); long win32_telldir(DIR *dirp); void win32_seekdir(DIR *dirp,long loc); void win32_rewinddir(DIR *dirp); int win32_closedir(DIR *dirp); +#endif - -#endif //_INC_DIRENT +#endif /* _INC_DIRENT */ diff --git a/gnu/usr.bin/perl/win32/include/sys/socket.h b/gnu/usr.bin/perl/win32/include/sys/socket.h index 6ffb0ac269e..194de9581f8 100644 --- a/gnu/usr.bin/perl/win32/include/sys/socket.h +++ b/gnu/usr.bin/perl/win32/include/sys/socket.h @@ -47,9 +47,9 @@ typedef struct _OVERLAPPED { #endif #endif //_WINDOWS_ -#ifndef __GNUC__ +// #ifndef __GNUC__ #include <winsock.h> -#endif +// #endif #define ENOTSOCK WSAENOTSOCK #undef HOST_NOT_FOUND @@ -142,7 +142,6 @@ void win32_endprotoent(void); void win32_endservent(void); #ifndef WIN32SCK_IS_STDSCK -#ifndef PERL_OBJECT // // direct to our version // @@ -204,7 +203,6 @@ void win32_endservent(void); #define FD_ZERO(p) PERL_FD_ZERO(p) #endif /* USE_SOCKETS_AS_HANDLES */ -#endif /* PERL_OBJECT */ #endif /* WIN32SCK_IS_STDSCK */ #ifdef __cplusplus |