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/ada-lang.c | 1 + 1 file changed, 1 insertion(+) (limited to 'gdb/ada-lang.c') diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index 1bb3ca0..fd73fc5 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -10166,6 +10166,7 @@ const struct language_defn ada_language_defn = { ada_lookup_symbol, ada_lookup_minimal_symbol, #endif /* GNAT_GDB */ + array_row_major, &ada_exp_descriptor, parse, ada_error, -- cgit v1.1