be replaced with a true F77 version. */
static void
-f_printstr (struct ui_file *stream, const bfd_byte *string,
+f_printstr (struct ui_file *stream, const gdb_byte *string,
unsigned int length, int width, int force_ellipses)
{
unsigned int i;
type = init_type (TYPE_CODE_INT,
TARGET_INT_BIT / TARGET_CHAR_BIT,
0, "<?type?>", objfile);
- warning ("internal error: no F77 fundamental type %d", typeid);
+ warning (_("internal error: no F77 fundamental type %d"), typeid);
break;
}
return (type);
if (c)
*c = '\0';
else
- error ("Malformed function STAB found in add_common_block()");
+ error (_("Malformed function STAB found in add_common_block()"));
tmp->owning_function = xmalloc (strlen (local_copy_func_stab) + 1);
tmp->symbol = entry_sym_ptr;
if (current_common == NULL)
- error ("Attempt to add COMMON entry with no block open!");
+ error (_("Attempt to add COMMON entry with no block open!"));
else
{
if (current_common->entries == NULL)
if (saved_bf_list == NULL)
internal_error (__FILE__, __LINE__,
- "cannot get .bf node off empty list");
+ _("cannot get .bf node off empty list"));
if (current_head_bf_list != NULL)
if (current_head_bf_list->symnum_fcn == the_function)