From 7ca2d3a37165b1847d70b4436d8b2d62d0d5fba7 Mon Sep 17 00:00:00 2001 From: David Lecomber Date: Sun, 29 Aug 2004 10:12:24 +0000 Subject: 2004-08-29 David Lecomber Fix PR gdb/648 * language.h (enum array_ordering): New enum. * language.h (struct language_defn): New la_array_ordering attribute. * language.c (unknown_language_defn, auto_language_defn) (local_language_defn): Ditto. * ada-lang.c (ada_language_defn): Ditto. * c-lang.c (c_language_defn, cplus_language_defn) (asm_language_defn, minimal_language_defn): Ditto. * f-lang.c (f_language_defn): Ditto. * jv-lang.c (java_language_defn): Ditto. * m2-lang.c (f_language_defn): Ditto. * objc-lang.c (objc_language_defn): Ditto. * p-lang.c (pascal_language_defn): Ditto. * scm-lang.c (scm_language_defn): Ditto. * eval.c (evaluate_subexp_standard): Assume Fortran arrays are oriented large to small in type structure. * dwarf2read.c (read_array_order): New function. (read_array_type): Use read_array_order to check row/column major ordering. --- gdb/language.c | 3 +++ 1 file changed, 3 insertions(+) (limited to 'gdb/language.c') diff --git a/gdb/language.c b/gdb/language.c index d1a1fb9..dfbfa3a 100644 --- a/gdb/language.c +++ b/gdb/language.c @@ -1294,6 +1294,7 @@ const struct language_defn unknown_language_defn = NULL, range_check_off, type_check_off, + array_row_major, case_sensitive_on, &exp_descriptor_standard, unk_lang_parser, @@ -1333,6 +1334,7 @@ const struct language_defn auto_language_defn = NULL, range_check_off, type_check_off, + array_row_major, case_sensitive_on, &exp_descriptor_standard, unk_lang_parser, @@ -1372,6 +1374,7 @@ const struct language_defn local_language_defn = range_check_off, type_check_off, case_sensitive_on, + array_row_major, &exp_descriptor_standard, unk_lang_parser, unk_lang_error, -- cgit v1.1