bs-ajv
Version:
BucklesScript bindings to Ajv (Another JSON Validator)
121 lines (105 loc) • 2.57 kB
JavaScript
;
define(["exports", "./curry.js"],
function(exports, Curry){
'use strict';
function forEachU(s, f, action) {
for(var i = s; i <= f; ++i){
action(i);
}
return /* () */0;
}
function forEach(s, f, action) {
return forEachU(s, f, Curry.__1(action));
}
function everyU(_s, f, p) {
while(true) {
var s = _s;
if (s > f) {
return /* true */1;
} else if (p(s)) {
_s = s + 1 | 0;
continue ;
} else {
return /* false */0;
}
};
}
function every(s, f, p) {
return everyU(s, f, Curry.__1(p));
}
function everyByU(s, f, step, p) {
if (step > 0) {
var _s = s;
var f$1 = f;
var step$1 = step;
var p$1 = p;
while(true) {
var s$1 = _s;
if (s$1 > f$1) {
return /* true */1;
} else if (p$1(s$1)) {
_s = s$1 + step$1 | 0;
continue ;
} else {
return /* false */0;
}
};
} else {
return /* true */1;
}
}
function everyBy(s, f, step, p) {
return everyByU(s, f, step, Curry.__1(p));
}
function someU(_s, f, p) {
while(true) {
var s = _s;
if (s > f) {
return /* false */0;
} else if (p(s)) {
return /* true */1;
} else {
_s = s + 1 | 0;
continue ;
}
};
}
function some(s, f, p) {
return someU(s, f, Curry.__1(p));
}
function someByU(s, f, step, p) {
if (step > 0) {
var _s = s;
var f$1 = f;
var step$1 = step;
var p$1 = p;
while(true) {
var s$1 = _s;
if (s$1 > f$1) {
return /* false */0;
} else if (p$1(s$1)) {
return /* true */1;
} else {
_s = s$1 + step$1 | 0;
continue ;
}
};
} else {
return /* false */0;
}
}
function someBy(s, f, step, p) {
return someByU(s, f, step, Curry.__1(p));
}
exports.forEachU = forEachU;
exports.forEach = forEach;
exports.everyU = everyU;
exports.every = every;
exports.everyByU = everyByU;
exports.everyBy = everyBy;
exports.someU = someU;
exports.some = some;
exports.someByU = someByU;
exports.someBy = someBy;
})
/* No side effect */