使用FP-TS重写用记录器包裹的小功能

Question

我想尝试使用fp-ts重写我的代码的某些部分，并考虑重构以下方法：

export const createApiServer = () => {
    logger.info("Starting World Server API");
    const apiServer = express()
        // 3rd party middleware
        .use(helmet())
        .use(bodyParser.json())
        .use(cors())
        // Root route
        .get("/", (_, result) => result.sendStatus(httpStatusCodes.OK))
        // 404 - Not Found
        .use((_, result) => result.sendStatus(httpStatusCodes.NOT_FOUND))
        // 500 - Internal Server Error
        .use(errorLoggerMiddleware)
        .use(errorResponseMiddleware);
    logger.verbose(`Initialized World Server API in ${process.uptime().toFixed(3)} seconds`);
    return apiServer;
};

在阅读了有关副反射的IO类型后，我尝试使用它如下：

const info = (message: string) => new IO(() => log.info(message));
const verbose = (message: string) => new IO(() => log.verbose(message));
const setupApiServer = () =>
    new IO(() =>
        express()
            .use(helmet())
            .use(bodyParser.json())
            .use(cors())
            .get("/", (_, result) => result.sendStatus(httpStatusCodes.OK))
            .use((_, result) => result.sendStatus(httpStatusCodes.NOT_FOUND))
            .use(errorLoggerMiddleware)
            .use(errorResponseMiddleware)
    );
export const createApiServer = () =>
    info("Starting World Server API")
        .chain(setupApiServer)
        .chain((apiServer) =>
            verbose(`Initialized World Server API in ${process.uptime().toFixed(3)} seconds`)
                .map(() => apiServer)
        )
        .run();

任意使用MAP方法在最后一个链条呼叫中通过Apiserver对象进行管道，只是在接收到它并将其进一步发送时感到很奇怪。我想知道这是正确的还是有任何不同的模式。

Answer 1

您可以使用chainFirst。

使用chainFirst，您可以重构此

import { pipe } from "fp-ts/lib/pipeable";
import * as IO from "fp-ts/lib/IO";
declare const log: (m: string) => IO.IO<void>
declare const a: IO.IO<number>
pipe(
  a,
  IO.chain((a) => pipe(log(`Got ${a}`), IO.map(() => a)))
)

进入这个

pipe(
  a,
  IO.chainFirst((a) => log(`Got ${a}`))
)