gdb/gdb/ada-lang.c

49 static struct type *ada_create_fundamental_type (struct objfile *, int);
94 				   domain_enum, struct objfile *, int);
134 static struct type *ada_create_fundamental_type (struct objfile *, int);
142 					 struct objfile *);
399 			     (struct objfile *) NULL) != NULL)
1082       struct objfile *objf = TYPE_OBJFILE (VALUE_TYPE (arr));
3323 	   pst->objfile->global_psymbols.list + pst->globals_offset :
3324 	   pst->objfile->static_psymbols.list + pst->statics_offset);
3442   struct objfile *objfile;
3448   ALL_SYMTABS (objfile, s)
3504   struct objfile *objfile;
3508   ALL_MSYMBOLS (objfile, msymbol)
3664   struct objfile *objfile;
3702   ALL_SYMTABS (objfile, s)
3709     ada_add_block_symbols (block, name, domain, objfile, wild_match);
3714       ALL_MSYMBOLS (objfile, msymbol)
3732 					   domain, objfile, wild_match);
3738 					       domain, objfile,
3747   ALL_PSYMTABS (objfile, ps)
3758 	ada_add_block_symbols (block, name, domain, objfile, wild_match);
3769       ALL_SYMTABS (objfile, s)
3776 	ada_add_block_symbols (block, name, domain, objfile, wild_match);
3779       ALL_PSYMTABS (objfile, ps)
3791 				   objfile, wild_match);
3957 		       domain_enum domain, struct objfile *objfile,
3994 		add_defn_to_vec (fixup_symbol_section (sym, objfile), block);
4027 			add_defn_to_vec (fixup_symbol_section (sym, objfile),
4039       add_defn_to_vec (fixup_symbol_section (arg_sym, objfile), block);
4080 			add_defn_to_vec (fixup_symbol_section (sym, objfile),
4093 	  add_defn_to_vec (fixup_symbol_section (arg_sym, objfile), block);
4450   struct objfile *objfile;
4460   ALL_SYMTABS (objfile, s)
4759   struct objfile *objfile;
4761   ALL_PSYMTABS (objfile, ps)
4777   struct objfile *objfile;
4790   ALL_SYMTABS (objfile, s)
4996 	  if (sal.symtab->objfile &&
4997 	      DEPRECATED_STREQ (sal.symtab->objfile->name, "/usr/shlib/libpthread.so"))
5932 empty_record (struct objfile *objfile)
5934   struct type *type = alloc_type (objfile);
7821 to_fixed_range_type (char *name, struct value *dval, struct objfile *objfile)
7885       if (objfile == NULL)
7886 	objfile = TYPE_OBJFILE (base_type);
7887       type = create_range_type (alloc_type (objfile), base_type, L, U);
8067 	       0, "integer", (struct objfile *) NULL);
8070 	       0, "long_integer", (struct objfile *) NULL);
8073 	       0, "short_integer", (struct objfile *) NULL);
8076 	       0, "character", (struct objfile *) NULL);
8079 	       0, "float", (struct objfile *) NULL);
8082 	       0, "long_float", (struct objfile *) NULL);
8085 	       0, "long_long_integer", (struct objfile *) NULL);
8088 	       0, "long_long_float", (struct objfile *) NULL);
8091 	       0, "natural", (struct objfile *) NULL);
8094 	       0, "positive", (struct objfile *) NULL);
8099 				    (struct objfile *) NULL));
8142 ada_create_fundamental_type (struct objfile *objfile, int typeid)
8155 			0, "<?type?>", objfile);
8161 			0, "void", objfile);
8166 			0, "character", objfile);
8171 			0, "signed char", objfile);
8176 			TYPE_FLAG_UNSIGNED, "unsigned char", objfile);
8181 			0, "short_integer", objfile);
8186 			0, "short_integer", objfile);
8191 			TYPE_FLAG_UNSIGNED, "unsigned short", objfile);
8196 			0, "integer", objfile);
8199       type = init_type (TYPE_CODE_INT, TARGET_INT_BIT / TARGET_CHAR_BIT, 0, "integer", objfile);	/* FIXME -fnf */
8204 			TYPE_FLAG_UNSIGNED, "unsigned int", objfile);
8209 			0, "long_integer", objfile);
8214 			0, "long_integer", objfile);
8219 			TYPE_FLAG_UNSIGNED, "unsigned long", objfile);
8224 			0, "long_long_integer", objfile);
8229 			0, "long_long_integer", objfile);
8234 			TYPE_FLAG_UNSIGNED, "unsigned long long", objfile);
8239 			0, "float", objfile);
8244 			0, "long_float", objfile);
8249 			0, "long_long_float", objfile);