Revision: | 1.9 |
Committed: | Thu Nov 12 00:01:52 2009 UTC (14 years, 8 months ago) by root |
Branch: | MAIN |
CVS Tags: | rel-3_93, rel-3_92, rel-3_91, rel-3_71, rel-3_31, rel-4_0, rel-4_1, rel-4_2, rel-4_3, rel-3_7, rel-3_6, rel-3_5, rel-3_4, rel-4_17, rel-4_14, rel-3_9, rel-3_8, rel-4_15, rel-4_12, rel-3_65, rel-4_31, rel-4_32, rel-4_33, rel-4_11, rel-4_18, rel-4_19 |
Changes since 1.8: | +1 -1 lines |
Log Message: | *** empty log message *** |
# | Content |
---|---|
1 | aio_req T_AIO |
2 | aio_req_ornot T_AIO_ORNOT |
3 | SV8 * T_SV8 |
4 | |
5 | size_t T_VAL64 |
6 | ssize_t T_VAL64 |
7 | off_t T_VAL64 |
8 | |
9 | aio_rfd T_AIO_RFD |
10 | aio_wfd T_AIO_WFD |
11 | |
12 | INPUT |
13 | |
14 | T_AIO |
15 | if (!($var = SvAIO_REQ ($arg))) |
16 | croak (\"busy IO::AIO::REQ object expected\") |
17 | |
18 | T_AIO_ORNOT |
19 | if (!($var = SvAIO_REQ ($arg))) |
20 | XSRETURN_EMPTY |
21 | |
22 | T_SV8 |
23 | ($var) = $arg; |
24 | if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1)) |
25 | croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\") |
26 | |
27 | T_VAL64 |
28 | $var = ($type)SvVAL64 ($arg); |
29 | |
30 | T_AIO_RFD |
31 | $var = s_fileno_croak ($arg, 0); |
32 | |
33 | T_AIO_WFD |
34 | $var = s_fileno_croak ($arg, 1); |
35 | |
36 | OUTPUT |
37 | |
38 | T_VAL64 |
39 | $arg = newSVval64 ($var); |