%module{SOOT};
class TArrayC {
TArrayC(AV* array)
%code{%
size_t len;
Char_t* ary = SOOT::AVToIntegerVec<Char_t>(aTHX_ array, len);
RETVAL = new TArrayC(len, ary);
free(ary);
%};
TArrayCharArray GetArray();
};
%module{SOOT};
class TArrayC {
TArrayC(AV* array)
%code{%
size_t len;
Char_t* ary = SOOT::AVToIntegerVec<Char_t>(aTHX_ array, len);
RETVAL = new TArrayC(len, ary);
free(ary);
%};
TArrayCharArray GetArray();
};