rt/emul/mini/src/main/resources/org/apidesign/vm4brwsr/emul/lang/java_lang_Number.js
1 // empty line needed here
3 (function(numberPrototype) {
8 return (((x * (y >> 16)) << 16) + x * (y & 0xFFFF)) | 0;
10 var __m32 = 0xFFFFFFFF;
12 numberPrototype.next32 = function(low) {
16 var l = new Number(low);
21 numberPrototype.high32 = function() {
22 return this.hi ? this.hi : (Math.floor(this / (__m32 + 1))) | 0;
24 numberPrototype.toFP = function() {
25 return this.hi ? this.hi * (__m32 + 1) + this : this;
27 numberPrototype.toLong = function() {
28 var hi = (this / (__m32 + 1)) | 0;
29 var low = (this % (__m32 + 1)) | 0;
38 return hi.next32(low);
41 numberPrototype.toExactString = function() {
43 // check for Long.MIN_VALUE
44 if ((this.hi == (0x80000000 | 0)) && (this == 0)) {
45 return '-9223372036854775808';
48 var a = [6, 9, 2, 7, 6, 9, 4, 9, 2, 4];
51 var neg = this.hi < 0;
60 for (var i = 0; i < a.length; i++) {
62 var low_digit = low % 10;
63 digit = (res % 10) + low_digit;
65 low = Math.floor(low / 10);
66 res = Math.floor(res / 10);
72 s = String(digit).concat(s);
74 s = String(res).concat(s).replace(/^0+/, '');
75 return (neg ? '-' : '').concat(s);
80 function add64(x, y) {
87 var hi = (x.high32() + y.high32() + carry) | 0;
88 return hi.next32(low);
91 function sub64(x, y) {
98 var hi = (x.high32() - y.high32() - carry) | 0;
99 return hi.next32(low);
102 function mul64(x, y) {
103 var low = mul32(x, y);
104 low += (low < 0) ? (__m32 + 1) : 0;
105 // first count upper 32 bits of (x.low * x.low)
109 for (var i = 0; i < 32; i++) {
115 hi_low += (hi_hi & 1) ? 0x8000 : 0;
119 var hi = (hi_hi << 16) + hi_low;
121 var m1 = mul32(x.high32(), y);
122 var m2 = mul32(x, y.high32());
123 hi = add32(add32(hi, m1), m2);
125 return hi.next32(low);
128 function and64(x, y) {
130 low += (low < 0) ? (__m32 + 1) : 0;
132 var hi = x.hi & y.hi;
133 return hi.next32(low);
139 function or64(x, y) {
141 low += (low < 0) ? (__m32 + 1) : 0;
143 var hi = x.hi | y.hi;
144 return hi.next32(low);
149 function xor64(x, y) {
151 low += (low < 0) ? (__m32 + 1) : 0;
153 var hi = x.hi ^ y.hi;
154 return hi.next32(low);
160 function shl64(thiz, x) {
162 if (x == 0) return thiz;
164 var hi = thiz << (x - 32);
167 var hi = thiz.high32() << x;
168 var low_reminder = thiz >> (32 - x);
171 low += (low < 0) ? (__m32 + 1) : 0;
172 return hi.next32(low);
176 function shr64(thiz, x) {
178 if (x == 0) return thiz;
180 var low = thiz.high32() >> (x - 32);
181 low += (low < 0) ? (__m32 + 1) : 0;
184 var low = thiz >>> x;
185 var hi_reminder = thiz.high32() << (32 - x);
187 low += (low < 0) ? (__m32 + 1) : 0;
188 var hi = thiz.high32() >> x;
189 return hi.next32(low);
193 function ushr64(thiz, x) {
195 if (x == 0) return thiz;
197 var low = thiz.high32() >>> (x - 32);
198 low += (low < 0) ? (__m32 + 1) : 0;
201 var low = thiz >>> x;
202 var hi_reminder = thiz.high32() << (32 - x);
204 low += (low < 0) ? (__m32 + 1) : 0;
205 var hi = thiz.high32() >>> x;
206 return hi.next32(low);
210 function compare64(x, y) {
211 if (x.high32() === y.high32()) {
212 return (x < y) ? -1 : ((x > y) ? 1 : 0);
214 return (x.high32() < y.high32()) ? -1 : 1;
220 if ((hi === 0) && (low < 0)) {
225 low += (low < 0) ? (__m32 + 1) : 0;
226 var ret = hi.next32(low);
227 return add64(ret, 1);
230 function __handleDivByZero() {
231 var exception = new vm.java_lang_ArithmeticException;
232 vm.java_lang_ArithmeticException(false).constructor
233 .cons__VLjava_lang_String_2.call(exception, "/ by zero");
238 function __Int64(hi32, lo32) {
239 this.hi32 = hi32 | 0;
240 this.lo32 = lo32 | 0;
242 this.get32 = function(bitIndex) {
246 var selector = bitIndex >>> 5;
264 var shift = bitIndex & 31;
269 return (v1 << (32 - shift)) | (v0 >>> shift);
272 this.get16 = function(bitIndex) {
273 return this.get32(bitIndex) & 0xffff;
276 this.set16 = function(bitIndex, value) {
278 var shift = bitIndex & 15;
279 var svalue = (value & 0xffff) << shift;
280 var smask = 0xffff << shift;
281 var selector = bitIndex >>> 4;
286 this.lo32 = (this.lo32 & ~(smask >>> 16))
290 this.lo32 = (this.lo32 & ~smask) | svalue;
293 this.lo32 = (this.lo32 & ~(smask << 16))
295 this.hi32 = (this.hi32 & ~(smask >>> 16))
299 this.hi32 = (this.hi32 & ~smask) | svalue;
302 this.hi32 = (this.hi32 & ~(smask << 16))
308 this.getDigit = function(index, shift) {
309 return this.get16((index << 4) - shift);
312 this.getTwoDigits = function(index, shift) {
313 return this.get32(((index - 1) << 4) - shift);
316 this.setDigit = function(index, shift, value) {
317 this.set16((index << 4) - shift, value);
320 this.countSignificantDigits = function() {
324 if (this.hi32 === 0) {
325 if (this.lo32 === 0) {
330 remaining = this.lo32;
333 remaining = this.hi32;
340 return (remaining < 65536) ? sd - 1 : sd;
343 this.toNumber = function() {
344 var lo32 = this.lo32;
349 return this.hi32.next32(lo32);
353 function __countLeadingZeroes16(number) {
366 if (number < 16384) {
371 return (number < 32768) ? nlz + 1 : nlz;
374 // q = u / v; r = u - q * v;
376 function __div64(q, r, u, v) {
377 var m = u.countSignificantDigits();
378 var n = v.countSignificantDigits();
383 // v has single digit
384 var vd = v.getDigit(0, 0);
386 for (var i = m - 1; i >= 0; --i) {
387 var ui = (carry << 16) | u.getDigit(i, 0);
391 var qi = (ui / vd) | 0;
392 q.setDigit(i, 0, qi);
393 carry = ui - qi * vd;
409 var nrm = __countLeadingZeroes16(v.getDigit(n - 1, 0));
411 var vd1 = v.getDigit(n - 1, nrm);
412 var vd0 = v.getDigit(n - 2, nrm);
413 for (var j = m - n; j >= 0; --j) {
414 // Calculate qj estimate
415 var ud21 = r.getTwoDigits(j + n, nrm);
416 var ud2 = ud21 >>> 16;
421 var qest = (ud2 === vd1) ? 0xFFFF : ((ud21 / vd1) | 0);
422 var rest = ud21 - qest * vd1;
424 // 0 <= (qest - qj) <= 2
426 // Refine qj estimate
427 var ud0 = r.getDigit(j + n - 2, nrm);
428 while ((qest * vd0) > ((rest * 0x10000) + ud0)) {
433 // 0 <= (qest - qj) <= 1
435 // Multiply and subtract
437 for (var i = 0; i < n; ++i) {
438 var vi = qest * v.getDigit(i, nrm);
439 var ui = r.getDigit(i + j, nrm) - carry - (vi & 0xffff);
440 r.setDigit(i + j, nrm, ui);
441 carry = (vi >>> 16) - (ui >> 16);
443 var uj = ud2 - carry;
451 for (var i = 0; i < n; ++i) {
452 var ui = r.getDigit(i + j, nrm) + v.getDigit(i, nrm)
454 r.setDigit(i + j, nrm, ui);
460 q.setDigit(j, 0, qest);
461 r.setDigit(j + n, nrm, uj);
465 function div64(x, y) {
466 var negateResult = false;
469 if ((x.high32() & 0x80000000) !== 0) {
471 negateResult = !negateResult;
476 if ((y.high32() & 0x80000000) !== 0) {
478 negateResult = !negateResult;
483 if ((v === 0) && (v.high32() === 0)) {
487 if (u.high32() === 0) {
488 if (v.high32() === 0) {
489 var result = (u / v) | 0;
490 return negateResult ? neg64(result) : result;
496 var u64 = new __Int64(u.high32(), u);
497 var v64 = new __Int64(v.high32(), v);
498 var q64 = new __Int64(0, 0);
499 var r64 = new __Int64(0, 0);
501 __div64(q64, r64, u64, v64);
503 var result = q64.toNumber();
504 return negateResult ? neg64(result) : result;
507 function mod64(x, y) {
508 var negateResult = false;
511 if ((x.high32() & 0x80000000) !== 0) {
513 negateResult = !negateResult;
518 if ((y.high32() & 0x80000000) !== 0) {
524 if ((v === 0) && (v.high32() === 0)) {
528 if (u.high32() === 0) {
529 var result = (v.high32() === 0) ? (u % v) : u;
530 return negateResult ? neg64(result) : result;
533 var u64 = new __Int64(u.high32(), u);
534 var v64 = new __Int64(v.high32(), v);
535 var q64 = new __Int64(0, 0);
536 var r64 = new __Int64(0, 0);
538 __div64(q64, r64, u64, v64);
540 var result = r64.toNumber();
541 return negateResult ? neg64(result) : result;
544 var b = numberPrototype['__bit64'] = {};
557 b.compare64 = compare64;
558 })(Number.prototype);
560 vm.java_lang_Number(false);