Signal.hx

#if macro
import haxe.macro.Context;
import haxe.macro.Expr;
#end

abstract Signal<T>(Array<T>)
{
    public inline function new()
    {
        this = [];
    }

    public inline function add(listener:T):Void
    {
        this.push(listener);
    }
    private inline function asArray():Array<T> return this;
    public function remove(listener:T):Void
    {
        var i = 0;
        while (i < this.length)
        {
            if (Reflect.compareMethods(this[i], listener))
                this.splice(i, 1);
            else
                i++;
        }
    }

    static public macro function dispatch(ethis:Expr, args:Array<Expr>):Expr
    {
        return macro
            for (__handler in @:privateAccess $ethis.asArray())
                __handler($a{args});
    }
}