aboutsummaryrefslogtreecommitdiff
path: root/gdb/dwarf2read.c
diff options
context:
space:
mode:
authorElena Zannoni <ezannoni@kwikemart.cygnus.com>2004-01-09 15:33:15 +0000
committerElena Zannoni <ezannoni@kwikemart.cygnus.com>2004-01-09 15:33:15 +0000
commitb44e9041564f8b446bab9175540999d7930b8f84 (patch)
treee806c690dfcf894558020722903d4c8f768c574a /gdb/dwarf2read.c
parent44e889528372ba167099ed14fdf7192b4cebe1b3 (diff)
downloadgdb-b44e9041564f8b446bab9175540999d7930b8f84.zip
gdb-b44e9041564f8b446bab9175540999d7930b8f84.tar.gz
gdb-b44e9041564f8b446bab9175540999d7930b8f84.tar.bz2
2004-01-09 Elena Zannoni <ezannoni@redhat.com>
* dwarf2read.c (read_array_type): Discard FORTRAN_HACK macro and ifdeffed code. Update copyright year.
Diffstat (limited to 'gdb/dwarf2read.c')
-rw-r--r--gdb/dwarf2read.c13
1 files changed, 2 insertions, 11 deletions
diff --git a/gdb/dwarf2read.c b/gdb/dwarf2read.c
index bf2a57e..9c07a04 100644
--- a/gdb/dwarf2read.c
+++ b/gdb/dwarf2read.c
@@ -1,5 +1,6 @@
/* DWARF 2 debugging format support for GDB.
- Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
+ Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
+ 2004
Free Software Foundation, Inc.
Adapted by Gary Funck (gary@intrepid.com), Intrepid Technology,
@@ -3088,12 +3089,7 @@ read_array_type (struct die_info *die, struct dwarf2_cu *cu)
{
dwarf2_non_const_array_bound_ignored_complaint
(dwarf_form_name (attr->form));
-#ifdef FORTRAN_HACK
- die->type = lookup_pointer_type (element_type);
- return;
-#else
low = 0;
-#endif
}
}
attr = dwarf_attr (child_die, DW_AT_upper_bound);
@@ -3130,12 +3126,7 @@ read_array_type (struct die_info *die, struct dwarf2_cu *cu)
{
dwarf2_non_const_array_bound_ignored_complaint
(dwarf_form_name (attr->form));
-#ifdef FORTRAN_HACK
- die->type = lookup_pointer_type (element_type);
- return;
-#else
high = 1;
-#endif
}
}