8.5.   CORBA- 289

#|nclude <iostream>

^ ^dtn^machine imDl h" 4_____   
ffinclude adding_macmne_impl.h 4  adding_machine

int main (int argc, char *argv[])

{______________________________________      

ORB-

CORBA::ORB var Orb = CORBA::ORB_init(argc,argv,"mico-local-orb"); <_ ^-

CORBA::BOA var Boa = Orb->BOA init(argc,argv,"mico-local-boa");   ^W  

==v 3a^I      

adding machine impi *AddingMachine = new adding machine irnpl; -4Q 

-.-       _ i-       ^  

CORBA::String var lor = Orb->object to string(Addinglvlachine);               .-,

              ' - ~   "    ~       '               

ofstream Out("adding_machine.ior");                           ^___  

W IOR-  
Out lor;                                                           

Out.closeQ;

Boa->irnpl_is_ready(CORBA::lrnplementationDef::_nil());

Orb->run();         <

CORBA::release(AddingMachine);

return(O);

^  
-Q  -


}
. 8.5.  ,    CORBA- 

     ,   -
 ,     ( -
).     ,     (. . 8.5) -
   Orb   IOR-    -
    adding_machine. ior.       FTP-
,   ,    
 (HTTP)   Web-,      NFS
 ..      IOR-,     -
 .   IOR- -   -
  - (). -, -
  . 8.5,      CORBA-
  (-),   ,    -
 ,     -.

8.5.   CORBA-

,  ,   . 8.4  8.5, ,   CORBA-
   ORB-,  ,   IOR-
       .  
CORBA-   . 8.6.