2002/3/22
2. FORTRAN関数(3)
n生成されるコード(抜粋、書式を変更)
n
nstatic VALUE _wrap_add_(VALUE self, VALUE varg0, VALUE varg1) {
n    int *arg0 ;
n    int *arg1 ;
n    int result ;
n    VALUE vresult = Qnil;
n
n    arg0 = (int *)SWIG_ConvertPtr(varg0, SWIGTYPE_p_int); //int *のオブジェクトから変換
n    arg1 = (int *)SWIG_ConvertPtr(varg1, SWIGTYPE_p_int); // 同上
n    result = (int )add2(arg0,arg1);
n    vresult = INT2NUM(result);
n    return vresult;
n}
n使えないこともないが、すごく不便
np Test2.add_(1, 2) # =>
nin `add_': Expected int * (TypeError )