CORBA-IDL
view release on metacpan or search on metacpan
lib/CORBA/IDL/ParserXp.pm view on Meta::CPAN
####################################################################
#
# This file was generated using Parse::Yapp version 1.05.
#
# Don't edit this file, use source file instead.
#
# ANY CHANGE MADE HERE WILL BE LOST !
#
####################################################################
package CORBA::IDL::Parser;
use vars qw ( @ISA );
use strict;
@ISA= qw ( Parse::Yapp::Driver );
use Parse::Yapp::Driver;
sub new {
my($class)=shift;
ref($class)
and $class=ref($class);
my($self)=$class->SUPER::new( yyversion => '1.05',
yystates =>
[
{#State 0
ACTIONS => {
'' => -3,
'ENUM' => -394,
'INTERFACE' => -394,
'VALUETYPE' => -394,
'CUSTOM' => -394,
'IMPORT' => 21,
'UNION' => -394,
'NATIVE' => -394,
'CODE_FRAGMENT' => -394,
'TYPEDEF' => -394,
'EXCEPTION' => -394,
'error' => 23,
"[" => -394,
'LOCAL' => -394,
'IDENTIFIER' => 12,
'TYPEID' => 25,
'MODULE' => -394,
'STRUCT' => -394,
'CONST' => -394,
'ABSTRACT' => -394,
'DECLSPEC' => 29,
'TYPEPREFIX' => 31
},
GOTOS => {
'value_dcl' => 1,
'code_frag' => 2,
'value_box_dcl' => 3,
'definitions' => 18,
'module_header' => 20,
'definition' => 19,
'value_box_header' => 4,
'specification' => 22,
'declspec' => 5,
'except_dcl' => 6,
'value_header' => 7,
'interface' => 8,
'type_dcl' => 9,
'module' => 24,
'interface_header' => 11,
'value_forward_dcl' => 10,
'imports' => 26,
'value' => 13,
'value_abs_dcl' => 27,
'import' => 28,
'value_abs_header' => 14,
'forward_dcl' => 30,
'exception_header' => 15,
'const_dcl' => 16,
'type_prefix_dcl' => 32,
'interface_dcl' => 17,
'type_id_dcl' => 33
}
},
{#State 1
DEFAULT => -65
},
{#State 2
DEFAULT => -18
},
{#State 3
DEFAULT => -67
},
{#State 4
ACTIONS => {
"::" => 63,
'CHAR' => 64,
'OBJECT' => 68,
'STRING' => 71,
'OCTET' => 37,
'WSTRING' => 73,
'UNSIGNED' => 41,
"[" => 42,
'ANY' => 43,
'FLOAT' => 76,
'LONG' => 44,
'SEQUENCE' => 78,
'DOUBLE' => 79,
'IDENTIFIER' => 49,
'SHORT' => 80,
'BOOLEAN' => 82,
'VOID' => 55,
'FIXED' => 85,
'VALUEBASE' => 87,
'WCHAR' => 60
},
DEFAULT => -396,
lib/CORBA/IDL/ParserXp.pm view on Meta::CPAN
DEFAULT => -68
},
{#State 11
ACTIONS => {
"{" => 104
}
},
{#State 12
ACTIONS => {
'error' => 105
}
},
{#State 13
ACTIONS => {
";" => 99,
'error' => 100
},
GOTOS => {
'check_semicolon' => 106
}
},
{#State 14
ACTIONS => {
"{" => 107
}
},
{#State 15
ACTIONS => {
"{" => 109,
'error' => 108
}
},
{#State 16
ACTIONS => {
";" => 99,
'error' => 100
},
GOTOS => {
'check_semicolon' => 110
}
},
{#State 17
DEFAULT => -28
},
{#State 18
DEFAULT => -1
},
{#State 19
ACTIONS => {
'' => -7,
"}" => -7,
'IMPORT' => 21,
'IDENTIFIER' => 12,
'TYPEID' => 25,
'DECLSPEC' => 29,
'TYPEPREFIX' => 31
},
DEFAULT => -394,
GOTOS => {
'value_dcl' => 1,
'code_frag' => 2,
'value_box_dcl' => 3,
'definitions' => 111,
'definition' => 19,
'module_header' => 20,
'value_box_header' => 4,
'declspec' => 5,
'except_dcl' => 6,
'value_header' => 7,
'interface' => 8,
'type_dcl' => 9,
'module' => 24,
'interface_header' => 11,
'value_forward_dcl' => 10,
'imports' => 112,
'value' => 13,
'value_abs_dcl' => 27,
'import' => 28,
'value_abs_header' => 14,
'forward_dcl' => 30,
'exception_header' => 15,
'const_dcl' => 16,
'type_prefix_dcl' => 32,
'interface_dcl' => 17,
'type_id_dcl' => 33
}
},
{#State 20
ACTIONS => {
"{" => 114,
'error' => 113
}
},
{#State 21
ACTIONS => {
"::" => 63,
'IDENTIFIER' => 49,
'STRING_LITERAL' => 119,
'error' => 118
},
GOTOS => {
'imported_scope' => 117,
'scoped_name' => 116,
'string_literal' => 115
}
},
{#State 22
ACTIONS => {
'' => 120
}
},
{#State 23
DEFAULT => -4
},
{#State 24
ACTIONS => {
";" => 99,
'error' => 100
},
GOTOS => {
'check_semicolon' => 121
}
},
{#State 25
ACTIONS => {
"::" => 63,
'IDENTIFIER' => 49,
'error' => 123
},
GOTOS => {
'scoped_name' => 122
}
},
{#State 26
ACTIONS => {
'IDENTIFIER' => 12,
'TYPEID' => 25,
'DECLSPEC' => 29,
'TYPEPREFIX' => 31
},
DEFAULT => -394,
GOTOS => {
'value_dcl' => 1,
'code_frag' => 2,
'value_box_dcl' => 3,
'definitions' => 124,
'definition' => 19,
'module_header' => 20,
'value_box_header' => 4,
'declspec' => 5,
'except_dcl' => 6,
'value_header' => 7,
'interface' => 8,
'type_dcl' => 9,
'module' => 24,
'interface_header' => 11,
'value_forward_dcl' => 10,
'value' => 13,
'value_abs_dcl' => 27,
'value_abs_header' => 14,
'forward_dcl' => 30,
'exception_header' => 15,
'const_dcl' => 16,
'type_prefix_dcl' => 32,
'interface_dcl' => 17,
'type_id_dcl' => 33
}
},
{#State 27
DEFAULT => -66
},
{#State 28
ACTIONS => {
'IMPORT' => 21
},
DEFAULT => -5,
GOTOS => {
'imports' => 125,
'import' => 28
}
},
{#State 29
DEFAULT => -395
},
{#State 30
DEFAULT => -29
},
{#State 31
ACTIONS => {
"::" => 127,
'IDENTIFIER' => 49,
'error' => 128
},
GOTOS => {
'scoped_name' => 126
}
},
{#State 32
ACTIONS => {
";" => 99,
'error' => 100
},
GOTOS => {
'check_semicolon' => 129
lib/CORBA/IDL/ParserXp.pm view on Meta::CPAN
'signed_long_int' => 56,
'boolean_type' => 177,
'wide_char_type' => 168,
'octet_type' => 169
}
},
{#State 98
DEFAULT => -12
},
{#State 99
DEFAULT => -20
},
{#State 100
DEFAULT => -21
},
{#State 101
ACTIONS => {
"}" => 178,
'OCTET' => -394,
'NATIVE' => -394,
'UNSIGNED' => -394,
'CODE_FRAGMENT' => -394,
'TYPEDEF' => -394,
'EXCEPTION' => -394,
"[" => -394,
'ANY' => -394,
'LONG' => -394,
'IDENTIFIER' => -394,
'STRUCT' => -394,
'VOID' => -394,
'WCHAR' => -394,
'FACTORY' => -394,
'ENUM' => -394,
"::" => -394,
'PRIVATE' => -394,
'CHAR' => -394,
'OBJECT' => -394,
'ONEWAY' => -394,
'STRING' => -394,
'WSTRING' => -394,
'UNION' => -394,
'error' => 193,
'FLOAT' => -394,
'ATTRIBUTE' => -394,
'PUBLIC' => -394,
'SEQUENCE' => -394,
'DOUBLE' => -394,
'SHORT' => -394,
'TYPEID' => 25,
'BOOLEAN' => -394,
'CONST' => -394,
'READONLY' => -394,
'DECLSPEC' => 29,
'FIXED' => -394,
'TYPEPREFIX' => 31,
'VALUEBASE' => -394
},
GOTOS => {
'op_header' => 188,
'init_header_param' => 189,
'code_frag' => 179,
'readonly_attr_spec' => 180,
'init_header' => 190,
'op_dcl' => 191,
'attr_dcl' => 192,
'declspec' => 181,
'except_dcl' => 182,
'state_member' => 194,
'export' => 183,
'type_dcl' => 184,
'value_elements' => 195,
'value_element' => 185,
'exception_header' => 15,
'attr_spec' => 186,
'const_dcl' => 187,
'type_prefix_dcl' => 196,
'type_id_dcl' => 198,
'init_dcl' => 197
}
},
{#State 102
DEFAULT => -13
},
{#State 103
DEFAULT => -10
},
{#State 104
ACTIONS => {
"}" => 199,
'OCTET' => -394,
'NATIVE' => -394,
'UNSIGNED' => -394,
'CODE_FRAGMENT' => -394,
'TYPEDEF' => -394,
'EXCEPTION' => -394,
"[" => -394,
'ANY' => -394,
'LONG' => -394,
'IDENTIFIER' => -394,
'STRUCT' => -394,
'VOID' => -394,
'WCHAR' => -394,
'FACTORY' => -394,
'ENUM' => -394,
"::" => -394,
'PRIVATE' => -394,
'CHAR' => -394,
'OBJECT' => -394,
'ONEWAY' => -394,
'STRING' => -394,
'WSTRING' => -394,
'UNION' => -394,
'error' => 204,
'FLOAT' => -394,
'ATTRIBUTE' => -394,
'PUBLIC' => -394,
'SEQUENCE' => -394,
'DOUBLE' => -394,
'SHORT' => -394,
'TYPEID' => 25,
'BOOLEAN' => -394,
'CONST' => -394,
'READONLY' => -394,
'DECLSPEC' => 29,
'FIXED' => -394,
'TYPEPREFIX' => 31,
'VALUEBASE' => -394
},
GOTOS => {
'op_header' => 188,
'interface_body' => 202,
'init_header_param' => 189,
'code_frag' => 179,
'readonly_attr_spec' => 180,
'init_header' => 190,
'op_dcl' => 191,
'exports' => 203,
'attr_dcl' => 192,
'declspec' => 181,
'except_dcl' => 182,
'state_member' => 205,
'type_dcl' => 184,
'export' => 200,
'_export' => 201,
'exception_header' => 15,
'attr_spec' => 186,
'const_dcl' => 187,
'type_prefix_dcl' => 196,
'init_dcl' => 206,
'type_id_dcl' => 198
}
},
{#State 105
ACTIONS => {
";" => 207
}
},
{#State 106
DEFAULT => -15
},
{#State 107
ACTIONS => {
"}" => 208,
'OCTET' => -394,
'NATIVE' => -394,
'UNSIGNED' => -394,
'CODE_FRAGMENT' => -394,
'TYPEDEF' => -394,
'EXCEPTION' => -394,
"[" => -394,
'ANY' => -394,
'LONG' => -394,
'IDENTIFIER' => -394,
'STRUCT' => -394,
'VOID' => -394,
'WCHAR' => -394,
'FACTORY' => -394,
'ENUM' => -394,
"::" => -394,
'PRIVATE' => -394,
'CHAR' => -394,
'OBJECT' => -394,
'ONEWAY' => -394,
'STRING' => -394,
'WSTRING' => -394,
'UNION' => -394,
'error' => 210,
'FLOAT' => -394,
'ATTRIBUTE' => -394,
'PUBLIC' => -394,
'SEQUENCE' => -394,
'DOUBLE' => -394,
'SHORT' => -394,
'TYPEID' => 25,
'BOOLEAN' => -394,
'CONST' => -394,
'READONLY' => -394,
'DECLSPEC' => 29,
'FIXED' => -394,
'TYPEPREFIX' => 31,
'VALUEBASE' => -394
},
GOTOS => {
'op_header' => 188,
'init_header_param' => 189,
'code_frag' => 179,
'readonly_attr_spec' => 180,
'init_header' => 190,
'op_dcl' => 191,
'exports' => 209,
'attr_dcl' => 192,
'declspec' => 181,
'except_dcl' => 182,
'state_member' => 205,
'type_dcl' => 184,
'export' => 200,
'_export' => 201,
'exception_header' => 15,
'attr_spec' => 186,
'const_dcl' => 187,
'type_prefix_dcl' => 196,
'init_dcl' => 206,
'type_id_dcl' => 198
}
},
{#State 108
DEFAULT => -302
},
{#State 109
ACTIONS => {
"}" => 211,
"::" => -396,
'ENUM' => -396,
'CHAR' => -396,
'OBJECT' => -396,
'STRING' => -396,
'OCTET' => -396,
'WSTRING' => -396,
'UNION' => -396,
'UNSIGNED' => -396,
'error' => 216,
"[" => 42,
'ANY' => -396,
'FLOAT' => -396,
'LONG' => -396,
'SEQUENCE' => -396,
'DOUBLE' => -396,
'IDENTIFIER' => -396,
'SHORT' => -396,
'BOOLEAN' => -396,
'STRUCT' => -396,
'VOID' => -396,
'FIXED' => -396,
'VALUEBASE' => -396,
'WCHAR' => -396
},
GOTOS => {
'union_type' => 34,
'enum_type' => 46,
'member' => 213,
'enum_header' => 35,
'struct_type' => 38,
'union_header' => 39,
'constr_type_spec' => 215,
'props' => 214,
'struct_header' => 40,
'member_list' => 212
}
},
{#State 110
DEFAULT => -11
},
{#State 111
DEFAULT => -8
},
{#State 112
ACTIONS => {
'IDENTIFIER' => 12,
'TYPEID' => 25,
'DECLSPEC' => 29,
'TYPEPREFIX' => 31
},
DEFAULT => -394,
GOTOS => {
'value_dcl' => 1,
'code_frag' => 2,
'value_box_dcl' => 3,
'definitions' => 217,
'definition' => 19,
'module_header' => 20,
'value_box_header' => 4,
'declspec' => 5,
'except_dcl' => 6,
'value_header' => 7,
'interface' => 8,
'type_dcl' => 9,
'module' => 24,
'interface_header' => 11,
'value_forward_dcl' => 10,
'value' => 13,
'value_abs_dcl' => 27,
'value_abs_header' => 14,
'forward_dcl' => 30,
'exception_header' => 15,
'const_dcl' => 16,
'type_prefix_dcl' => 32,
'interface_dcl' => 17,
'type_id_dcl' => 33
}
},
{#State 113
ACTIONS => {
"}" => 218
}
},
{#State 114
ACTIONS => {
"}" => 219,
'ENUM' => -394,
'INTERFACE' => -394,
'VALUETYPE' => -394,
'CUSTOM' => -394,
'UNION' => -394,
'NATIVE' => -394,
'CODE_FRAGMENT' => -394,
'TYPEDEF' => -394,
'EXCEPTION' => -394,
'error' => 221,
"[" => -394,
'LOCAL' => -394,
'IDENTIFIER' => 12,
'TYPEID' => 25,
'MODULE' => -394,
'STRUCT' => -394,
'CONST' => -394,
'ABSTRACT' => -394,
'DECLSPEC' => 29,
'TYPEPREFIX' => 31
},
GOTOS => {
'value_dcl' => 1,
'code_frag' => 2,
'value_box_dcl' => 3,
'definitions' => 220,
'definition' => 19,
'module_header' => 20,
'value_box_header' => 4,
'declspec' => 5,
'except_dcl' => 6,
'value_header' => 7,
'interface' => 8,
'type_dcl' => 9,
'module' => 24,
'interface_header' => 11,
'value_forward_dcl' => 10,
'value' => 13,
'value_abs_dcl' => 27,
'value_abs_header' => 14,
'forward_dcl' => 30,
'exception_header' => 15,
'const_dcl' => 16,
'type_prefix_dcl' => 32,
'interface_dcl' => 17,
'type_id_dcl' => 33
}
},
{#State 115
DEFAULT => -364
},
{#State 116
ACTIONS => {
"::" => 140
},
DEFAULT => -363
},
{#State 117
ACTIONS => {
";" => 99,
'error' => 100
},
GOTOS => {
'check_semicolon' => 222
}
},
{#State 118
DEFAULT => -362
},
{#State 119
ACTIONS => {
'STRING_LITERAL' => 119
},
DEFAULT => -168,
GOTOS => {
'string_literal' => 223
}
},
{#State 120
DEFAULT => 0
},
{#State 121
DEFAULT => -14
},
lib/CORBA/IDL/ParserXp.pm view on Meta::CPAN
DEFAULT => -79
},
{#State 179
DEFAULT => -53
},
{#State 180
DEFAULT => -297
},
{#State 181
ACTIONS => {
'CODE_FRAGMENT' => 90,
'EXCEPTION' => 91,
"[" => 42,
'CONST' => 97
},
DEFAULT => -396,
GOTOS => {
'union_type' => 88,
'enum_type' => 92,
'enum_header' => 35,
'type_dcl_def' => 93,
'struct_type' => 89,
'union_header' => 39,
'props' => 299,
'struct_header' => 40,
'constr_forward_decl' => 95
}
},
{#State 182
ACTIONS => {
";" => 99,
'error' => 100
},
GOTOS => {
'check_semicolon' => 300
}
},
{#State 183
DEFAULT => -99
},
{#State 184
ACTIONS => {
";" => 99,
'error' => 100
},
GOTOS => {
'check_semicolon' => 301
}
},
{#State 185
ACTIONS => {
"}" => -82,
'TYPEID' => 25,
'DECLSPEC' => 29,
'TYPEPREFIX' => 31
},
DEFAULT => -394,
GOTOS => {
'op_header' => 188,
'init_header_param' => 189,
'code_frag' => 179,
'readonly_attr_spec' => 180,
'init_header' => 190,
'op_dcl' => 191,
'attr_dcl' => 192,
'declspec' => 181,
'except_dcl' => 182,
'state_member' => 194,
'export' => 183,
'type_dcl' => 184,
'value_elements' => 302,
'value_element' => 185,
'exception_header' => 15,
'attr_spec' => 186,
'const_dcl' => 187,
'type_prefix_dcl' => 196,
'type_id_dcl' => 198,
'init_dcl' => 197
}
},
{#State 186
DEFAULT => -298
},
{#State 187
ACTIONS => {
";" => 99,
'error' => 100
},
GOTOS => {
'check_semicolon' => 303
}
},
{#State 188
ACTIONS => {
"(" => 304,
'error' => 305
},
GOTOS => {
'parameter_dcls' => 306
}
},
{#State 189
ACTIONS => {
'RAISES' => 307
},
DEFAULT => -333,
GOTOS => {
'raises_expr' => 308
}
},
{#State 190
ACTIONS => {
"(" => 309,
'error' => 310
}
},
{#State 191
ACTIONS => {
";" => 99,
'error' => 100
},
lib/CORBA/IDL/ParserXp.pm view on Meta::CPAN
{#State 192
ACTIONS => {
";" => 99,
'error' => 100
},
GOTOS => {
'check_semicolon' => 312
}
},
{#State 193
ACTIONS => {
"}" => 313
}
},
{#State 194
DEFAULT => -100
},
{#State 195
ACTIONS => {
"}" => 314
}
},
{#State 196
ACTIONS => {
";" => 99,
'error' => 100
},
GOTOS => {
'check_semicolon' => 315
}
},
{#State 197
DEFAULT => -101
},
{#State 198
ACTIONS => {
";" => 99,
'error' => 100
},
GOTOS => {
'check_semicolon' => 316
}
},
{#State 199
DEFAULT => -30
},
{#State 200
DEFAULT => -43
},
{#State 201
ACTIONS => {
"}" => -41,
'TYPEID' => 25,
'DECLSPEC' => 29,
'TYPEPREFIX' => 31
},
DEFAULT => -394,
GOTOS => {
'op_header' => 188,
'init_header_param' => 189,
'code_frag' => 179,
'readonly_attr_spec' => 180,
'init_header' => 190,
'op_dcl' => 191,
'exports' => 317,
'attr_dcl' => 192,
'declspec' => 181,
'except_dcl' => 182,
'state_member' => 205,
'type_dcl' => 184,
'export' => 200,
'_export' => 201,
'exception_header' => 15,
'attr_spec' => 186,
'const_dcl' => 187,
'type_prefix_dcl' => 196,
'init_dcl' => 206,
'type_id_dcl' => 198
}
},
{#State 202
ACTIONS => {
"}" => 318
}
},
{#State 203
DEFAULT => -40
},
{#State 204
ACTIONS => {
"}" => 319
}
},
{#State 205
DEFAULT => -44
},
{#State 206
DEFAULT => -45
},
{#State 207
DEFAULT => -19
},
{#State 208
DEFAULT => -73
},
{#State 209
ACTIONS => {
"}" => 320
}
},
{#State 210
ACTIONS => {
"}" => 321
}
},
{#State 211
DEFAULT => -299
},
{#State 212
ACTIONS => {
"}" => 322
lib/CORBA/IDL/ParserXp.pm view on Meta::CPAN
{
'list_setraise' => $_[1]
};
}
],
[#Rule 386
'attr_raises_expr', 0, undef
],
[#Rule 387
'get_except_expr', 2,
sub
#line 2434 "ParserXp.yp"
{
$_[2];
}
],
[#Rule 388
'get_except_expr', 2,
sub
#line 2438 "ParserXp.yp"
{
$_[0]->Error("'(' expected.\n");
$_[0]->YYErrok();
}
],
[#Rule 389
'set_except_expr', 2,
sub
#line 2447 "ParserXp.yp"
{
$_[2];
}
],
[#Rule 390
'set_except_expr', 2,
sub
#line 2451 "ParserXp.yp"
{
$_[0]->Error("'(' expected.\n");
$_[0]->YYErrok();
}
],
[#Rule 391
'exception_list', 3,
sub
#line 2460 "ParserXp.yp"
{
$_[2];
}
],
[#Rule 392
'exception_list', 3,
sub
#line 2464 "ParserXp.yp"
{
$_[0]->Error("name expected.\n");
$_[0]->YYErrok();
}
],
[#Rule 393
'code_frag', 2,
sub
#line 2474 "ParserXp.yp"
{
new CORBA::IDL::CodeFragment($_[0],
'declspec' => $_[1],
'value' => $_[2],
);
}
],
[#Rule 394
'declspec', 0, undef
],
[#Rule 395
'declspec', 1, undef
],
[#Rule 396
'props', 0, undef
],
[#Rule 397
'@2-1', 0,
sub
#line 2493 "ParserXp.yp"
{
$_[0]->YYData->{prop} = 1;
}
],
[#Rule 398
'props', 4,
sub
#line 2497 "ParserXp.yp"
{
$_[0]->YYData->{prop} = 0;
$_[3];
}
],
[#Rule 399
'prop_list', 2,
sub
#line 2505 "ParserXp.yp"
{
my $hash = {};
$hash->{$_[1]} = $_[2];
$hash;
}
],
[#Rule 400
'prop_list', 4,
sub
#line 2511 "ParserXp.yp"
{
$_[1]->{$_[3]} = $_[4];
$_[1];
}
],
[#Rule 401
'prop_list', 1,
sub
#line 2516 "ParserXp.yp"
{
my $hash = {};
( run in 1.185 second using v1.01-cache-2.11-cpan-364913b4093 )