y = truncl(p->x);
e = getexcept();
if (!checkexcept(e, p->e, p->r)) {
- printf("%s truncl(%La)==%La except: want %s", rstr(p->r), p->x, p->y, estr(p->e));
+ printf("%s:%d: bad fp exception: %s truncl(%La)=%La, want %s",
+ p->file, p->line, rstr(p->r), p->x, p->y, estr(p->e));
printf(" got %s\n", estr(e));
err++;
}
d = ulperrl(y, p->y, p->dy);
if (!checkulp(d, p->r)) {
- printf("%s truncl(%La) want %La got %La ulperr %.3f = %a + %a\n",
- rstr(p->r), p->x, p->y, y, d, d-p->dy, p->dy);
+ printf("%s:%d: %s truncl(%La) want %La got %La ulperr %.3f = %a + %a\n",
+ p->file, p->line, rstr(p->r), p->x, p->y, y, d, d-p->dy, p->dy);
err++;
}
}