language.c (binop_result_type): Add language_objc to case.

(integral_type): Likewise.
(character_type): Likewise.
(string_type): Likewise.
(boolean_type): Likewise.
(structured_type): Likewise.
(binop_type_check): Likewise.
This commit is contained in:
Adam Fedor 2002-10-12 16:03:30 +00:00
parent f9a3a01aef
commit eb392fbf33
2 changed files with 17 additions and 0 deletions

View File

@ -1,3 +1,13 @@
2002-10-12 Adam Fedor <fedor@gnu.org>
* language.c (binop_result_type): Add language_objc to case.
(integral_type): Likewise.
(character_type): Likewise.
(string_type): Likewise.
(boolean_type): Likewise.
(structured_type): Likewise.
(binop_type_check): Likewise.
2002-10-11 Adam Fedor <fedor@gnu.org>
* printcmd.c (address_info): Print 'self' for ObjC.

View File

@ -549,6 +549,7 @@ binop_result_type (struct value *v1, struct value *v2)
{
case language_c:
case language_cplus:
case language_objc:
if (TYPE_CODE (t1) == TYPE_CODE_FLT)
return TYPE_CODE (t2) == TYPE_CODE_FLT && l2 > l1 ?
VALUE_TYPE (v2) : VALUE_TYPE (v1);
@ -786,6 +787,7 @@ integral_type (struct type *type)
{
case language_c:
case language_cplus:
case language_objc:
return (TYPE_CODE (type) != TYPE_CODE_INT) &&
(TYPE_CODE (type) != TYPE_CODE_ENUM) ? 0 : 1;
case language_m2:
@ -828,6 +830,7 @@ character_type (struct type *type)
case language_c:
case language_cplus:
case language_objc:
return (TYPE_CODE (type) == TYPE_CODE_INT) &&
TYPE_LENGTH (type) == sizeof (char)
? 1 : 0;
@ -850,6 +853,7 @@ string_type (struct type *type)
case language_c:
case language_cplus:
case language_objc:
/* C does not have distinct string type. */
return (0);
default:
@ -868,6 +872,7 @@ boolean_type (struct type *type)
{
case language_c:
case language_cplus:
case language_objc:
/* Might be more cleanly handled by having a
TYPE_CODE_INT_NOT_BOOL for (OBSOLETE) CHILL and such
languages, or a TYPE_CODE_INT_OR_BOOL for C. */
@ -904,6 +909,7 @@ structured_type (struct type *type)
{
case language_c:
case language_cplus:
case language_objc:
return (TYPE_CODE (type) == TYPE_CODE_STRUCT) ||
(TYPE_CODE (type) == TYPE_CODE_UNION) ||
(TYPE_CODE (type) == TYPE_CODE_ARRAY);
@ -1124,6 +1130,7 @@ binop_type_check (struct value *arg1, struct value *arg2, int op)
#ifdef _LANG_c
case language_c:
case language_cplus:
case language_objc:
switch (op)
{
case BINOP_DIV: