BadLessOrEqualExpression.cs

Go to the documentation of this file.

using BadScript2.Common;
using BadScript2.Runtime;
using BadScript2.Runtime.Error;
using BadScript2.Runtime.Objects;
using BadScript2.Runtime.Objects.Native;
 
namespace BadScript2.Parser.Expressions.Binary.Comparison;
 
public class BadLessOrEqualExpression : BadBinaryExpression
{
    public BadLessOrEqualExpression(BadExpression left, BadExpression right, BadSourcePosition position) : base(
        left,
        right,
        position
    ) { }
 
    public static BadObject LessOrEqual(BadObject left, BadObject right, BadSourcePosition pos)
    {
        if (left is not IBadNumber lNum)
        {
            throw new BadRuntimeException($"Can not apply operator '<=' to {left} and {right}", pos);
        }
 
        if (right is IBadNumber rNum)
        {
            return lNum.Value <= rNum.Value ? BadObject.True : BadObject.False;
        }
 
        throw new BadRuntimeException($"Can not apply operator '<=' to {left} and {right}", pos);
    }
 
    public static IEnumerable<BadObject> LessOrEqualWithOverride(
        BadExecutionContext? context,
        BadObject left,
        BadObject right,
        BadSourcePosition position)
    {
        if (left.HasProperty(BadStaticKeys.LESS_EQUAL_OPERATOR_NAME, context?.Scope))
        {
            foreach (BadObject o in ExecuteOperatorOverride(
                         left,
                         right,
                         context!,
                         BadStaticKeys.LESS_EQUAL_OPERATOR_NAME,
                         position
                     ))
            {
                yield return o;
            }
        }
        else if (right.HasProperty(BadStaticKeys.LESS_EQUAL_OPERATOR_NAME, context?.Scope))
        {
            foreach (BadObject o in ExecuteOperatorOverride(
                         right,
                         left,
                         context!,
                         BadStaticKeys.LESS_EQUAL_OPERATOR_NAME,
                         position
                     ))
            {
                yield return o;
            }
        }
        else
 
        {
            yield return LessOrEqual(left, right, position);
        }
    }
 
    protected override IEnumerable<BadObject> InnerExecute(BadExecutionContext context)
    {
        BadObject left = BadObject.Null;
 
        foreach (BadObject o in Left.Execute(context))
        {
            left = o;
 
            yield return o;
        }
 
        left = left.Dereference();
        BadObject right = BadObject.Null;
 
        foreach (BadObject o in Right.Execute(context))
        {
            right = o;
 
            yield return o;
        }
 
        right = right.Dereference();
 
 
        foreach (BadObject o in LessOrEqualWithOverride(context, left, right, Position))
        {
            yield return o;
        }
    }
 
    protected override string GetSymbol()
    {
        return "<=";
    }
}