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(Position);
        BadObject right = BadObject.Null;
 
        foreach (BadObject o in Right.Execute(context))
        {
            right = o;
 
            yield return o;
        }
 
        right = right.Dereference(Position);
 
        foreach (BadObject o in LessOrEqualWithOverride(context, left, right, Position))
        {
            yield return o;
        }
    }
 
    protected override string GetSymbol()
    {
        return "<=";
    }
}