else
Perl_croak(aTHX_ "Argument is not an ARRAY reference");
- nitems = av_len(inary) + 1;
+ nitems = av_tindex(inary) + 1;
/* FIXME dunno if supposed to use perl mallocs here */
/* N+1 elements so we know the last one is NULL */
T_BOOL_2( in )
bool in
CODE:
+ PERL_UNUSED_VAR(RETVAL);
OUTPUT:
in
+void
+T_BOOL_OUT( out, in )
+ bool out
+ bool in
+ CODE:
+ out = in;
+ OUTPUT:
+ out
## T_U_INT
OUTPUT:
RETVAL
+char *
+T_PV_null()
+ CODE:
+ RETVAL = NULL;
+ OUTPUT:
+ RETVAL
+
## T_PTR