… | |
… | |
254 | sv_type [ent->type] = newSViv (ent->type); |
254 | sv_type [ent->type] = newSViv (ent->type); |
255 | SvREADONLY_on (sv_type [ent->type]); |
255 | SvREADONLY_on (sv_type [ent->type]); |
256 | } |
256 | } |
257 | |
257 | |
258 | av_store (avent, 0, namesv); |
258 | av_store (avent, 0, namesv); |
|
|
259 | av_store (avent, 1, SvREFCNT_inc (sv_type [ent->type])); |
259 | av_store (avent, 1, IVSIZE >= 8 ? newSVuv (ent->inode) : newSVnv (ent->inode)); |
260 | av_store (avent, 2, IVSIZE >= 8 ? newSVuv (ent->inode) : newSVnv (ent->inode)); |
260 | av_store (avent, 2, SvREFCNT_inc (sv_type [ent->type])); |
|
|
261 | |
261 | |
262 | av_store (av, i, newRV_noinc ((SV *)avent)); |
262 | av_store (av, i, newRV_noinc ((SV *)avent)); |
263 | } |
263 | } |
264 | else |
264 | else |
265 | av_store (av, i, namesv); |
265 | av_store (av, i, namesv); |
… | |
… | |
961 | req->sv1 = newSVsv (pathname); |
961 | req->sv1 = newSVsv (pathname); |
962 | req->ptr1 = SvPVbyte_nolen (req->sv1); |
962 | req->ptr1 = SvPVbyte_nolen (req->sv1); |
963 | req->int1 = flags | EIO_READDIR_DENTS | EIO_READDIR_CUSTOM1; |
963 | req->int1 = flags | EIO_READDIR_DENTS | EIO_READDIR_CUSTOM1; |
964 | |
964 | |
965 | if (flags & EIO_READDIR_DENTS) |
965 | if (flags & EIO_READDIR_DENTS) |
966 | flags |= EIO_READDIR_CUSTOM2; |
966 | req->int1 |= EIO_READDIR_CUSTOM2; |
967 | |
967 | |
968 | REQ_SEND; |
968 | REQ_SEND; |
969 | } |
969 | } |
970 | |
970 | |
971 | void |
971 | void |