Corretta round

git-svn-id: svn://10.65.10.50/trunk@2583 c028cbd2-c16b-5b4b-a496-9718f37d4682
1996-02-08 15:47:48 +00:00 · 1996-02-08 15:47:48 +00:00 · aeff220d55
commit aeff220d55
parent d8eeddba98
1 changed files with 23 additions and 18 deletions
--- a/include/real.cpp
+++ b/include/real.cpp
@ -187,7 +187,12 @@ real& real::round (
    p = ipow10(prec);
    _dec *= p;
  }  
+  
+  if (_dec >= 0.0)
    _dec = floorl(_dec + 0.5);
+  else
+    _dec = ceill(_dec - 0.5);  
+  
  if (prec != 0)
    _dec /= p;