# Automatically generated file-level types code. DO NOT EDIT. # Generated on Wed May 10 20:32:07 2000 by idl2perl 2.7 with command: # bin/idl2perl -outdir t/COPE Extra.idl use COPE::CORBA::TypeCode; # Alias Str30 (IDL:cope/Str30:1.0) package Str30; CORBA::TypeCode::_new_type_impl('Str30', CORBA::TypeCode::_create_alias_tc('IDL:cope/Str30:1.0', 'Str30', CORBA::TypeCode::_create_string_tc(30))); # Alias Extra1Seq (IDL:cope/Extra1Seq:1.0) package Extra1Seq; CORBA::TypeCode::_new_type_impl('Extra1Seq', CORBA::TypeCode::_create_alias_tc('IDL:cope/Extra1Seq:1.0', 'Extra1Seq', CORBA::TypeCode::_create_sequence_tc(0, $Extra1::_tc))); BEGIN {CORBA::TypeCode::_pre_init( 'Extra1' )} use COPE::Extra1_types; 1;