ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/IO-AIO/typemap
Revision: 1.9
Committed: Thu Nov 12 00:01:52 2009 UTC (14 years, 6 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 ***

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.8 $var = s_fileno_croak ($arg, 0);
32 root 1.7
33     T_AIO_WFD
34 root 1.8 $var = s_fileno_croak ($arg, 1);
35 root 1.7
36     OUTPUT
37    
38     T_VAL64
39     $arg = newSVval64 ($var);