1-74 IDL zu abbildendem Java, v1.2 August 2002 1 Modul CORBA { enum TCKind { tk_null, tk_void, tk_short, tk_long, tk_ushort, tk_ulong, TK-_ Hafer, tk_double, tk_boolean, tk_char, tk_octet, tk_any, tk_TypeCode, tk_Principal, tk_objref, tk_struct, tk_union, tk_enum, tk_string, tk_sequence, tk_array, tk_alias, tk_except, tk_longlong, tk_ulonglong, tk_longdouble, tk_wchar, tk_wstring, xed TK _, tk_value, tk_value_box, tk_native, tk_abstract_interface, tk_local_interface }; typedef kurzes ValueModi er; const ValueModi er VM_NONE = 0; const ValueModi er VM_CUSTOM = 1; const ValueModi er VM_ABSTRACT = 2; const ValueModi er VM_TRUNCATABLE = 3; kurze Sicht des typedef; constsicht PRIVATE_MEMBER = 0; constsicht PUBLIC_MEMBER = 1; }; // Java Paket org.omg.CORBA; allgemeine Kategorie TCKind { allgemeines statisches abschließendes internes _ tk_null = 0; allgemeine statische Endrunde TCKind-tk_null = neues TCKind(_tk_null); allgemeines statisches abschließendes internes _ tk_void = 1; TCKind-tk_void = neues TCKind(_tk_void); allgemeines statisches abschließendes internes _ tk_short = 2; TCKind-tk_short = neues TCKind(_tk_short); allgemeines statisches abschließendes internes _ tk_long = 3; TCKind-tk_long = neues TCKind(_tk_long); allgemeines statisches abschließendes internes _ tk_ushort = 4; TCKind-tk_ushort = neues TCKind(_tk_ushort); allgemeines statisches abschließendes internes _ tk_ulong = 5; TCKind-tk_ulong = neues TCKind(_tk_ulong); allgemeines statisches abschließendes internes _ tk_float = 6; TCKind-tk_float = neues TCKind(_tk_float); allgemeine statische abschließende interne _ tk_double = 7; Tk_double = neues TCKind(_tk_double) TCKind;