| … | … | ||
|---|---|---|---|
| 1492 | PerlIOUnix_refcnt_inc (fd); | 1492 | PerlIOUnix_refcnt_inc (fd); |
| 1493 | do_close ((GV *)fh, 1); | 1493 | do_close ((GV *)fh, 1); |
| 1494 | 1494 | ||
| 1495 | req->type = EIO_CLOSE; | 1495 | req->type = EIO_CLOSE; |
| 1496 | req->int1 = fd; | 1496 | req->int1 = fd; |
| 1497 | req->sv2 = newSVsv (fh); | 1497 | /*req->sv2 = newSVsv (fh);*/ /* since we stole the fd, no need to keep the fh */ |
| 1498 | } | 1498 | } |
| 1499 | else | 1499 | else |
| 1500 | { | 1500 | { |
| 1501 | /* fd number */ | 1501 | /* fd number */ |
| 1502 | req->type = EIO_DUP2; | 1502 | req->type = EIO_DUP2; |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |