12.7.1 IDLの定義

#pragma prefix "inprise.com"

module QoSExt{
   const CORBA::PolicyType RELATIVE_CONN_TIMEOUT_POLICY_TYPE
                                                 = 0x56495304
   interface RelativeConnectionTimeoutPolicy : CORBA::Policy {
       readonly attribute TimeBase::TimeT relative_expiry:
   };
};