typemap 668 Bytes
Newer Older
1 2 3 4
aio_req		T_AIO
aio_req_ornot	T_AIO_ORNOT
SV8 *		T_SV8

5 6 7 8 9 10 11
size_t          T_VAL64
ssize_t         T_VAL64
off_t           T_VAL64

aio_rfd		T_AIO_RFD
aio_wfd		T_AIO_WFD

12 13 14 15
INPUT

T_AIO
	if (!($var = SvAIO_REQ ($arg)))
16
          croak (\"busy IO::AIO::REQ object expected\")
17 18 19 20 21 22 23 24 25

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\")
26 27 28 29 30

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

T_AIO_RFD
31
	$var = s_fileno_croak ($arg, 0);
32 33

T_AIO_WFD
34
	$var = s_fileno_croak ($arg, 1);
35 36 37 38 39

OUTPUT

T_VAL64
	$arg = newSVval64 ($var);