如何在 fp-ts 中将一个参数分派给多个 function

Question

我有以下代码

export const getPostData = (id: string) =>
  pipe(
    getFullPathFileNameForPosts(`${id}.md`), // IO<string>
    chain(getFileContents), // IO<string>
    chain(getMatter), // IO<matter.GrayMatterFile<string>>
    map(R.pick(['data'])),
    bind('id', () => () => id)
  );

以上 function getPostData() retun

IO<{
  data: {[key: string]: any};
  id: string;
}>

现在我必须在返回的结果中添加一些文件，比如说content ，结果看起来像

IO<{
  data: {[key: string]: any};
  id: string;
  content: string;
}>

我写了一个新的 function getContent = (matter: matter.GrayMatterFile<string>) => {...} ，现在如何将这个 function 添加到组合的getPostData ？

我想问的主要问题是如何在组合的function中将值划分为不同的函数进行处理。

因为chain(getFileContents)中的getFileContents function需要读取文件，所以不想读取这个文件两次

Answer 1

您可以继续使用bind和bindTo来保留您需要的所有值，直到您完成使用它们为止。

由于您需要一个matter.GrayMatterFile作为getContent function 的输入，因此您需要将该值“保持”一段时间。

这是一种可能的方法：

import { pipe} from 'fp-ts/lib/function'
import { chain, map, bind, bindTo, IO, of } from 'fp-ts/lib/IO'
import { GrayMatterFile } from 'gray-matter'

declare const getMatter: (fileContents: string) => IO<GrayMatterFile<string>>

declare const getFileContents: (filepath: string) => IO<string>

declare const getFullPathFileNameForPosts: (filename: string) => IO<string>

declare const getContent: (file: GrayMatterFile<string>) => IO<string>

export const getPostData = (id: string) =>
  pipe(
    getFullPathFileNameForPosts(`${id}.md`), // IO<string>
    chain(getFileContents), // IO<string>
    chain(getMatter), // IO<matter.GrayMatterFile<string>>
    bindTo('grayMatterFile'),
    bind('content', ({ grayMatterFile }) => getContent(grayMatterFile)),
    map(({ content, grayMatterFile }) => ({
      content: content,
      data: grayMatterFile.data,
      id
    })),
  );