[ViewVC] Annotation of: cvs/IO-AIO/typemap

aio_req         T_AIO
aio_req_ornot   T_AIO_ORNOT
SV8 *           T_SV8

size_t          T_VAL64
ssize_t         T_VAL64
off_t           T_VAL64

aio_rfd         T_AIO_RFD
aio_wfd         T_AIO_WFD

INPUT

T_AIO
        if (!($var = SvAIO_REQ ($arg)))
          croak (\"busy \" AIO_REQ_KLASS \" object expected\")

T_AIO_ORNOT
        if (!($var = SvAIO_REQ ($arg)))
          XSRETURN_EMPTY

T_SV8
        ($var) = $arg;
        if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1))
          croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\")

T_VAL64
        $var = ($type)SvVAL64 ($arg);

T_AIO_RFD
        $var = s_fileno_croak ($arg, 0);

T_AIO_WFD
        $var = s_fileno_croak ($arg, 1);

OUTPUT

T_VAL64
        $arg = newSVval64 ($var);
Revision:	1.8
Committed:	Tue Jul 14 00:13:36 2009 UTC (14 years, 10 months ago) by root
Branch:	MAIN
CVS Tags:	rel-3_3
Changes since 1.7:	+2 -2 lines
Log Message:	* empty log message *
#	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.5	croak (\"busy \" AIO_REQ_KLASS \" 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);