3 #define WVTEST_CONFIGURED
5 #include <forb/executor.h>
6 #include <forb/object.h>
9 static CORBA_long add(test_obj obj, CORBA_long val, CORBA_Environment *ev)
11 int to_add = (intptr_t)forb_object_instance_data(obj);
15 static CORBA_long add_indirect(test_obj obj, test_obj indirect_obj, CORBA_long val, CORBA_Environment *ev)
17 return test_obj_add(indirect_obj, val, ev);
20 static const struct forb_test_obj_impl test_obj_impl = {
22 .add_indirect = add_indirect,
26 void *executor_thread(void *arg)
28 forb_executor_t *executor = arg;
29 forb_executor_run(executor);
33 int forb_main(forb_orb orb, int argc, char *argv[])
37 testobj = forb_test_obj_new(orb, &test_obj_impl, (void*)1);
40 forb_execute_object(testobj);