2002/3/22
4.構造体をクラスにラップする (4)
narginitとignoreに分離してしのぐ
n%typemap(arginit) gsl_vector *self {
n  Data_Get_Struct(self, $1_basetype, $1);
n}
n%typemap(ignore) gsl_vector *self,
n                              gsl_vector *self_return {}
n%typemap(ignore) gsl_vector *self_return_alloc {
n  $1_basetype *self_vector;
n  Data_Get_Struct(self, $1_basetype, self_vector);
n  $1 = $1_basetype_alloc(self_vector->size);
n}
n%typemap(ignore) gsl_vector *self_return_cp {
n  $1_basetype *self_vector;
n  Data_Get_Struct(self, $1_basetype, self_vector);
n  $1 = $1_basetype_alloc(self_vector->size);
n  $1_basetype_memcpy($1, self_vector);
n}