ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/IO-AIO/typemap
Revision: 1.11
Committed: Mon Mar 18 23:52:09 2019 UTC (5 years, 2 months ago) by root
Branch: MAIN
CVS Tags: rel-4_74, rel-4_75, rel-4_76, rel-4_77, rel-4_72, rel-4_73
Changes since 1.10: +1 -0 lines
Log Message:
*** empty log message ***

File Contents

# User Rev Content
1 root 1.1 aio_req T_AIO
2     aio_req_ornot T_AIO_ORNOT
3 root 1.5 SV8 * T_SV8
4 root 1.1
5 root 1.11 VAL64 T_VAL64
6 root 1.7 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
12    
13 root 1.1 INPUT
14    
15     T_AIO
16 root 1.4 if (!($var = SvAIO_REQ ($arg)))
17 root 1.9 croak (\"busy IO::AIO::REQ object expected\")
18 root 1.1
19     T_AIO_ORNOT
20 root 1.4 if (!($var = SvAIO_REQ ($arg)))
21 root 1.5 XSRETURN_EMPTY
22 root 1.1
23 root 1.5 T_SV8
24     ($var) = $arg;
25 root 1.6 if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1))
26 root 1.5 croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\")
27 root 1.7
28     T_VAL64
29     $var = ($type)SvVAL64 ($arg);
30    
31     T_AIO_RFD
32 root 1.10 $var = s_fileno_croak ($arg, 0);
33 root 1.7
34     T_AIO_WFD
35 root 1.10 $var = s_fileno_croak ($arg, 1);
36 root 1.7
37     OUTPUT
38    
39     T_VAL64
40     $arg = newSVval64 ($var);