1 // author : Boris Kolpackov <boris@dre.vanderbilt.edu>
8 const InvokeMe_ptr server_
;
10 always(const InvokeMe_ptr x
):server_(x
) {}
13 ACE_DEBUG ((LM_DEBUG
, "\n"));
20 ACE_TMAIN(int argc
, ACE_TCHAR
*argv
[])
24 CORBA::ORB_var orb
= CORBA::ORB_init (argc
, argv
);
28 ACE_DEBUG ((LM_ERROR
, "Usage: %s <ior>\n", argv
[0]));
32 CORBA::Object_var obj
= orb
->string_to_object (argv
[1]);
33 InvokeMe_var server
= InvokeMe::_narrow (obj
.in ());
35 always
Shutdown( server
.in ()); // When goes out of scope!
37 ACE_DEBUG ((LM_DEBUG
, "\n"));
40 catch (const ::CORBA::Exception
&ex
)
42 ex
._tao_print_exception ("ERROR : unexpected CORBA exception caught : ");