UNPKG

fp-ts-routing

Version:

A type-safe routing library for TypeScript

188 lines 4.48 kB
import { identity } from 'fp-ts/es6/function'; import * as O from 'fp-ts/es6/Option'; // This `pipe` version is deprecated, but provided by `fp-ts` v2.0.1 and higher. import { pipe } from 'fp-ts/es6/pipeable'; var PARSER_URI = 'fp-ts-routing/Parser'; /** * @category parsers * @since 0.4.0 */ var Parser = /** @class */ (function () { function Parser(run) { this.run = run; } /** * @since 0.4.0 */ Parser.of = function (a) { return new Parser(function (s) { return O.some([a, s]); }); }; /** * @since 0.4.0 */ Parser.prototype.map = function (f) { return this.chain(function (a) { return Parser.of(f(a)); }); // <= derived }; /** * @since 0.4.0 */ Parser.prototype.ap = function (fab) { var _this = this; return fab.chain(function (f) { return _this.map(f); }); // <= derived }; /** * @since 0.4.0 */ Parser.prototype.chain = function (f) { var _this = this; return new Parser(function (r) { return pipe(_this.run(r), O.chain(function (_a) { var a = _a[0], r2 = _a[1]; return f(a).run(r2); })); }); }; /** * @since 0.4.0 */ Parser.prototype.alt = function (that) { var _this = this; return new Parser(function (r) { return pipe(_this.run(r), O.alt(function () { return that.run(r); })); }); }; /** * @since 0.4.0 */ Parser.prototype.then = function (that) { return that.ap(this.map(assign)); }; return Parser; }()); export { Parser }; /** * @category parsers * @since 0.4.0 */ export var zero = function () { return new Parser(function () { return O.none; }); }; /** * @category parsers * @since 0.4.0 */ export var parse = function (parser, r, a) { return pipe(parser.run(r), O.fold(function () { return a; }, function (_a) { var x = _a[0]; return x; })); }; /** * @category parsers * @since 0.5.1 */ export var getParserMonoid = function () { return ({ concat: function (x, y) { return x.alt(y); }, empty: zero() }); }; /** * @category parsers * @since 0.5.1 */ export var parser = { URI: PARSER_URI, map: function (ma, f) { return ma.map(f); }, of: Parser.of, ap: function (mab, ma) { return ma.ap(mab); }, chain: function (ma, f) { return ma.chain(f); }, alt: function (fx, f) { return new Parser(function (r) { return pipe(fx.run(r), O.alt(function () { return f().run(r); })); }); }, zero: zero }; /** * @category parsers * @since 0.5.1 */ export var alt = function (that) { return function (fa) { return parser.alt(fa, that); }; }; /** * @category parsers * @since 0.5.1 */ export var ap = function (fa) { return function (fab) { return parser.ap(fab, fa); }; }; // taken from fp-ts 2.0.1 https://github.com/gcanti/fp-ts/blob/2.0.1/src/pipeable.ts#L1028 /** * @category parsers * @since 0.5.1 */ export var apFirst = function (fb) { return function (fa) { return parser.ap(parser.map(fa, function (a) { return function () { return a; }; }), fb); }; }; // taken from fp-ts 2.0.1 https://github.com/gcanti/fp-ts/blob/2.0.1/src/pipeable.ts#L1031 /** * @category parsers * @since 0.5.1 */ export var apSecond = function (fb) { return function (fa) { return parser.ap(parser.map(fa, function () { return function (b) { return b; }; }), fb); }; }; /** * @category parsers * @since 0.5.1 */ export var chain = function (f) { return function (ma) { return parser.chain(ma, f); }; }; /** * @category parsers * @since 0.5.1 */ export var chainFirst = function (f) { return function (ma) { return parser.chain(ma, function (a) { return parser.map(f(a), function () { return a; }); }); }; }; /** * @category parsers * @since 0.5.1 */ export var flatten = function (mma) { return parser.chain(mma, identity); }; /** * @category parsers * @since 0.5.1 */ export var map = function (f) { return function (fa) { return parser.map(fa, f); }; }; /** * @category parsers * @since 0.6.0 */ export var then = function (fb) { return function (fa) { return fa.then(fb); }; }; // --- Helpers var assign = function (a) { return function (b) { return Object.assign({}, a, b); }; }; //# sourceMappingURL=parser.js.map