Error Extending `Data.TaggedError` Class in TypeScript

/**
 * Original Data.TaggedError class can be found here:
 *
 * @see https://github.com/Effect-TS/effect/blob/35a0f813141652d696461cd5d19fd146adaf85be/packages/effect/src/Data.ts#L552
 */
const ErrorBase = <Tag extends string>(
  tag: Tag,
): new <A extends Record<string, any> = {}>(
  args: Types.Equals<A, {}> extends true
    ? void
    : { readonly [P in keyof A as P extends "_tag" ? never : P]: A[P] },
) => Cause.YieldableError & { readonly _tag: Tag } & Readonly<A> => {
  class Base extends Error<{}> {
    readonly _tag = tag;
  }

  (Base.prototype as any).name = tag;
  return Base as any;
};