1 | aio_req T_AIO |
1 | aio_req T_AIO |
2 | aio_req_ornot T_AIO_ORNOT |
2 | aio_req_ornot T_AIO_ORNOT |
3 | SV8 * T_SV8 |
3 | SV8 * T_SV8 |
|
|
4 | |
|
|
5 | VAL64 T_VAL64 |
|
|
6 | size_t T_VAL64 |
|
|
7 | ssize_t T_VAL64 |
|
|
8 | off_t T_VAL64 |
|
|
9 | |
|
|
10 | aio_rfd T_AIO_RFD |
|
|
11 | aio_wfd T_AIO_WFD |
4 | |
12 | |
5 | INPUT |
13 | INPUT |
6 | |
14 | |
7 | T_AIO |
15 | T_AIO |
8 | if (!($var = SvAIO_REQ ($arg))) |
16 | if (!($var = SvAIO_REQ ($arg))) |
9 | croak (\"busy \" AIO_REQ_KLASS \" object expected\") |
17 | croak (\"busy IO::AIO::REQ object expected\") |
10 | |
18 | |
11 | T_AIO_ORNOT |
19 | T_AIO_ORNOT |
12 | if (!($var = SvAIO_REQ ($arg))) |
20 | if (!($var = SvAIO_REQ ($arg))) |
13 | XSRETURN_EMPTY |
21 | XSRETURN_EMPTY |
14 | |
22 | |
15 | T_SV8 |
23 | T_SV8 |
16 | ($var) = $arg; |
24 | ($var) = $arg; |
17 | if (SvPOK ($var) && !sv_utf8_downgrade ($var, 1)) |
25 | if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1)) |
18 | croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\") |
26 | croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\") |
|
|
27 | |
|
|
28 | T_VAL64 |
|
|
29 | $var = ($type)SvVAL64 ($arg); |
|
|
30 | |
|
|
31 | T_AIO_RFD |
|
|
32 | $var = s_fileno_croak ($arg, 0); |
|
|
33 | |
|
|
34 | T_AIO_WFD |
|
|
35 | $var = s_fileno_croak ($arg, 1); |
|
|
36 | |
|
|
37 | OUTPUT |
|
|
38 | |
|
|
39 | T_VAL64 |
|
|
40 | $arg = newSVval64 ($var); |