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