Aggiustamenti per cambio di real::integer()
git-svn-id: svn://10.65.10.50/trunk@267 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
853cd8397c
commit
e03a279bcc
@ -445,13 +445,13 @@ void TExpression::eval()
|
||||
case _left:
|
||||
o2 = (real&) evalstack.pop();
|
||||
s2 = (TString&) evalstack.pop();
|
||||
s1 = s2.left(o2.integer());
|
||||
s1 = s2.left((int)o2.integer());
|
||||
evalstack.push(s1);
|
||||
break;
|
||||
case _right:
|
||||
o2 = (real&) evalstack.pop();
|
||||
s2 = (TString&) evalstack.pop();
|
||||
s1 = s2.right(o2.integer());
|
||||
s1 = s2.right((int)o2.integer());
|
||||
evalstack.push(s1);
|
||||
break;
|
||||
case _mid:
|
||||
@ -459,7 +459,7 @@ void TExpression::eval()
|
||||
o1 = (real&) evalstack.pop();
|
||||
o1 -= 1.00;
|
||||
s2 = (TString&) evalstack.pop();
|
||||
s1 = s2.mid(o1.integer(), o2.integer());
|
||||
s1 = s2.mid((int)o1.integer(), (int)o2.integer());
|
||||
evalstack.push(s1);
|
||||
break;
|
||||
case _pow:
|
||||
|
Loading…
x
Reference in New Issue
Block a user