Как передать переменную из LISPa в OARX?

int imq_funkcii() {
//читает аргументи
    struct resbuf *rb1 = ads_getargs(),*rb;
//нет аргументов
    if(rb1==NULL) {
       return 0;
    }
//первий аргумент тип real (например)
    if(rb1->restype!=RTREAL) {
//или нет или не real
    ads_relrb(rb1);
    return 0;
    }
          double Value1;
    Value1=rb1->resval.rreal;
    rb=rb1->rbnext;
//второй тип string
    if(rb==NULL !! rb->restype!=RTSTR) {
//или нет или не string
    ads_relrb(rb1);
       return 0;
    }
    CString Value2;
    Value2=rb1->resval.rstring;
// и так далее
//   rb=rb->rbnext;
      ads_relrb(rb1);
      return 0;
}