Function loop

packages/cli/src/internal/commandDescriptor.ts:452–472

(
    self: Instruction,
    isSubcommand: boolean
  )

  self: Instruction
): Array<[string, GetUserInput | Standard]> => {
  const loop = (
    self: Instruction,
    isSubcommand: boolean
  ): Array<[string, GetUserInput | Standard]> => {
    switch (self._tag) {
      case "Standard":
      case "GetUserInput": {
        return Arr.of([self.name, self])
      }
      case "Map": {
        return loop(self.command, isSubcommand)
      }
      case "Subcommands": {
        // Ensure that we only traverse the subcommands one level deep from the
        // parent command
        return isSubcommand
          ? loop(self.parent, false)
          : Arr.flatMap(self.children, (child) => loop(child, true))
      }
    }
  }
  return loop(self, false)
}