firebird/firebird-mirror
firebird/firebird-mirror
8
0
Fork 1
mirror of https://github.com/FirebirdSQL/firebird.git synced 2025-01-22 20:43:02 +01:00
Code Issues

Fixed CORE-1677 - Floor & ceiling functions give wrong results with exact numeric arguments

Browse Source
This commit is contained in:
asfernandes 2008-01-08 00:52:49 +00:00
parent 1f2fcc264b
commit 1c40b7d633
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/jrd/SysFunction.cpp
View File

@ -1093,14 +1093,14 @@ static dsc* evlCeil(Jrd::thread_db* tdbb, const SysFunction* function, Jrd::jrd_
case dtype_long:
case dtype_int64:
{
SSHORT scale = 1;
SINT64 scale = 1;
fb_assert(impure->vlu_desc.dsc_scale <= 0);
for (int i = -impure->vlu_desc.dsc_scale; i > 0; --i)
scale *= 10;
SLONG v1 = MOV_get_int64(&impure->vlu_desc, impure->vlu_desc.dsc_scale);
SLONG v2 = MOV_get_int64(&impure->vlu_desc, 0) * scale;
SINT64 v1 = MOV_get_int64(&impure->vlu_desc, impure->vlu_desc.dsc_scale);
SINT64 v2 = MOV_get_int64(&impure->vlu_desc, 0) * scale;
impure->vlu_misc.vlu_int64 = v1 / scale;
@ -1505,14 +1505,14 @@ static dsc* evlFloor(Jrd::thread_db* tdbb, const SysFunction* function, Jrd::jrd
case dtype_long:
case dtype_int64:
{
SSHORT scale = 1;
SINT64 scale = 1;
fb_assert(impure->vlu_desc.dsc_scale <= 0);
for (int i = -impure->vlu_desc.dsc_scale; i > 0; --i)
scale *= 10;
SLONG v1 = MOV_get_int64(&impure->vlu_desc, impure->vlu_desc.dsc_scale);
SLONG v2 = MOV_get_int64(&impure->vlu_desc, 0) * scale;
SINT64 v1 = MOV_get_int64(&impure->vlu_desc, impure->vlu_desc.dsc_scale);
SINT64 v2 = MOV_get_int64(&impure->vlu_desc, 0) * scale;
impure->vlu_misc.vlu_int64 = v1 / scale;