Function makeDerive

packages/cli/src/internal/command.ts:150–166

(
  self: Command.Command<Name, any, any, A>,
  options: {
    readonly descriptor?: Descriptor.Command<A>
    readonly handler?: (_: A) => Effect.Effect<void, E, R>
    readonly transform?: Command.Command.Transform<R, E, A>
  }
)

}

const makeDerive = <Name extends string, R, E, A>(
  self: Command.Command<Name, any, any, A>,
  options: {
    readonly descriptor?: Descriptor.Command<A>
    readonly handler?: (_: A) => Effect.Effect<void, E, R>
    readonly transform?: Command.Command.Transform<R, E, A>
  }
): Command.Command<Name, R, E, A> => {
  const command = Object.create(Prototype)
  command.descriptor = options.descriptor ?? self.descriptor
  command.handler = options.handler ?? self.handler
  command.transform = options.transform
    ? ((effect: Effect.Effect<void, E, R>, opts: A) => options.transform!(self.transform(effect, opts), opts))
    : self.transform
  command.tag = self.tag
  return command
}

/** @internal */
export const fromDescriptor = dual<