Function parserMap

packages/printer/src/internal/docTree.ts:380–381

(self: DocTreeParser<S, A>, f: (a: A) => B)

const parserSucceed = <S, A>(value: A): DocTreeParser<S, A> => (stream) => Option.some([value, stream] as const)

const parserMap = <S, A, B>(self: DocTreeParser<S, A>, f: (a: A) => B): DocTreeParser<S, B> => (stream) =>
  Option.map(self(stream), ([a, s]) => [f(a), s] as const)

const parserFlatMap =
  <S, A, B>(self: DocTreeParser<S, A>, f: (a: A) => DocTreeParser<S, B>): DocTreeParser<S, B> => (stream) =>