tlang-interperter-cs/tlanglib/DivideNode.cs

42 lines
1.0 KiB
C#
Raw Normal View History

2023-03-09 19:40:14 +00:00
namespace tlang
{
internal class DivideNode : Node
{
public Node Left {get;set;}
public Node Right {get;set;}
public DivideNode(Node left, Node right)
{
this.Left = left;
this.Right = right;
}
public override TObject Execute(IScopeEnvironment nodeEnv)
{
2023-03-09 23:57:16 +00:00
var l = Left.Execute(nodeEnv);
var r = Right.Execute(nodeEnv);
var lnum = l as TNumber;
var rnum = r as TNumber;
var dleft = l as TDictionary;
2023-03-09 19:40:14 +00:00
2023-03-09 23:57:16 +00:00
if(dleft != null)
{
if(dleft.MemberExists("divide"))
{
var mbm = dleft["divide"] as ICallable;
if(mbm != null)
{
return mbm.Call(r);
}
}
}
if(lnum != null && rnum != null)
2023-06-08 18:14:35 +00:00
return TObject.Number(lnum.Value / rnum.Value);
2023-03-09 19:40:14 +00:00
2023-06-08 18:14:35 +00:00
return TObject.Null;
2023-03-09 19:40:14 +00:00
}
2023-06-08 18:14:35 +00:00
2023-03-09 19:40:14 +00:00
}
}