Function getUsageInternal

packages/cli/src/internal/options.ts:917–957

(self: Instruction)

}

const getUsageInternal = (self: Instruction): Usage.Usage => {
  switch (self._tag) {
    case "Empty": {
      return InternalUsage.empty
    }
    case "Single": {
      const acceptedValues = InternalPrimitive.isBool(self.primitiveType)
        ? Option.none()
        : Option.orElse(
          InternalPrimitive.getChoices(self.primitiveType),
          () => Option.some(self.placeholder)
        )
      return InternalUsage.named(getNames(self), acceptedValues)
    }
    case "KeyValueMap": {
      return getUsageInternal(self.argumentOption as Instruction)
    }
    case "Map": {
      return getUsageInternal(self.options as Instruction)
    }
    case "Both": {
      return InternalUsage.concat(
        getUsageInternal(self.left as Instruction),
        getUsageInternal(self.right as Instruction)
      )
    }
    case "OrElse": {
      return InternalUsage.alternation(
        getUsageInternal(self.left as Instruction),
        getUsageInternal(self.right as Instruction)
      )
    }
    case "Variadic": {
      return InternalUsage.repeated(getUsageInternal(self.argumentOption as Instruction))
    }
    case "WithDefault":
    case "WithFallback": {
      return InternalUsage.optional(getUsageInternal(self.options as Instruction))
    }
  }
}

const isBoolInternal = (self: Instruction): boolean => {
  switch (self._tag) {