[PolyORB-users] PolyORB / Mico oneway procedure interoperability?
Jerome Hugues
hugues at infres.enst.fr
Tue Oct 18 18:06:24 CEST 2005
Hi Rémi,
Just a thought when investigating your code, after investigating PolyORB
Rémi Lafage (remi.lafage at cena.fr):
Here is a snippet from your test
> allfunc->oneway_void_proc();
> sleep(1);
> bool ok = (allfunc->oneway_checker() == 1);
> if (ok) {
> sleep(5);
> ok = (allfunc->oneway_checker() == 2);
> }
> if (ok) {
> printf("ONEWAY FAILED!\n");
> } else {
> printf("ONEWAY OK!\n");
> }
> }
Here is the Ada equivalent (our code)
begin
oneway_void_proc (MyObj);
delay 1.0;
Ok := oneway_checker (MyObj) = 1;
if Ok then
delay 5.0;
Ok := oneway_checker (MyObj) = 2;
end if;
exception when others =>
Ok := False;
end;
Output ("test void one way procedure", Ok);
Unless I'm mistaken, there is an error in your test .. you've switched
"ONEWAY FAILED" and "ONEWAY OK", haven't you ?
--
Jerome
More information about the PolyORB-users
mailing list