BadInteropEnumerable.cs

Go to the documentation of this file.

using System.Collections;
 
using BadScript2.Runtime.Error;
using BadScript2.Runtime.Interop.Functions;
using BadScript2.Runtime.Objects;
using BadScript2.Runtime.Objects.Functions;
using BadScript2.Runtime.Objects.Types;
using BadScript2.Runtime.Objects.Types.Interface;
 
namespace BadScript2.Runtime.Interop;
 
public class BadInteropEnumerable : BadObject, IBadEnumerable
{
    private static readonly BadClassPrototype s_Prototype = new BadNativeClassPrototype<BadInteropEnumerator>(
        "Enumerable",
        (_, _) => throw new BadRuntimeException("Cannot call method"),
        () => new []{(BadInterfacePrototype)BadNativeClassBuilder.Enumerable.CreateGeneric(new []{BadAnyPrototype.Instance})}
    );
 
    private readonly IEnumerable<BadObject> m_Enumerable;
 
    private readonly BadFunction m_Func;
 
    public BadInteropEnumerable(IEnumerable<BadObject> enumerable)
    {
        m_Enumerable = enumerable;
 
        m_Func = new BadDynamicInteropFunction(
            "GetEnumerator",
            _ => new BadInteropEnumerator(m_Enumerable.GetEnumerator()),
            (BadClassPrototype)BadNativeClassBuilder.Enumerator.CreateGeneric(new []{BadAnyPrototype.Instance})
        );
    }
 
    public IEnumerator<BadObject> GetEnumerator()
    {
        return m_Enumerable.GetEnumerator();
    }
 
    IEnumerator IEnumerable.GetEnumerator()
    {
        return m_Enumerable.GetEnumerator();
    }
 
 
    public override BadClassPrototype GetPrototype()
    {
        return s_Prototype;
    }
 
    public override bool HasProperty(string propName, BadScope? caller = null)
    {
        return propName == "GetEnumerator" ||
               base.HasProperty(propName, caller);
    }
 
    public override BadObjectReference GetProperty(string propName, BadScope? caller = null)
    {
        return propName == "GetEnumerator"
            ? BadObjectReference.Make("GetEnumerator", () => m_Func)
            : base.GetProperty(propName, caller);
    }
 
    public override string ToSafeString(List<BadObject> done)
    {
        return "BadInteropEnumerable";
    }
}