Lines Matching defs:io1
2522 IO * const io1 = GvIOn(gv1);
2524 if (IoIFP(io1))
2532 IoIFP(io1) = PerlIO_fdopen(fd[0], "r" SOCKET_OPEN_MODE);
2533 IoOFP(io1) = PerlIO_fdopen(fd[0], "w" SOCKET_OPEN_MODE);
2534 IoTYPE(io1) = IoTYPE_SOCKET;
2538 if (!IoIFP(io1) || !IoOFP(io1) || !IoIFP(io2) || !IoOFP(io2)) {
2539 if (IoIFP(io1)) PerlIO_close(IoIFP(io1));
2540 if (IoOFP(io1)) PerlIO_close(IoOFP(io1));
2541 if (!IoIFP(io1) && !IoOFP(io1)) PerlLIO_close(fd[0]);