ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/IO-AIO/typemap
Revision: 1.10
Committed: Tue Feb 23 19:42:44 2016 UTC (8 years, 2 months ago) by root
Branch: MAIN
CVS Tags: rel-4_4, rel-4_5, rel-4_6, rel-4_7, rel-4_52, rel-4_53, rel-4_51, rel-4_54, rel-4_71, rel-4_34
Changes since 1.9: +2 -2 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.7 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 root 1.1 INPUT
13    
14     T_AIO
15 root 1.4 if (!($var = SvAIO_REQ ($arg)))
16 root 1.9 croak (\"busy IO::AIO::REQ object expected\")
17 root 1.1
18     T_AIO_ORNOT
19 root 1.4 if (!($var = SvAIO_REQ ($arg)))
20 root 1.5 XSRETURN_EMPTY
21 root 1.1
22 root 1.5 T_SV8
23     ($var) = $arg;
24 root 1.6 if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1))
25 root 1.5 croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\")
26 root 1.7
27     T_VAL64
28     $var = ($type)SvVAL64 ($arg);
29    
30     T_AIO_RFD
31 root 1.10 $var = s_fileno_croak ($arg, 0);
32 root 1.7
33     T_AIO_WFD
34 root 1.10 $var = s_fileno_croak ($arg, 1);
35 root 1.7
36     OUTPUT
37    
38     T_VAL64
39     $arg = newSVval64 ($var);