gdb/gdb/valarith.c

93   struct type *type1, *type2, *valptrtype;
98   type2 = check_typedef (VALUE_TYPE (arg2));
101        || TYPE_CODE (type2) == TYPE_CODE_PTR)
104        || TYPE_CODE (type2) == TYPE_CODE_INT))
119 	  valptrtype = type2;
137   struct type *type1, *type2;
141   type2 = check_typedef (VALUE_TYPE (arg2));
145       if (TYPE_CODE (type2) == TYPE_CODE_INT)
154       else if (TYPE_CODE (type2) == TYPE_CODE_PTR
156 	       == TYPE_LENGTH (check_typedef (TYPE_TARGET_TYPE (type2))))
296   struct type *type1, *type2;
300   type2 = check_typedef (VALUE_TYPE (arg2));
302 	  || TYPE_CODE (type2) == TYPE_CODE_STRUCT
305 	  || (TYPE_CODE (type2) == TYPE_CODE_REF
306 	      && TYPE_CODE (TYPE_TARGET_TYPE (type2)) == TYPE_CODE_STRUCT));
626   struct type *type2 = check_typedef (VALUE_TYPE (arg2));
629   COERCE_VARYING_ARRAY (arg2, type2);
637   if (TYPE_CODE (type2) == TYPE_CODE_INT)
641       tmp = type2;
657       if (TYPE_CODE (type2) == TYPE_CODE_STRING
658 	  || TYPE_CODE (type2) == TYPE_CODE_CHAR)
661 	  inval2len = TYPE_LENGTH (type2);
663 	  if (TYPE_CODE (type2) == TYPE_CODE_CHAR)
665 	      inchar = (char) unpack_long (type2,
682       else if (TYPE_CODE (type2) == TYPE_CODE_BITSTRING
683 	       || TYPE_CODE (type2) == TYPE_CODE_BOOL)
696       if (TYPE_CODE (type2) != TYPE_CODE_STRING
697 	  && TYPE_CODE (type2) != TYPE_CODE_CHAR)
702       inval2len = TYPE_LENGTH (type2);
712       if (TYPE_CODE (type2) == TYPE_CODE_CHAR)
715 	    (char) unpack_long (type2, VALUE_CONTENTS (inval2));
727       if (TYPE_CODE (type2) != TYPE_CODE_BITSTRING
728 	  && TYPE_CODE (type2) != TYPE_CODE_BOOL)
755   struct type *type1, *type2;
762   type2 = check_typedef (VALUE_TYPE (arg2));
770       (TYPE_CODE (type2) != TYPE_CODE_FLT
771        && TYPE_CODE (type2) != TYPE_CODE_CHAR
772        && TYPE_CODE (type2) != TYPE_CODE_INT
773        && TYPE_CODE (type2) != TYPE_CODE_BOOL
774        && TYPE_CODE (type2) != TYPE_CODE_RANGE))
779       TYPE_CODE (type2) == TYPE_CODE_FLT)
819 	  || TYPE_LENGTH (type2) * 8 > TARGET_DOUBLE_BIT)
828 	   TYPE_CODE (type2) == TYPE_CODE_BOOL)
872       unsigned int promoted_len2 = TYPE_LENGTH (type2);
874       int is_unsigned2 = TYPE_UNSIGNED (type2);
1226   struct type *type1, *type2;
1234   type2 = check_typedef (VALUE_TYPE (arg2));
1236   code2 = TYPE_CODE (type2);
1255 	       == (int) TYPE_LENGTH (type2)))
1285   struct type *type1, *type2;
1291   type2 = check_typedef (VALUE_TYPE (arg2));
1293   code2 = TYPE_CODE (type2);