bonkmaykr/otyaSMILEBASIC
1
0
Fork 0
Code Activity

数値演算をより忠実にした

Browse Source
This commit is contained in:
otya128
2016-09-03 16:24:59 +09:00
parent 361a8e04c1
commit 1bbcc3d50c
3 changed files with 93 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

75
SMILEBASIC/VM.d
View File

@@ -601,16 +601,85 @@ class Operate : Code
}
}
}
int li = l.integerValue;
if (l.isInteger && r.isInteger)
{
switch(operator)
{
case TokenType.Plus:
vm.push(Value(li + ri));
return;
case TokenType.Minus:
vm.push(Value(li - ri));
return;
case TokenType.Mul:
vm.push(Value(li * ri));
return;
case TokenType.Div:
vm.push(Value(li / ri));
return;
case TokenType.IntDiv:
//TODO:範囲外だとOverflow
vm.push(Value(cast(int)(li / ri)));
return;
case TokenType.Mod:
vm.push(Value(li % ri));
return;
case TokenType.And:
vm.push(Value(li & ri));
return;
case TokenType.Or:
vm.push(Value(li | ri));
return;
case TokenType.LogicalAnd:
vm.push(Value(li && ri));
return;
case TokenType.LogicalOr:
vm.push(Value(li || ri));
return;
case TokenType.Xor:
vm.push(Value(li ^ ri));
return;
case TokenType.Equal:
vm.push(Value(li == ri));
return;
case TokenType.NotEqual:
vm.push(Value(li != ri));
return;
case TokenType.Less:
vm.push(Value(li < ri));
return;
case TokenType.LessEqual:
vm.push(Value(li <= ri));
return;
case TokenType.Greater:
vm.push(Value(li > ri));
return;
case TokenType.GreaterEqual:
vm.push(Value(li >= ri));
return;
case TokenType.LeftShift:
vm.push(Value(li << ri));
return;
case TokenType.RightShift:
vm.push(Value(li >> ri));
return;
default:
}
}
if (!l.isNumber || !r.isNumber)
throw new TypeMismatch();
int li = l.integerValue;
double ld = l.integerValue;
double ld;
if(l.type == ValueType.Double)
{
li = cast(int)l.doubleValue;
ld = l.doubleValue;
}
else
{
ld = l.integerValue;
}
//とりあえずInteger
switch(operator)
{