This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perluniintro: Fix comment, Encode::decode does not have to return string with UTF8...
[perl5.git] / win32 / include / dirent.h
index d6eb7ea..5037825 100644 (file)
@@ -26,7 +26,7 @@ typedef struct direct
 {
        long    d_ino;                  /* inode number (not used by MS-DOS)  */
        long    d_namlen;               /* name length  */
-       char    *d_name;                /* file name  */
+       char    d_name[257];            /* file name  */
 } _DIRECT;
 
 /* structure for dir operations */
@@ -42,7 +42,7 @@ typedef struct _dir_struc
 } DIR;
 
 #if 0          /* these have moved to win32iop.h */
-DIR *          win32_opendir(char *filename);
+DIR *          win32_opendir(const char *filename);
 struct direct *        win32_readdir(DIR *dirp);
 long           win32_telldir(DIR *dirp);
 void           win32_seekdir(DIR *dirp,long loc);