| perlio.c | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| branch | 10 | 16 | 62.5 | 
| line | true | false | branch | 
|---|---|---|---|
| 72 | 2 | 49 | if (result == 0 && PerlIO_error(state->handle)) { | 
| 1 | 1 | if (result == 0 && PerlIO_error(state->handle)) { | |
| 89 | 1 | 23 | if (result == 0) { | 
| 102 | 0 | 2 | if (whence != SEEK_CUR || offset != 0) { | 
| 0 | 0 | if (whence != SEEK_CUR || offset != 0) { | |
| 103 | 0 | 2 | if (PerlIO_seek(state->handle, offset, whence) < 0) { | 
| 118 | 0 | 6 | if (PerlIO_flush(state->handle) < 0) { | 
| 134 | 0 | 2 | if (!result) |