(dbxout_range_type): Handle an array range that is neither int nor subrange.
From-SVN: r7494
This commit is contained in:
parent
f0e01782d7
commit
d0310c5364
|
@ -877,6 +877,8 @@ dbxout_range_type (type)
|
||||||
fprintf (asmfile, "r");
|
fprintf (asmfile, "r");
|
||||||
if (TREE_TYPE (type))
|
if (TREE_TYPE (type))
|
||||||
dbxout_type (TREE_TYPE (type), 0, 0);
|
dbxout_type (TREE_TYPE (type), 0, 0);
|
||||||
|
else if (TREE_CODE (type) != INTEGER_TYPE)
|
||||||
|
dbxout_type (type, 0, 0); /* E.g. Pascal's ARRAY [BOOLEAN] of INTEGER */
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
/* This used to say `r1' and we used to take care
|
/* This used to say `r1' and we used to take care
|
||||||
|
|
Loading…
Reference in New Issue