root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Modificata la divisione 0/0: non genera piu' errore ma 0

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@4323 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
augusto 1997-05-06 10:31:03 +00:00
parent df32a1ba3c
commit 650f8e0782
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
include/expr.cpp
View File

@ -378,10 +378,10 @@ void TExpression::eval()
real& r = evalstack.pop_real();
if (r.is_zero())
{
print_error("Divisione per zero!");
r = 1.0;
}
evalstack.peek_real() /= r;
if (!evalstack.peek_real().is_zero())
print_error("Divisione per zero!");
} else
evalstack.peek_real() /= r;
}
break;
case _chgs: