darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Changes for Amiga Unix from rhealey@ub.d.umn.edu.

Browse source 
* config/amix.mh (NAT_FILE):  Add, set to nm-sysv4.h.
	* config/amix.mh (NATDEPFILES):  Add.
	* config/amix.mh (XDEPFILES):  Move procfs.o and fork-child.o
	to NATDEPFILES.

	* dwarfread.c (decode_subscr_data):  Remove spurious test that
	accepted only integer subscript types.  We don't do anything
	with the type at the moment anyway.
This commit is contained in:
Fred Fish 1992-12-08 21:47:49 +00:00
parent 38dc971bec
commit 160be0ded9
3 changed files with 31 additions and 25 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
gdb/ChangeLog
View file

@ -1,3 +1,15 @@
Tue Dec 8 13:30:58 1992 Fred Fish (fnf@cygnus.com)
Changes for Amiga Unix from rhealey@ub.d.umn.edu.
* config/amix.mh (NAT_FILE): Add, set to nm-sysv4.h.
* config/amix.mh (NATDEPFILES): Add.
* config/amix.mh (XDEPFILES): Move procfs.o and fork-child.o
to NATDEPFILES.
* dwarfread.c (decode_subscr_data): Remove spurious test that
accepted only integer subscript types. We don't do anything
with the type at the moment anyway.
**** start-sanitize-chill ****
Fri Dec 4 06:56:56 1992 Fred Fish (fnf@cygnus.com)

4
gdb/config/amix.mh
View file

@ -1,5 +1,7 @@
# Host: Commodore Amiga running SVR4.
XDEPFILES= procfs.o fork-child.o
NAT_FILE= nm-sysv4.h
NATDEPFILES= corelow.o procfs.o fork-child.o
XDEPFILES=
XM_FILE= xm-amix.h
SYSV_DEFINE=-DSYSV
REGEX=regex.o

40
gdb/dwarfread.c
View file

@ -1299,34 +1299,26 @@ decode_subscr_data (scan, end)
typep = decode_array_element_type (scan);
break;
case FMT_FT_C_C:
/* Read the type of the index, but don't do anything with it.
FIXME: This is OK for C since only int's are allowed.
It might not be OK for other languages. */
fundtype = target_to_host (scan, SIZEOF_FMT_FT, GET_UNSIGNED,
current_objfile);
scan += SIZEOF_FMT_FT;
if (fundtype != FT_integer && fundtype != FT_signed_integer
&& fundtype != FT_unsigned_integer)
nbytes = TARGET_FT_LONG_SIZE (current_objfile);
lowbound = target_to_host (scan, nbytes, GET_UNSIGNED, current_objfile);
scan += nbytes;
highbound = target_to_host (scan, nbytes, GET_UNSIGNED, current_objfile);
scan += nbytes;
nexttype = decode_subscr_data (scan, end);
if (nexttype != NULL)
{
SQUAWK (("array subscripts must be integral types, not type 0x%x",
fundtype));
}
else
{
nbytes = TARGET_FT_LONG_SIZE (current_objfile);
lowbound = target_to_host (scan, nbytes, GET_UNSIGNED,
current_objfile);
scan += nbytes;
highbound = target_to_host (scan, nbytes, GET_UNSIGNED,
current_objfile);
scan += nbytes;
nexttype = decode_subscr_data (scan, end);
if (nexttype != NULL)
{
typep = alloc_type (current_objfile);
TYPE_CODE (typep) = TYPE_CODE_ARRAY;
TYPE_LENGTH (typep) = TYPE_LENGTH (nexttype);
TYPE_LENGTH (typep) *= (highbound - lowbound) + 1;
TYPE_TARGET_TYPE (typep) = nexttype;
}
}
typep = alloc_type (current_objfile);
TYPE_CODE (typep) = TYPE_CODE_ARRAY;
TYPE_LENGTH (typep) = TYPE_LENGTH (nexttype);
TYPE_LENGTH (typep) *= (highbound - lowbound) + 1;
TYPE_TARGET_TYPE (typep) = nexttype;
}
break;
case FMT_FT_C_X:
case FMT_FT_X_C: