Function fitsSmartLoop

packages/printer/src/internal/layout.ts:328–385

(
  self: DocStream.DocStream<A>,
  comparator: LazyArg<DocStream.DocStream<A>>,
  pageWidth: number,
  currentColumn: number,
  availableWidth: number
)

}

const fitsSmartLoop = <A>(
  self: DocStream.DocStream<A>,
  comparator: LazyArg<DocStream.DocStream<A>>,
  pageWidth: number,
  currentColumn: number,
  availableWidth: number
): boolean => {
  let minNestingLevel: number | undefined
  let stream = self
  let w = availableWidth
  while (w >= 0) {
    switch (stream._tag) {
      case "FailedStream": {
        return false
      }
      case "EmptyStream": {
        return true
      }
      case "CharStream": {
        w = w - 1
        stream = stream.stream
        break
      }
      case "TextStream": {
        w = w - stream.text.length
        stream = stream.stream
        break
      }
      case "LineStream": {
        if (!minNestingLevel) {
          minNestingLevel = Option.match(getInitialIndentation(comparator()), {
            // Definitely not a hanging layout. Return the same `minNestingLevel` that
            // subsequent lines with the same indentation use
            onNone: () => currentColumn,
            // Could be a (less wide) hanging layout, so take the minimum of the indent
            // and the current column
            onSome: (value) => Math.min(value, currentColumn)
          })
        }
        if (minNestingLevel < stream.indentation) {
          return false
        }
        w = pageWidth - stream.indentation
        stream = stream.stream
        break
      }
      case "PushAnnotationStream": {
        stream = stream.stream
        break
      }
      case "PopAnnotationStream": {
        stream = stream.stream
        break
      }
    }
  }
  return false
}