(real_value_truncate): Use push/pop_float_handler.

From-SVN: r2544
This commit is contained in:
Richard Stallman 1992-10-21 21:21:25 +00:00
parent bff4b641c7
commit d26d14f71a
1 changed files with 4 additions and 3 deletions

View File

@ -777,16 +777,17 @@ real_value_truncate (mode, arg)
volatile
#endif
REAL_VALUE_TYPE value;
jmp_buf handler;
jmp_buf handler, old_handler;
int handled;
if (setjmp (handler))
{
error ("floating overflow");
return dconst0;
}
set_float_handler (handler);
handled = push_float_handler (handler, old_handler);
value = REAL_VALUE_TRUNCATE (mode, arg);
set_float_handler (NULL_PTR);
pop_float_handler (handled, old_handler);
return value;
}