@@ -839,7 +839,7 @@ variable: opt_pointer ECPGColLabel opt_array_bounds opt_bit_field opt_initialize
839
839
struct ECPGtype * type;
840
840
char *dimension = $3.index1; /* dimension of array */
841
841
char *length = $3.index2; /* length of string */
842
- char dim[14L] ;
842
+ char *dim_str ;
843
843
char *vcn;
844
844
845
845
adjust_array(actual_type[struct_level].type_enum, &dimension, &length, actual_type[struct_level].type_dimension, actual_type[struct_level].type_index, strlen($1), false);
@@ -863,9 +863,9 @@ variable: opt_pointer ECPGColLabel opt_array_bounds opt_bit_field opt_initialize
863
863
type = ECPGmake_array_type(ECPGmake_simple_type(actual_type[struct_level].type_enum, length, varchar_counter), dimension);
864
864
865
865
if (strcmp(dimension, "0") == 0 || abs(atoi(dimension)) == 1)
866
- *dim = '\0' ;
866
+ dim_str=make_str("") ;
867
867
else
868
- sprintf(dim, "[%s]", dimension);
868
+ dim_str=cat_str(3, make_str("["), mm_strdup( dimension), make_str("]") );
869
869
/* cannot check for atoi <= 0 because a defined constant will yield 0 here as well */
870
870
if (atoi(length) < 0 || strcmp(length, "0") == 0)
871
871
mmerror(PARSE_ERROR, ET_ERROR, "pointers to varchar are not implemented");
@@ -876,7 +876,7 @@ variable: opt_pointer ECPGColLabel opt_array_bounds opt_bit_field opt_initialize
876
876
if (strcmp(dimension, "0") == 0)
877
877
$$ = cat_str(7, make2_str(make_str(" struct varchar_"), vcn), make_str(" { int len; char arr["), mm_strdup(length), make_str("]; } *"), mm_strdup($2), $4, $5);
878
878
else
879
- $$ = cat_str(8, make2_str(make_str(" struct varchar_"), vcn), make_str(" { int len; char arr["), mm_strdup(length), make_str("]; } "), mm_strdup($2), mm_strdup(dim) , $4, $5);
879
+ $$ = cat_str(8, make2_str(make_str(" struct varchar_"), vcn), make_str(" { int len; char arr["), mm_strdup(length), make_str("]; } "), mm_strdup($2), dim_str , $4, $5);
880
880
varchar_counter++;
881
881
break;
882
882
0 commit comments