diff options
author | Per Bothner <bothner@gcc.gnu.org> | 1994-06-15 15:21:27 -0700 |
---|---|---|
committer | Per Bothner <bothner@gcc.gnu.org> | 1994-06-15 15:21:27 -0700 |
commit | d0310c5364a38ff0a3b4ddbf57aaa2239c7fb4ba (patch) | |
tree | ac4c1a61f95da55b1fc50ca17574da01e483dd8f /gcc/dbxout.c | |
parent | f0e01782d7d294907fe8f8325bfae9c6fae7a877 (diff) | |
download | gcc-d0310c5364a38ff0a3b4ddbf57aaa2239c7fb4ba.zip gcc-d0310c5364a38ff0a3b4ddbf57aaa2239c7fb4ba.tar.gz gcc-d0310c5364a38ff0a3b4ddbf57aaa2239c7fb4ba.tar.bz2 |
(dbxout_range_type): Handle an array range that is neither int nor subrange.
From-SVN: r7494
Diffstat (limited to 'gcc/dbxout.c')
-rw-r--r-- | gcc/dbxout.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/dbxout.c b/gcc/dbxout.c index 5418566..b2995c1 100644 --- a/gcc/dbxout.c +++ b/gcc/dbxout.c @@ -877,6 +877,8 @@ dbxout_range_type (type) fprintf (asmfile, "r"); if (TREE_TYPE (type)) 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 { /* This used to say `r1' and we used to take care |