multiconcat: don't fold adjacent constants

[perl5.git] / nostdio.h

diff --git a/nostdio.h b/nostdio.h
index 770cf97..64276aa 100644 (file)
--- a/nostdio.h
+++ b/nostdio.h
@@ -1,7 +1,16 @@
+/*    nostdio.h
+ *
+ *    Copyright (C) 1996, 2000, 2001, 2005, by Larry Wall and others
+ *
+ *    You may distribute under the terms of either the GNU General Public
+ *    License or the Artistic License, as specified in the README file.
+ *
+ */
+
 /*
  * Strong denial of stdio - make all stdio calls (we can think of) errors
  */
-/* This is an 1st attempt to stop other include files pulling
+/* This is a 1st attempt to stop other include files pulling
    in real <stdio.h>.
    A more ambitious set of possible symbols can be found in
    sfio.h (inside an _cplusplus gard).
@@ -16,6 +25,8 @@ struct _FILE;
 #define FILE struct _FILE
 #endif
 
+#ifndef EBCDIC
+
 #define _CANNOT "CANNOT"
 
 #undef clearerr
@@ -28,6 +39,7 @@ struct _FILE;
 #undef fgetpos
 #undef fgets
 #undef fileno
+#undef flockfile
 #undef fopen
 #undef fprintf
 #undef fputc
@@ -38,6 +50,8 @@ struct _FILE;
 #undef fseek
 #undef fsetpos
 #undef ftell
+#undef ftrylockfile
+#undef funlockfile
 #undef fwrite
 #undef getc
 #undef getc_unlocked
@@ -56,8 +70,10 @@ struct _FILE;
 #undef tmpfile
 #undef ungetc
 #undef vfprintf
+#undef printf
 
 #define fprintf    _CANNOT _fprintf_
+#define printf     _CANNOT _printf_
 #define stdin      _CANNOT _stdin_
 #define stdout     _CANNOT _stdout_
 #define stderr     _CANNOT _stderr_
@@ -97,7 +113,7 @@ struct _FILE;
 #define _flsbuf(c,f)  _CANNOT _flsbuf_
 #define fdopen(fd,p)  _CANNOT _fdopen_
 #define fileno(f)  _CANNOT _fileno_
-#if SFIO_VERSION < 20000101L
+#if defined(SFIO_VERSION) && SFIO_VERSION < 20000101L
 #define flockfile(f)  _CANNOT _flockfile_
 #define ftrylockfile(f)  _CANNOT _ftrylockfile_
 #define funlockfile(f)  _CANNOT _funlockfile_
@@ -110,3 +126,9 @@ struct _FILE;
 #ifndef OS2
 #define pclose(f)  _CANNOT _pclose_
 #endif
+
+#endif /*not define EBCDIC */
+
+/*
+ * ex: set ts=8 sts=4 sw=4 et:
+ */