Front page | perl.perl5.porters |
Postings from July 2014
os390 option -DEBUGGING
From:
Yaroslav Kuzmin
Date:
July 2, 2014 06:12
Subject:
os390 option -DEBUGGING
Message ID:
bef86f9160fb4df29feabcb659a3ea04@wal-s-mbx2.rocketsoftware.com
diff --git a/nostdio.h b/nostdio.h
index ef8d652..c815fd8 100644
--- a/nostdio.h
+++ b/nostdio.h
@@ -25,6 +25,8 @@ struct _FILE;
#define FILE struct _FILE
#endif
+#ifndef EBCDIC
+
#define _CANNOT "CANNOT"
#undef clearerr
@@ -125,6 +127,8 @@ struct _FILE;
#define pclose(f) _CANNOT _pclose_
#endif
+#endif /*not define EBCDIC */
+
/*
* Local variables:
* c-indentation-style: bsd
-
os390 option -DEBUGGING
by Yaroslav Kuzmin