Main.hx

using Tools;

class Main {
    static function main() {
        var a = haxe.ds.Option.Some(42);
        var s = a.extract(Some(v) => {value: v});
        trace(s);
    }
}

Tools.hx

class Tools {
    public static macro function extract(value:haxe.macro.Expr.ExprOf<EnumValue>, pattern:haxe.macro.Expr) {
        return switch (pattern) {
            case macro $a => $b:
                macro switch ($value) {
                    case $a:
                        $b;
                    default:
                        throw "no match";
                }
            default:
                throw new haxe.macro.Expr.Error("Invalid enum value extraction pattern", pattern.pos);
        }
    }
}

Little improvement: see my fork.

new url for @boozook comment https://gist.github.com/boozook/9d27b0011734bb8e33e5#file-tools-hx-L12-L13

@bayleedev Thank you! 🙏
But i'm not sure how it useful and actual today.