while (fl) {
f = findfield(fl->name, fields, obj, startoff);
if (f == NULL) {
- dbprintf("field %s not found\n", fl->name);
+ dbprintf(_("field %s not found\n"), fl->name);
return 0;
}
fl->fld = f;
low = (f->flags & FLD_ABASE1) != 0;
high = fcount(f, obj, startoff) + low - 1;
if (low > high) {
- dbprintf("no elements in %s\n", fl->name);
+ dbprintf(_("no elements in %s\n"), fl->name);
return 0;
}
if (fl->flags & FL_OKHIGH) {
if (fl->low < low || fl->low > high ||
fl->high < low || fl->high > high) {
- dbprintf("indices %d-%d for field %s "
- "out of range %d-%d\n",
+ dbprintf(_("indices %d-%d for field %s "
+ "out of range %d-%d\n"),
fl->low, fl->high, fl->name,
low, high);
return 0;
}
} else if (fl->flags & FL_OKLOW) {
if (fl->low < low || fl->low > high) {
- dbprintf("index %d for field %s out of "
- "range %d-%d\n",
+ dbprintf(_("index %d for field %s out of "
+ "range %d-%d\n"),
fl->low, fl->name, low, high);
return 0;
}
}
} else {
if (fl->flags & FL_OKLOW) {
- dbprintf("field %s is not an array\n",
+ dbprintf(_("field %s is not an array\n"),
fl->name);
return 0;
}
flist_expand_structs(fl, obj);
if (fl->child) {
if (fa->subfld == NULL) {
- dbprintf("field %s has no subfields\n",
+ dbprintf(_("field %s has no subfields\n"),
fl->name);
return 0;
}
if (!(debug_state & DEBUG_FLIST))
return;
while (fl) {
- dbprintf("fl@%p:\n", fl);
- dbprintf("\tname=%s, fld=%p, child=%p, sibling=%p\n",
+ dbprintf(_("fl@%p:\n"), fl);
+ dbprintf(_("\tname=%s, fld=%p, child=%p, sibling=%p\n"),
fl->name, fl->fld, fl->child, fl->sibling);
- dbprintf("\tlow=%d, high=%d, flags=%d (%s%s), offset=%d\n",
+ dbprintf(_("\tlow=%d, high=%d, flags=%d (%s%s), offset=%d\n"),
fl->low, fl->high, fl->flags,
- fl->flags & FL_OKLOW ? "oklow " : "",
- fl->flags & FL_OKHIGH ? "okhigh" : "", fl->offset);
- dbprintf("\tfld->name=%s, fld->ftyp=%d (%s)\n",
+ fl->flags & FL_OKLOW ? _("oklow ") : "",
+ fl->flags & FL_OKHIGH ? _("okhigh") : "", fl->offset);
+ dbprintf(_("\tfld->name=%s, fld->ftyp=%d (%s)\n"),
fl->fld->name, fl->fld->ftyp,
ftattrtab[fl->fld->ftyp].name);
- dbprintf("\tfld->flags=%d (%s%s%s%s%s)\n", fl->fld->flags,
+ dbprintf(_("\tfld->flags=%d (%s%s%s%s%s)\n"), fl->fld->flags,
fl->fld->flags & FLD_ABASE1 ? "abase1 " : "",
fl->fld->flags & FLD_SKIPALL ? "skipall " : "",
fl->fld->flags & FLD_ARRAY ? "array " : "",
ftok_free(v);
return fl;
bad:
- dbprintf("bad syntax in field name %s\n", name);
+ dbprintf(_("bad syntax in field name %s\n"), name);
ftok_free(v);
if (fl)
flist_free(fl);
if (*s == '\"') {
s++; /* skip first quote */
if ((a = strrchr(s, '\"')) == NULL) {
- dbprintf("missing closing quote %s\n", s);
+ dbprintf(_("missing closing quote %s\n"), s);
ftok_free(v);
return NULL;
}
l = 1;
t = puncttypes[a - punctchars];
} else {
- dbprintf("bad character in field %s\n", s);
+ dbprintf(_("bad character in field %s\n"), s);
ftok_free(v);
return NULL;
}