Struct request adjusted for inter-executor invocation.

[frescor/frsh-forb.git] / src / forb / src / tests / executor_calls.c

diff --git a/src/forb/src/tests/executor_calls.c b/src/forb/src/tests/executor_calls.c
index 981145f9c719baf0e440560d60d239085173eef8..922754d283a793f7930de5767cc7c92176a7f09d 100644 (file)
--- a/src/forb/src/tests/executor_calls.c
+++ b/src/forb/src/tests/executor_calls.c
@@ -34,13 +34,14 @@ CORBA_long myinterface_add(myinterface _obj, const CORBA_long a, const CORBA_lon
     _forb_retval = _myinterface_impl(_obj)->add(_obj, a, b, ev);
   } else {
     /* remote object - the same as before */
+    unsigned index;
     forb_request_t req;
-    ex_on_fail(forb_request_init(&req, _obj) == 0, FORB_EX_INTERNAL);
-    forb_iop_prepare_request(&req, "myinterface", FORB_METHOD_INDEX(myinterface_add), ev);
+    ex_on_fail(forb_request_init(&req, _obj, "myinterface", FORB_METHOD_INDEX(myinterface_add)) == 0, FORB_EX_INTERNAL);
+    forb_iop_prepare_request(&req, &index, ev);
     if (forb_exception_occurred(ev)) goto exception;
     ex_on_fail(CORBA_long_serialize(&req.cdr_request, &a), FORB_EX_IMP_LIMIT);
     ex_on_fail(CORBA_long_serialize(&req.cdr_request, &b), FORB_EX_IMP_LIMIT);
-    forb_request_send(&req, ev);
+    forb_request_send(&req, index, ev);
     if (forb_exception_occurred(ev)) goto exception;
     forb_request_wait_for_reply(&req);
     if (forb_exception_occurred(ev)) goto exception;