diff options
| author | Andy Lester <andy@petdance.com> | 2006-04-24 08:44:51 -0500 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-04-25 08:41:38 +0000 |
| commit | 6f207bd3ddac24959aa7f00f2d7a66f116dcc7ed (patch) | |
| tree | c05c17685623eb0158a63b0fb5143f2e64863eba /perlio.c | |
| parent | 9feacc09fc3837bdf59595c9a1e3a32b7651c763 (diff) | |
| download | perl-6f207bd3ddac24959aa7f00f2d7a66f116dcc7ed.tar.gz | |
use NOOP macro
Message-ID: <20060424184451.GA1479@petdance.com>
p4raw-id: //depot/perl@27958
Diffstat (limited to 'perlio.c')
| -rw-r--r-- | perlio.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -2566,7 +2566,7 @@ PerlIOUnix_open(pTHX_ PerlIO_funcs *self, PerlIO_list_t *layers, } else { if (f) { - /*EMPTY*/; + NOOP; /* * FIXME: pop layers ??? */ @@ -2946,7 +2946,7 @@ PerlIOStdio_dup(pTHX_ PerlIO *f, PerlIO *o, CLONE_PARAMS *param, int flags) goto set_this; } else { - /*EMPTY*/; + NOOP; /* FIXME: To avoid messy error recovery if dup fails re-use the existing stdio as though flag was not set */ @@ -3235,7 +3235,7 @@ PerlIOStdio_flush(pTHX_ PerlIO *f) return PerlSIO_fflush(stdio); } else { - /*EMPTY*/; + NOOP; #if 0 /* * FIXME: This discards ungetc() and pre-read stuff which is not @@ -4377,7 +4377,7 @@ PerlIOCrlf_set_ptrcnt(pTHX_ PerlIO *f, STDCHAR * ptr, SSize_t cnt) ptr -= cnt; } else { - /*EMPTY*/; + NOOP; #if 0 /* * Test code - delete when it works ... |