Skip to content

Commit ffc2a04

Browse files
committed
Deprecate PERLIO_K_DUMMY as it doesn't do anything
In fact, it hasn't done anything for like a decade
1 parent bc8ebc5 commit ffc2a04

File tree

2 files changed

+5
-5
lines changed

2 files changed

+5
-5
lines changed

perlio.c

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1024,7 +1024,7 @@ PERLIO_FUNCS_DECL(PerlIO_remove) = {
10241024
sizeof(PerlIO_funcs),
10251025
"pop",
10261026
0,
1027-
PERLIO_K_DUMMY | PERLIO_K_UTF8,
1027+
PERLIO_K_UTF8,
10281028
PerlIOPop_pushed,
10291029
NULL,
10301030
PerlIOBase_open,
@@ -2243,7 +2243,7 @@ PERLIO_FUNCS_DECL(PerlIO_utf8) = {
22432243
sizeof(PerlIO_funcs),
22442244
"utf8",
22452245
0,
2246-
PERLIO_K_DUMMY | PERLIO_K_UTF8 | PERLIO_K_MULTIARG,
2246+
PERLIO_K_UTF8 | PERLIO_K_MULTIARG,
22472247
PerlIOUtf8_pushed,
22482248
NULL,
22492249
PerlIOBase_open,
@@ -2274,7 +2274,7 @@ PERLIO_FUNCS_DECL(PerlIO_byte) = {
22742274
sizeof(PerlIO_funcs),
22752275
"bytes",
22762276
0,
2277-
PERLIO_K_DUMMY | PERLIO_K_MULTIARG,
2277+
PERLIO_K_MULTIARG,
22782278
PerlIOUtf8_pushed,
22792279
NULL,
22802280
PerlIOBase_open,
@@ -2305,7 +2305,7 @@ PERLIO_FUNCS_DECL(PerlIO_raw) = {
23052305
sizeof(PerlIO_funcs),
23062306
"raw",
23072307
0,
2308-
PERLIO_K_DUMMY,
2308+
0,
23092309
PerlIORaw_pushed,
23102310
PerlIOBase_popped,
23112311
PerlIOBase_open,

perliol.h

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -57,7 +57,7 @@ struct _PerlIO_funcs {
5757
#define PERLIO_K_BUFFERED 0x00000002
5858
#define PERLIO_K_CANCRLF 0x00000004
5959
#define PERLIO_K_FASTGETS 0x00000008
60-
#define PERLIO_K_DUMMY 0x00000010
60+
#define PERLIO_K_DUMMY 0x00000000 /* DEPRECATED */
6161
#define PERLIO_K_UTF8 0x00008000
6262
#define PERLIO_K_DESTRUCT 0x00010000
6363
#define PERLIO_K_MULTIARG 0x00020000

0 commit comments

Comments
 (0)