123 lines
2.1 KiB
JavaScript
123 lines
2.1 KiB
JavaScript
|
|
|
|
|
|
function set(s, i, ch) {
|
|
if (i < 0 || i >= s.length) {
|
|
throw {
|
|
RE_EXN_ID: "Invalid_argument",
|
|
_1: "index out of bounds",
|
|
Error: new Error()
|
|
};
|
|
}
|
|
s[i] = ch;
|
|
}
|
|
|
|
function get(s, i) {
|
|
if (i < 0 || i >= s.length) {
|
|
throw {
|
|
RE_EXN_ID: "Invalid_argument",
|
|
_1: "index out of bounds",
|
|
Error: new Error()
|
|
};
|
|
}
|
|
return s[i];
|
|
}
|
|
|
|
function create(len) {
|
|
if (len < 0) {
|
|
throw {
|
|
RE_EXN_ID: "Invalid_argument",
|
|
_1: "String.create",
|
|
Error: new Error()
|
|
};
|
|
}
|
|
var result = new Array(len);
|
|
for(var i = 0; i < len; ++i){
|
|
result[i] = /* '\000' */0;
|
|
}
|
|
return result;
|
|
}
|
|
|
|
function bytes_compare_aux(s1, s2, _off, len, def) {
|
|
while(true) {
|
|
var off = _off;
|
|
if (off >= len) {
|
|
return def;
|
|
}
|
|
var a = s1[off];
|
|
var b = s2[off];
|
|
if (a > b) {
|
|
return 1;
|
|
}
|
|
if (a < b) {
|
|
return -1;
|
|
}
|
|
_off = off + 1 | 0;
|
|
continue ;
|
|
};
|
|
}
|
|
|
|
function bytes_compare(s1, s2) {
|
|
var len1 = s1.length;
|
|
var len2 = s2.length;
|
|
if (len1 === len2) {
|
|
return bytes_compare_aux(s1, s2, 0, len1, 0);
|
|
} else if (len1 < len2) {
|
|
return bytes_compare_aux(s1, s2, 0, len1, -1);
|
|
} else {
|
|
return bytes_compare_aux(s1, s2, 0, len2, 1);
|
|
}
|
|
}
|
|
|
|
function bytes_equal(s1, s2) {
|
|
var len1 = s1.length;
|
|
var len2 = s2.length;
|
|
if (len1 === len2) {
|
|
var _off = 0;
|
|
while(true) {
|
|
var off = _off;
|
|
if (off === len1) {
|
|
return true;
|
|
}
|
|
var a = s1[off];
|
|
var b = s2[off];
|
|
if (a !== b) {
|
|
return false;
|
|
}
|
|
_off = off + 1 | 0;
|
|
continue ;
|
|
};
|
|
} else {
|
|
return false;
|
|
}
|
|
}
|
|
|
|
function bytes_greaterthan(s1, s2) {
|
|
return bytes_compare(s1, s2) > 0;
|
|
}
|
|
|
|
function bytes_greaterequal(s1, s2) {
|
|
return bytes_compare(s1, s2) >= 0;
|
|
}
|
|
|
|
function bytes_lessthan(s1, s2) {
|
|
return bytes_compare(s1, s2) < 0;
|
|
}
|
|
|
|
function bytes_lessequal(s1, s2) {
|
|
return bytes_compare(s1, s2) <= 0;
|
|
}
|
|
|
|
export {
|
|
create ,
|
|
get ,
|
|
set ,
|
|
bytes_compare ,
|
|
bytes_greaterthan ,
|
|
bytes_greaterequal ,
|
|
bytes_lessthan ,
|
|
bytes_lessequal ,
|
|
bytes_equal ,
|
|
}
|
|
/* No side effect */
|