* stabsread.c (rs6000_builtin_type): Recognize types -31 to -34.
This commit is contained in:
parent
ffcee8884b
commit
8367c66b2d
|
@ -1,3 +1,7 @@
|
|||
Thu Mar 16 12:14:41 1995 Jim Kingdon (kingdon@lioth.cygnus.com)
|
||||
|
||||
* stabsread.c (rs6000_builtin_type): Recognize types -31 to -34.
|
||||
|
||||
Wed Mar 15 15:09:29 1995 Stu Grossman (grossman@cygnus.com)
|
||||
|
||||
* findvar.c (read_register_bytes write_register_bytes): Make
|
||||
|
|
|
@ -1774,7 +1774,7 @@ rs6000_builtin_type (typenum)
|
|||
int typenum;
|
||||
{
|
||||
/* We recognize types numbered from -NUMBER_RECOGNIZED to -1. */
|
||||
#define NUMBER_RECOGNIZED 30
|
||||
#define NUMBER_RECOGNIZED 34
|
||||
/* This includes an empty slot for type number -0. */
|
||||
static struct type *negative_types[NUMBER_RECOGNIZED + 1];
|
||||
struct type *rettype = NULL;
|
||||
|
@ -1908,6 +1908,20 @@ rs6000_builtin_type (typenum)
|
|||
case 30:
|
||||
rettype = init_type (TYPE_CODE_CHAR, 2, 0, "wchar", NULL);
|
||||
break;
|
||||
case 31:
|
||||
rettype = init_type (TYPE_CODE_INT, 8, 0, "long long", NULL);
|
||||
break;
|
||||
case 32:
|
||||
rettype = init_type (TYPE_CODE_INT, 8, TYPE_FLAG_UNSIGNED,
|
||||
"unsigned long long", NULL);
|
||||
break;
|
||||
case 33:
|
||||
rettype = init_type (TYPE_CODE_INT, 8, TYPE_FLAG_UNSIGNED,
|
||||
"logical*8", NULL);
|
||||
break;
|
||||
case 34:
|
||||
rettype = init_type (TYPE_CODE_INT, 8, 0, "integer*8", NULL);
|
||||
break;
|
||||
}
|
||||
negative_types[-typenum] = rettype;
|
||||
return rettype;
|
||||
|
|
Loading…
Reference in New Issue