"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.groupAdjacentBy = exports.groupAdjacentBy_ = void 0;
// ets_tracing: off
const CK = __importStar(require("../../../../Collections/Immutable/Chunk"));
const Tp = __importStar(require("../../../../Collections/Immutable/Tuple"));
const O = __importStar(require("../../../../Option"));
const CH = __importStar(require("../../Channel"));
const C = __importStar(require("../core"));
/**
 * Creates a stream that groups on adjacent keys, calculated by function f.
 */
function groupAdjacentBy_(self, f) {
    const go = (in_, state) => CK.reduce_(in_, Tp.tuple(CK.empty(), state), ({ tuple: [os, o] }, a) => O.fold_(o, () => Tp.tuple(os, O.some(Tp.tuple(f(a), CK.single(a)))), (agg) => {
        const k2 = f(a);
        const { tuple: [k, aggregated] } = agg;
        if (k === k2) {
            return Tp.tuple(os, O.some(Tp.tuple(k, CK.append_(aggregated, a))));
        }
        else {
            return Tp.tuple(CK.append_(os, agg), O.some(Tp.tuple(k2, CK.single(a))));
        }
    }));
    const chunkAdjacent = (buffer) => CH.readWithCause((chunk) => {
        const { tuple: [outputs, newBuffer] } = go(chunk, buffer);
        return CH.zipRight_(CH.write(outputs), chunkAdjacent(newBuffer));
    }, (_) => CH.failCause(_), (_) => O.fold_(buffer, () => CH.unit, (o) => CH.write(CK.single(o))));
    return new C.Stream(self.channel[">>>"](chunkAdjacent(O.none)));
}
exports.groupAdjacentBy_ = groupAdjacentBy_;
/**
 * Creates a stream that groups on adjacent keys, calculated by function f.
 *
 * @ets_data_first groupAdjacentBy_
 */
function groupAdjacentBy(f) {
    return (self) => groupAdjacentBy_(self, f);
}
exports.groupAdjacentBy = groupAdjacentBy;
//# sourceMappingURL=groupAdjacentBy.js.map