… | |
… | |
447 | PUSHs (sv_2mortal (newSViv (req->result))); |
447 | PUSHs (sv_2mortal (newSViv (req->result))); |
448 | PUTBACK; |
448 | PUTBACK; |
449 | call_pv ("IO::AIO::_fd2fh", G_SCALAR | G_EVAL); |
449 | call_pv ("IO::AIO::_fd2fh", G_SCALAR | G_EVAL); |
450 | SPAGAIN; |
450 | SPAGAIN; |
451 | |
451 | |
452 | fh = SvREFCNT_inc (POPs); |
452 | fh = POPs; |
453 | |
|
|
454 | PUSHMARK (SP); |
453 | PUSHMARK (SP); |
455 | XPUSHs (sv_2mortal (fh)); |
454 | XPUSHs (fh); |
456 | } |
455 | } |
457 | break; |
456 | break; |
458 | |
457 | |
459 | case REQ_GROUP: |
458 | case REQ_GROUP: |
460 | req->int1 = 2; /* mark group as finished */ |
459 | req->int1 = 2; /* mark group as finished */ |