Subversion Repositories openrisc

/* PR rtl-optimization/45865 */
/* { dg-do compile } */
/* { dg-options "-O2 -fcompare-debug" } */
 
typedef union tree_node *tree;
enum ix86_builtin_type {
  IX86_BT_LAST_VECT,
  IX86_BT_LAST_PTR
};
extern const enum ix86_builtin_type ix86_builtin_type_ptr_base[];
extern tree build_qualified_type (tree, int);
extern tree build_pointer_type (tree);
tree
ix86_get_builtin_type (enum ix86_builtin_type tcode, unsigned int index)
{
  tree type, itype;
  int quals;
  if (tcode <= IX86_BT_LAST_PTR)
    quals = 0x0;
  else
    quals = 0x1;
  itype = ix86_get_builtin_type (ix86_builtin_type_ptr_base[index],
				 index);
  if (quals != 0x0)
    itype = build_qualified_type (itype, quals);
  type = build_pointer_type (itype);
  return type;
}