diff options
Diffstat (limited to 'gcc/dbxout.c')
| -rw-r--r-- | gcc/dbxout.c | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/gcc/dbxout.c b/gcc/dbxout.c index a2abc7f..13bef7d 100644 --- a/gcc/dbxout.c +++ b/gcc/dbxout.c @@ -1276,6 +1276,20 @@ dbxout_type (type, full, show_arg_types) break; case ARRAY_TYPE: + /* Make arrays of packed bits look like bitstrings for chill. */ + if (TYPE_PACKED (type) && use_gnu_debug_info_extensions) + { + have_used_extensions = 1; + fputs ("@s", asmfile); + fprintf (asmfile, HOST_WIDE_INT_PRINT_DEC, + BITS_PER_UNIT * int_size_in_bytes (type)); + fputc (';', asmfile); + fprintf (asmfile, "@S;"); + putc ('S', asmfile); + CHARS (1); + dbxout_type (TYPE_DOMAIN (type), 0, 0); + break; + } /* Output "a" followed by a range type definition for the index type of the array followed by a reference to the target-type. |