2002/3/22
2. FORTRAN関数(6)
nIntegerからintへ変換し、そのポインタを与えるようになっている。
n
nstatic VALUE _wrap_add2(VALUE self, VALUE varg0, VALUE varg1) {
n    int *arg0, *arg1, temp, temp0, result ;
n    VALUE vresult = Qnil;
n    {
n        temp = NUM2INT(varg0);
n        arg0 = &temp;
n    }
n    {
n        temp0 = NUM2INT(varg1);
n        arg1 = &temp0;
n    }
n    result = (int )add2(arg0,arg1);
n    vresult = INT2NUM(result);
n    return vresult;
n}