Function withDescriptionInternal

packages/cli/src/internal/args.ts:864–902

(self: Instruction, description: string)

}

const withDescriptionInternal = (self: Instruction, description: string): Args.Args<any> => {
  switch (self._tag) {
    case "Empty": {
      return none
    }
    case "Single": {
      const desc = InternalHelpDoc.sequence(self.description, InternalHelpDoc.p(description))
      return makeSingle(self.pseudoName, self.primitiveType, desc)
    }
    case "Map": {
      return makeMap(withDescriptionInternal(self.args as Instruction, description), self.f)
    }
    case "Both": {
      return makeBoth(
        withDescriptionInternal(self.left as Instruction, description),
        withDescriptionInternal(self.right as Instruction, description)
      )
    }
    case "Variadic": {
      return makeVariadic(
        withDescriptionInternal(self.args as Instruction, description),
        self.min,
        self.max
      )
    }
    case "WithDefault": {
      return makeWithDefault(
        withDescriptionInternal(self.args as Instruction, description),
        self.fallback
      )
    }
    case "WithFallbackConfig": {
      return makeWithFallbackConfig(
        withDescriptionInternal(self.args as Instruction, description),
        self.config
      )
    }
  }
}

const wizardInternal = (self: Instruction, config: CliConfig.CliConfig): Effect.Effect<
  Array<string>,