//------------------------------------------------------------
// Negative,BitwiseNot用評価関数。
void evaluateNegativeBitwiseNot(SemanticAnalyzeComponent aComp, bool aIsNegative)
{
// todo:
// 暗黙の変換の対応
// 今はintしか対応しない
if (mFirstNode.GetEvaluateInfo().Kind != EvaluateInfo.InfoKind.Value ||
mFirstNode.GetEvaluateInfo().TypeInfo.Symbol.GetBuiltInType() != BuiltInType.SInt32
)
{
aComp.ThrowErrorException(SymbolTree.ErrorKind.NOT_SUPPORTED_EXPRESSION, mExpr.mOpToken);
}
// SR設定
mTransferredEIHolder.ReceiveAndSetSR(aComp);
// 伝達できるなら伝達する
mTransferredEIHolder.TransferIfPossible(aComp);
// １つめを評価
mFirstNode.SendEvent(aComp, EvaluateNodeEventKind.Evaluate);
// 伝達情報リセット
aComp.TransferredEvaluateInfoReset();
// 命令追加
aComp.BCFunction.AddOPCode_SReg1_SReg2(
aIsNegative ? BCOpCode.OpType.NEGS32 : BCOpCode.OpType.NTI32
, mEvaluateInfo.SR
, mFirstNode.GetEvaluateInfo().SR
);
// イベント送信
mFirstNode.SendEvent(aComp, EvaluateNodeEventKind.Release);
}
//------------------------------------------------------------
// 同じ数値の演算しか許さないタイプの演算。
void evaluateNumberType(
SemanticAnalyzeComponent aComp
, BCOpCode.OpType aOpType
, bool aSwapLR // trueなら左辺と右辺を逆転させる。
)
{
// レジスタ設定
mTransferredEIHolder.ReceiveAndSetSR(aComp);
// 伝達設定
mTransferredEIHolder.TransferIfPossible(aComp);
// １つめ
mFirstNode.SendEvent(aComp, EvaluateNodeEventKind.Evaluate);
// 伝達リセット
aComp.TransferredEvaluateInfoReset();
// 可能なら２つめに伝達する
if (!mFirstNode.GetEvaluateInfo().SR.IsSame(mEvaluateInfo.SR))
{
mTransferredEIHolder.TransferIfPossible(aComp);
}
// ２つめ
mSecondNode.SendEvent(aComp, EvaluateNodeEventKind.Evaluate);
// 伝達リセット
aComp.TransferredEvaluateInfoReset();
// todo:
// 暗黙の変換の対応
// 今はintしか対応しない
if (mFirstNode.GetEvaluateInfo().Kind != EvaluateInfo.InfoKind.Value ||
mFirstNode.GetEvaluateInfo().TypeInfo.Symbol.GetBuiltInType() != BuiltInType.SInt32 ||
mSecondNode.GetEvaluateInfo().Kind != EvaluateInfo.InfoKind.Value ||
mSecondNode.GetEvaluateInfo().TypeInfo.Symbol.GetBuiltInType() != BuiltInType.SInt32
)
{
aComp.ThrowErrorException(SymbolTree.ErrorKind.NOT_SUPPORTED_EXPRESSION, mExpr.mOpToken);
}
// 演算
StackRegister leftSR = mFirstNode.GetEvaluateInfo().SR;
StackRegister rightSR = mSecondNode.GetEvaluateInfo().SR;
aComp.BCFunction.AddOPCode_SReg1_SReg2_SReg3(
aOpType
, mEvaluateInfo.SR
, aSwapLR ? rightSR : leftSR
, aSwapLR ? leftSR : rightSR
);
// 通知
mSecondNode.SendEvent(aComp, EvaluateNodeEventKind.Release);
mFirstNode.SendEvent(aComp, EvaluateNodeEventKind.Release);
}