stock perl 5.8.0 from CPAN

1 files changed, 8 insertions, 8 deletions

diff --git a/gnu/usr.bin/perl/NetWare/nwperlhost.h b/gnu/usr.bin/perl/NetWare/nwperlhost.h
index c69e554489b..002bc676e05 100644
--- a/gnu/usr.bin/perl/NetWare/nwperlhost.h
+++ b/gnu/usr.bin/perl/NetWare/nwperlhost.h
@@ -1,6 +1,6 @@
 
 /*
- * Copyright © 2001 Novell, Inc. All Rights Reserved.
+ * Copyright © 2001 Novell, Inc. All Rights Reserved.
  *
  * You may distribute under the terms of either the GNU General Public
  * License or the Artistic License, as specified in the README file.
@@ -441,14 +441,14 @@ PerlStdIOGetc(struct IPerlStdIO* piPerl, PerlIO* pf)
     return nw_getc((FILE*)pf);
 }
 
-STDCHAR*
+char*
 PerlStdIOGetBase(struct IPerlStdIO* piPerl, PerlIO* pf)
 {
 #ifdef FILE_base
     FILE *f = (FILE*)pf;
     return FILE_base(f);
 #else
-    return NULL;
+    return Nullch;
 #endif
 }
 
@@ -474,14 +474,14 @@ PerlStdIOGetCnt(struct IPerlStdIO* piPerl, PerlIO* pf)
 #endif
 }
 
-STDCHAR*
+char*
 PerlStdIOGetPtr(struct IPerlStdIO* piPerl, PerlIO* pf)
 {
 #ifdef USE_STDIO_PTR
     FILE *f = (FILE*)pf;
     return FILE_ptr(f);
 #else
-    return NULL;
+    return Nullch;
 #endif
 }
 
@@ -568,7 +568,7 @@ PerlStdIOSetCnt(struct IPerlStdIO* piPerl, PerlIO* pf, int n)
 }
 
 void
-PerlStdIOSetPtrCnt(struct IPerlStdIO* piPerl, PerlIO* pf, STDCHAR * ptr, int n)
+PerlStdIOSetPtrCnt(struct IPerlStdIO* piPerl, PerlIO* pf, char * ptr, int n)
 {
 #ifdef STDIO_PTR_LVALUE
     FILE *f = (FILE*)pf;
@@ -890,7 +890,7 @@ PerlLIOUnlink(struct IPerlLIO* piPerl, const char *filename)
 }
 
 int
-PerlLIOUtime(struct IPerlLIO* piPerl, const char *filename, struct utimbuf *times)
+PerlLIOUtime(struct IPerlLIO* piPerl, char *filename, struct utimbuf *times)
 {
     return nw_utime(filename, times);
 }
@@ -961,7 +961,7 @@ PerlDirClose(struct IPerlDir* piPerl, DIR *dirp)
 }
 
 DIR*
-PerlDirOpen(struct IPerlDir* piPerl, const char *filename)
+PerlDirOpen(struct IPerlDir* piPerl, char *filename)
 {
 	return nw_opendir(filename);
 }