Diff of /c2iec.y [daf770] .. [56e3db]  Maximize  Restore

Switch to unified view

a/c2iec.y b/c2iec.y
...
...
569
    ;
569
    ;
570
570
571
direct_declarator
571
direct_declarator
572
    : IDENTIFIER
572
    : IDENTIFIER
573
    | '(' declarator ')'
573
    | '(' declarator ')'
574
    { printf ("not supported direct_declerator\n"); exit(-1); }
574
    {
575
        //printf ("not supported direct_declerator 1 (%s)\n", $<str>2); exit(-1);
576
        strcpy($<str>$, "");
577
    }
575
    | direct_declarator '[' type_qualifier_list assignment_expression ']'
578
    | direct_declarator '[' type_qualifier_list assignment_expression ']'
576
    { printf ("not supported direct_declerator\n"); exit(-1); }
579
    { printf ("not supported direct_declerator 2 (%s - %s)\n", $<str>3, $<str>4); exit(-1); }
577
    | direct_declarator '[' type_qualifier_list ']'
580
    | direct_declarator '[' type_qualifier_list ']'
578
    { printf ("not supported direct_declerator\n"); exit(-1); }
581
    { printf ("not supported direct_declerator 3 (%s)\n", $<str>3); exit(-1); }
579
    | direct_declarator '[' assignment_expression ']'
582
    | direct_declarator '[' assignment_expression ']'
580
    {
583
    {
581
        if (strlen($<str>1) > 0)
584
        if (strlen($<str>1) > 0)
582
        {
585
        {
583
            sprintf($<str>$, "%s: ARRAY[0..(%s-1)] OF %%s;\n",$<str>1, $<str>3);
586
            sprintf($<str>$, "%s: ARRAY[0..(%s-1)] OF %%s;\n",$<str>1, $<str>3);