This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Make opendir() filename const in Win32-land & friends
[perl5.git] / NetWare / nwperlsys.h
index 0d731d1..5863e85 100644 (file)
@@ -184,7 +184,7 @@ PerlDirClose(struct IPerlDir* piPerl, DIR *dirp)
 }
 
 DIR*
-PerlDirOpen(struct IPerlDir* piPerl, char *filename)
+PerlDirOpen(struct IPerlDir* piPerl, const char *filename)
 {
        return nw_opendir(filename);
 }