"use strict";
var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) {
    if (k2 === undefined) k2 = k;
    Object.defineProperty(o, k2, { enumerable: true, get: function() { return m[k]; } });
}) : (function(o, m, k, k2) {
    if (k2 === undefined) k2 = k;
    o[k2] = m[k];
}));
var __setModuleDefault = (this && this.__setModuleDefault) || (Object.create ? (function(o, v) {
    Object.defineProperty(o, "default", { enumerable: true, value: v });
}) : function(o, v) {
    o["default"] = v;
});
var __importStar = (this && this.__importStar) || function (mod) {
    if (mod && mod.__esModule) return mod;
    var result = {};
    if (mod != null) for (var k in mod) if (k !== "default" && Object.prototype.hasOwnProperty.call(mod, k)) __createBinding(result, mod, k);
    __setModuleDefault(result, mod);
    return result;
};
Object.defineProperty(exports, "__esModule", { value: true });
exports.paginateChunkM = void 0;
const Function_1 = require("../../Function");
const O = __importStar(require("../../Option"));
const T = __importStar(require("../_internal/effect"));
const M = __importStar(require("../_internal/managed"));
const Ref = __importStar(require("../_internal/ref"));
const Pull = __importStar(require("../Pull"));
const definitions_1 = require("./definitions");
/**
 * Like `unfoldChunkM`, but allows the emission of values to end one step further than
 * the unfolding of the state. This is useful for embedding paginated APIs,
 * hence the name.
 */
function paginateChunkM(s, f) {
    return new definitions_1.Stream((M.map_(M.bind_(M.do, "ref", () => T.toManaged(Ref.makeRef(O.some(s)))), ({ ref }) => T.chain_(ref.get, O.fold(() => Pull.end, (s) => T.foldM_(f(s), Pull.fail, ({ tuple: [as, s] }) => T.as_(ref.set(s), as)))))));
}
exports.paginateChunkM = paginateChunkM;
//# sourceMappingURL=paginateChunkM.js.map