main
Last change
on this file since d24f17c was d24f17c, checked in by Aleksandar Panovski <apano77@…>, 15 months ago |
Initial commit
|
-
Property mode
set to
100644
|
File size:
516 bytes
|
Rev | Line | |
---|
[d24f17c] | 1 | import _xfBase from "./_xfBase.js";
|
---|
| 2 |
|
---|
| 3 | var XTap =
|
---|
| 4 | /*#__PURE__*/
|
---|
| 5 | function () {
|
---|
| 6 | function XTap(f, xf) {
|
---|
| 7 | this.xf = xf;
|
---|
| 8 | this.f = f;
|
---|
| 9 | }
|
---|
| 10 |
|
---|
| 11 | XTap.prototype['@@transducer/init'] = _xfBase.init;
|
---|
| 12 | XTap.prototype['@@transducer/result'] = _xfBase.result;
|
---|
| 13 |
|
---|
| 14 | XTap.prototype['@@transducer/step'] = function (result, input) {
|
---|
| 15 | this.f(input);
|
---|
| 16 | return this.xf['@@transducer/step'](result, input);
|
---|
| 17 | };
|
---|
| 18 |
|
---|
| 19 | return XTap;
|
---|
| 20 | }();
|
---|
| 21 |
|
---|
| 22 | export default function _xtap(f) {
|
---|
| 23 | return function (xf) {
|
---|
| 24 | return new XTap(f, xf);
|
---|
| 25 | };
|
---|
| 26 | } |
---|
Note:
See
TracBrowser
for help on using the repository browser.