bonkmaykr/otyaSMILEBASIC
1
0
Fork 0
Code Activity

単項演算子を実�

Browse Source
This commit is contained in:
otya128
2015-06-07 19:33:51 +09:00
parent 978a7a6ee7
commit 628b259caf
5 changed files with 37 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
SMILEBASIC/VM.d
View File

@@ -115,6 +115,7 @@ class PrintCode : Code
throw new TypeMismatch();
}
}
stdout.flush();
}
}
/*
@@ -197,6 +198,7 @@ class Operate : Code
vm.pop(r);
int ri = r.integerValue;
double rd = r.integerValue;
bool numf = r.type == ValueType.Double || r.type == ValueType.Integer;
if(r.type == ValueType.Double)
{
ri = cast(int)r.doubleValue;
@@ -206,10 +208,16 @@ class Operate : Code
{
//単項演算子
case TokenType.Not:
vm.push(Value(~ri));
if(numf)
vm.push(Value(~ri));
else
throw new TypeMismatch();
return;
case TokenType.LogicalNot:
vm.push(Value(!ri));
if(numf)
vm.push(Value(!ri));
else
throw new TypeMismatch();
return;
default:
break;
@@ -256,7 +264,7 @@ class Operate : Code
//数値 * 文字列だとエラー
case TokenType.Mul:
{
wstring delegate(wstring x, wstring y, int num) mul;
wstring delegate(wstring, wstring, int) mul;
mul = (x, y, z) => z > 0 ? x ~ mul(x , y, z - 1) : "";
vm.push(Value(mul(ls, ls, cast(int)rd)));
}