| line |
true |
false |
branch |
|
24
|
0 |
0 |
return SvIV(get_sv("Math::Float128::NOK_POK", 0)); |
|
61
|
1 |
2 |
if(x < 1)croak("1st arg (precision) to flt128_set_prec must be at least 1"); |
|
70
|
9 |
11 |
if(x != x) return 1; |
|
75
|
0 |
6 |
if(x != x) return 0; /* NaN */ |
|
76
|
0 |
6 |
if(x == 0.0Q) return 0; /* Zero */ |
|
77
|
6 |
0 |
if(x/x != x/x) { |
|
78
|
3 |
3 |
if(x < 0.0Q) return -1; |
|
110
|
3 |
13 |
if(x != 0.0Q) return 0; |
|
115
|
6 |
7 |
if(((unsigned char*)p)[n - 1] >= 128) return -1; |
|
123
|
8 |
35 |
if(sign < 0) ret *= -1.0Q; |
|
137
|
0 |
14 |
if(f == NULL) croak("Failed to allocate memory in InfF128 function"); |
|
154
|
0 |
29 |
if(f == NULL) croak("Failed to allocate memory in NaNF128 function"); |
|
171
|
0 |
23 |
if(f == NULL) croak("Failed to allocate memory in ZeroF128 function"); |
|
177
|
17 |
6 |
if(sign < 0) *f *= -1; |
|
189
|
0 |
39 |
if(f == NULL) croak("Failed to allocate memory in UnityF128 function"); |
|
195
|
9 |
30 |
if(sign < 0) *f *= -1; |
|
203
|
10 |
0 |
if(sv_isobject(b)) { |
|
204
|
10 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
10 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
10 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
10 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
10 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
205
|
10 |
0 |
if(strEQ(h, "Math::Float128")) |
|
212
|
6 |
0 |
if(sv_isobject(b)) { |
|
213
|
6 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
6 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
6 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
6 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
6 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
214
|
6 |
0 |
if(strEQ(h, "Math::Float128")) |
|
221
|
16 |
0 |
if(sv_isobject(b)) { |
|
222
|
16 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
16 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
16 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
16 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
16 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
223
|
16 |
0 |
if(strEQ(h, "Math::Float128")) |
|
233
|
281 |
8 |
if(p[i] == 0) break; |
|
234
|
7 |
1 |
if(p[i] != ' ' && p[i] != '\t' && p[i] != '\n' && p[i] != '\r' && p[i] != '\f') { |
|
|
7 |
0 |
if(p[i] != ' ' && p[i] != '\t' && p[i] != '\n' && p[i] != '\r' && p[i] != '\f') { |
|
|
7 |
0 |
if(p[i] != ' ' && p[i] != '\t' && p[i] != '\n' && p[i] != '\r' && p[i] != '\f') { |
|
|
7 |
0 |
if(p[i] != ' ' && p[i] != '\t' && p[i] != '\n' && p[i] != '\r' && p[i] != '\f') { |
|
|
7 |
0 |
if(p[i] != ' ' && p[i] != '\t' && p[i] != '\n' && p[i] != '\r' && p[i] != '\f') { |
|
248
|
0 |
157 |
if(f == NULL) croak("Failed to allocate memory in STRtoF128 function"); |
|
261
|
115 |
42 |
*f = strtoflt128(SvPV_nolen(str), &p); |
|
264
|
157 |
0 |
if(!inf_or_nan) _nnum_inc(p); |
|
283
|
1 |
0 |
*f = strtoflt128(SvPV_nolen(str), &p); |
|
286
|
1 |
0 |
if(!inf_or_nan) _nnum_inc(p); |
|
295
|
0 |
215 |
if(f == NULL) croak("Failed to allocate memory in NVtoF128 function"); |
|
300
|
198 |
17 |
*f = (float128)SvNV(nv); |
|
308
|
1 |
0 |
*f = (float128)SvNV(nv); |
|
316
|
0 |
157 |
if(f == NULL) croak("Failed to allocate memory in IVtoF128 function"); |
|
321
|
157 |
0 |
*f = (float128)SvIV(iv); |
|
329
|
1 |
0 |
*f = (float128)SvIV(iv); |
|
337
|
0 |
37 |
if(f == NULL) croak("Failed to allocate memory in UVtoF128 function"); |
|
342
|
28 |
9 |
*f = (float128)SvUV(uv); |
|
350
|
1 |
0 |
*f = (float128)SvUV(uv); |
|
358
|
3 |
0 |
if(sv_isobject(f)) { |
|
359
|
3 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(f))); |
|
|
3 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(f))); |
|
|
0 |
3 |
const char *h = HvNAME(SvSTASH(SvRV(f))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(f))); |
|
|
3 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(f))); |
|
|
0 |
3 |
const char *h = HvNAME(SvSTASH(SvRV(f))); |
|
360
|
3 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
361
|
0 |
3 |
EXTEND(SP, 1); |
|
365
|
0 |
3 |
if(buffer == NULL) croak("Failed to allocate memory in F128toSTR"); |
|
381
|
1 |
1 |
if(decimal_prec < 1)croak("2nd arg (precision) to F128toSTRP must be at least 1"); |
|
383
|
1 |
0 |
if(sv_isobject(f)) { |
|
384
|
1 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(f))); |
|
|
1 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(f))); |
|
|
0 |
1 |
const char *h = HvNAME(SvSTASH(SvRV(f))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(f))); |
|
|
1 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(f))); |
|
|
0 |
1 |
const char *h = HvNAME(SvSTASH(SvRV(f))); |
|
385
|
1 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
386
|
0 |
1 |
EXTEND(SP, 1); |
|
390
|
0 |
1 |
if(buffer == NULL) croak("Failed to allocate memory in F128toSTRP"); |
|
435
|
0 |
81 |
if(ld == NULL) croak("Failed to allocate memory in _overload_add function"); |
|
443
|
1 |
80 |
if(SvUOK(b)) { |
|
448
|
5 |
75 |
if(SvIOK(b)) { |
|
453
|
5 |
70 |
if(SvPOK(b)) { |
|
459
|
1 |
4 |
NOK_POK_DUALVAR_CHECK , "overload_add");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_add");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_add");} |
|
471
|
5 |
0 |
*ld = *(INT2PTR(float128 *, SvIVX(SvRV(a)))) + strtoflt128(SvPV_nolen(b), &p); |
|
477
|
39 |
31 |
if(SvNOK(b)) { |
|
488
|
31 |
0 |
if(sv_isobject(b)) { |
|
489
|
31 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
31 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
31 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
31 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
31 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
490
|
31 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
506
|
0 |
16 |
if(ld == NULL) croak("Failed to allocate memory in _overload_mul function"); |
|
514
|
1 |
15 |
if(SvUOK(b)) { |
|
519
|
3 |
12 |
if(SvIOK(b)) { |
|
524
|
5 |
7 |
if(SvPOK(b)) { |
|
530
|
1 |
4 |
NOK_POK_DUALVAR_CHECK , "overload_mul");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_mul");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_mul");} |
|
542
|
5 |
0 |
*ld = *(INT2PTR(float128 *, SvIVX(SvRV(a)))) * strtoflt128(SvPV_nolen(b), &p); |
|
548
|
4 |
3 |
if(SvNOK(b)) { |
|
559
|
3 |
0 |
if(sv_isobject(b)) { |
|
560
|
3 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
3 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
3 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
3 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
3 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
561
|
3 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
575
|
0 |
145 |
if(ld == NULL) croak("Failed to allocate memory in _overload_sub function"); |
|
583
|
2 |
143 |
if(SvUOK(b)) { |
|
584
|
0 |
2 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
2 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
2 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
2 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
1 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
1 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
589
|
23 |
120 |
if(SvIOK(b)) { |
|
590
|
0 |
23 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
23 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
23 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
23 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
13 |
10 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
13 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
13 |
10 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
595
|
9 |
111 |
if(SvPOK(b)) { |
|
601
|
1 |
8 |
NOK_POK_DUALVAR_CHECK , "overload_sub");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_sub");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_sub");} |
|
617
|
0 |
9 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
9 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
9 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
9 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
8 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
8 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
618
|
8 |
0 |
else *ld = *(INT2PTR(float128 *, SvIVX(SvRV(a)))) - strtoflt128(SvPV_nolen(b), &p); |
|
624
|
32 |
79 |
if(SvNOK(b)) { |
|
632
|
0 |
32 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
32 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
32 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
32 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
31 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
31 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
637
|
79 |
0 |
if(sv_isobject(b)) { |
|
638
|
79 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
79 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
79 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
79 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
79 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
639
|
79 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
664
|
0 |
21 |
if(ld == NULL) croak("Failed to allocate memory in _overload_div function"); |
|
672
|
2 |
19 |
if(SvUOK(b)) { |
|
673
|
0 |
2 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
2 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
2 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
2 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
1 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
1 |
if(SWITCH_ARGS) *ld = (float128)SvUVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
678
|
4 |
15 |
if(SvIOK(b)) { |
|
679
|
0 |
4 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
4 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
4 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
4 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
2 |
2 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
2 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
2 |
2 |
if(SWITCH_ARGS) *ld = (float128)SvIVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
684
|
6 |
9 |
if(SvPOK(b)) { |
|
690
|
1 |
5 |
NOK_POK_DUALVAR_CHECK , "overload_div");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_div");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_div");} |
|
706
|
0 |
6 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
6 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
6 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
6 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
5 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
5 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
0 |
if(SWITCH_ARGS) *ld = strtoflt128(SvPV_nolen(b), &p) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
707
|
5 |
0 |
else *ld = *(INT2PTR(float128 *, SvIVX(SvRV(a)))) / strtoflt128(SvPV_nolen(b), &p); |
|
713
|
6 |
3 |
if(SvNOK(b)) { |
|
721
|
0 |
6 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
6 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
6 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
6 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
5 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
0 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
|
1 |
5 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
726
|
3 |
0 |
if(sv_isobject(b)) { |
|
727
|
3 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
3 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
3 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
3 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
3 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
728
|
3 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
739
|
10 |
190 |
if(SvUOK(b)) { |
|
740
|
10 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == (float128)SvUVX(b)) return newSViv(1); |
|
744
|
51 |
139 |
if(SvIOK(b)) { |
|
745
|
51 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == (float128)SvIVX(b)) return newSViv(1); |
|
749
|
19 |
120 |
if(SvPOK(b)) { |
|
755
|
1 |
18 |
NOK_POK_DUALVAR_CHECK , "overload_equiv");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_equiv");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_equiv");} |
|
774
|
19 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == strtoflt128(SvPV_nolen(b), &p)) { |
|
|
15 |
4 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == strtoflt128(SvPV_nolen(b), &p)) { |
|
783
|
21 |
99 |
if(SvNOK(b)) { |
|
791
|
15 |
6 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == (float128)SvNVX(b)) return newSViv(1); |
|
795
|
99 |
0 |
if(sv_isobject(b)) { |
|
796
|
99 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
99 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
99 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
99 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
99 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
797
|
99 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
798
|
99 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(1); |
|
808
|
2 |
24 |
if(SvUOK(b)) { |
|
809
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) != (float128)SvUVX(b)) return newSViv(1); |
|
813
|
2 |
22 |
if(SvIOK(b)) { |
|
814
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) != (float128)SvIVX(b)) return newSViv(1); |
|
818
|
7 |
15 |
if(SvPOK(b)) { |
|
824
|
1 |
6 |
NOK_POK_DUALVAR_CHECK , "overload_not_equiv");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_not_equiv");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_not_equiv");} |
|
844
|
7 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) != strtoflt128(SvPV_nolen(b), &p)) { |
|
|
6 |
1 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) != strtoflt128(SvPV_nolen(b), &p)) { |
|
853
|
9 |
6 |
if(SvNOK(b)) { |
|
861
|
9 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) != (float128)SvNVX(b)) return newSViv(1); |
|
865
|
6 |
0 |
if(sv_isobject(b)) { |
|
866
|
6 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
6 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
6 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
6 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
6 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
867
|
6 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
868
|
0 |
6 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(0); |
|
878
|
1 |
3 |
if(_is_nan(*(INT2PTR(float128 *, SvIVX(SvRV(a)))))) return newSViv(0); |
|
879
|
2 |
1 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) != 0.0Q) return newSViv(1); |
|
884
|
1 |
5 |
if(_is_nan(*(INT2PTR(float128 *, SvIVX(SvRV(a)))))) return newSViv(1); |
|
885
|
2 |
3 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) != 0.0L) return newSViv(0); |
|
893
|
1 |
15 |
if(SvUOK(b)) { |
|
898
|
1 |
14 |
if(SvIOK(b)) { |
|
903
|
5 |
9 |
if(SvPOK(b)) { |
|
909
|
1 |
4 |
NOK_POK_DUALVAR_CHECK , "overload_add_eq");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_add_eq");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_add_eq");} |
|
928
|
5 |
0 |
*(INT2PTR(float128 *, SvIVX(SvRV(a)))) += strtoflt128(SvPV_nolen(b), &p); |
|
934
|
4 |
5 |
if(SvNOK(b)) { |
|
945
|
5 |
0 |
if(sv_isobject(b)) { |
|
946
|
5 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
5 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
5 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
5 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
5 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
947
|
5 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
962
|
1 |
14 |
if(SvUOK(b)) { |
|
967
|
1 |
13 |
if(SvIOK(b)) { |
|
972
|
6 |
7 |
if(SvPOK(b)) { |
|
978
|
1 |
5 |
NOK_POK_DUALVAR_CHECK , "overload_mul_eq");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_mul_eq");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_mul_eq");} |
|
997
|
6 |
0 |
*(INT2PTR(float128 *, SvIVX(SvRV(a)))) *= strtoflt128(SvPV_nolen(b), &p); |
|
1003
|
4 |
3 |
if(SvNOK(b)) { |
|
1014
|
3 |
0 |
if(sv_isobject(b)) { |
|
1015
|
3 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
3 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
3 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
3 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
3 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
1016
|
3 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
1031
|
1 |
12 |
if(SvUOK(b)) { |
|
1036
|
1 |
11 |
if(SvIOK(b)) { |
|
1041
|
5 |
6 |
if(SvPOK(b)) { |
|
1047
|
1 |
4 |
NOK_POK_DUALVAR_CHECK , "overload_sub_eq");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_sub_eq");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_sub_eq");} |
|
1066
|
5 |
0 |
*(INT2PTR(float128 *, SvIVX(SvRV(a)))) -= strtoflt128(SvPV_nolen(b), &p); |
|
1073
|
4 |
2 |
if(SvNOK(b)) { |
|
1084
|
2 |
0 |
if(sv_isobject(b)) { |
|
1085
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
2 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
2 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
1086
|
2 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
1101
|
1 |
12 |
if(SvUOK(b)) { |
|
1106
|
1 |
11 |
if(SvIOK(b)) { |
|
1111
|
5 |
6 |
if(SvPOK(b)) { |
|
1117
|
1 |
4 |
NOK_POK_DUALVAR_CHECK , "overload_div_eq");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_div_eq");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_div_eq");} |
|
1136
|
5 |
0 |
*(INT2PTR(float128 *, SvIVX(SvRV(a)))) /= strtoflt128(SvPV_nolen(b), &p); |
|
1142
|
4 |
2 |
if(SvNOK(b)) { |
|
1153
|
2 |
0 |
if(sv_isobject(b)) { |
|
1154
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
2 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
2 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
1155
|
2 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
1168
|
2 |
44 |
if(SvUOK(b)) { |
|
1169
|
0 |
2 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
1 |
1 |
if(SWITCH_ARGS) { |
|
|
1 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
1 |
1 |
if(SWITCH_ARGS) { |
|
1170
|
1 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvUVX(b)) return newSViv(1); |
|
1173
|
1 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvUVX(b)) return newSViv(1); |
|
1177
|
8 |
36 |
if(SvIOK(b)) { |
|
1178
|
0 |
8 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
8 |
0 |
if(SWITCH_ARGS) { |
|
|
8 |
0 |
if(SWITCH_ARGS) { |
|
|
8 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
6 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
6 |
if(SWITCH_ARGS) { |
|
1179
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvIVX(b)) return newSViv(1); |
|
1182
|
6 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvIVX(b)) return newSViv(1); |
|
1186
|
11 |
25 |
if(SvPOK(b)) { |
|
1192
|
1 |
10 |
NOK_POK_DUALVAR_CHECK , "overload_lt");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_lt");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_lt");} |
|
1221
|
0 |
11 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
11 |
0 |
if(SWITCH_ARGS) { |
|
|
11 |
0 |
if(SWITCH_ARGS) { |
|
|
11 |
0 |
if(SWITCH_ARGS) { |
|
|
1 |
10 |
if(SWITCH_ARGS) { |
|
|
1 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
1 |
10 |
if(SWITCH_ARGS) { |
|
1222
|
1 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > strtoflt128(SvPV_nolen(b), &p)) { |
|
|
1 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > strtoflt128(SvPV_nolen(b), &p)) { |
|
1230
|
10 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < strtoflt128(SvPV_nolen(b), &p)) { |
|
|
8 |
2 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < strtoflt128(SvPV_nolen(b), &p)) { |
|
1239
|
21 |
4 |
if(SvNOK(b)) { |
|
1252
|
0 |
21 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
21 |
0 |
if(SWITCH_ARGS) { |
|
|
21 |
0 |
if(SWITCH_ARGS) { |
|
|
21 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
19 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
19 |
if(SWITCH_ARGS) { |
|
1253
|
1 |
1 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvNVX(b)) return newSViv(1); |
|
1256
|
15 |
4 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvNVX(b)) return newSViv(1); |
|
1260
|
4 |
0 |
if(sv_isobject(b)) { |
|
1261
|
4 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
4 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
4 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
4 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
4 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
1262
|
4 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
1263
|
4 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(1); |
|
1273
|
2 |
79 |
if(SvUOK(b)) { |
|
1274
|
0 |
2 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
1 |
1 |
if(SWITCH_ARGS) { |
|
|
1 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
1 |
1 |
if(SWITCH_ARGS) { |
|
1275
|
1 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvUVX(b)) return newSViv(1); |
|
1278
|
1 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvUVX(b)) return newSViv(1); |
|
1282
|
12 |
67 |
if(SvIOK(b)) { |
|
1283
|
0 |
12 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
12 |
0 |
if(SWITCH_ARGS) { |
|
|
12 |
0 |
if(SWITCH_ARGS) { |
|
|
12 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
10 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
10 |
if(SWITCH_ARGS) { |
|
1284
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvIVX(b)) return newSViv(1); |
|
1287
|
10 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvIVX(b)) return newSViv(1); |
|
1291
|
11 |
56 |
if(SvPOK(b)) { |
|
1297
|
1 |
10 |
NOK_POK_DUALVAR_CHECK , "overload_gt");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_gt");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_gt");} |
|
1325
|
0 |
11 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
11 |
0 |
if(SWITCH_ARGS) { |
|
|
11 |
0 |
if(SWITCH_ARGS) { |
|
|
11 |
0 |
if(SWITCH_ARGS) { |
|
|
1 |
10 |
if(SWITCH_ARGS) { |
|
|
1 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
1 |
10 |
if(SWITCH_ARGS) { |
|
1326
|
1 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < strtoflt128(SvPV_nolen(b), &p)) { |
|
|
1 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < strtoflt128(SvPV_nolen(b), &p)) { |
|
1334
|
10 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > strtoflt128(SvPV_nolen(b), &p)) { |
|
|
6 |
4 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > strtoflt128(SvPV_nolen(b), &p)) { |
|
1343
|
16 |
40 |
if(SvNOK(b)) { |
|
1356
|
0 |
16 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
16 |
0 |
if(SWITCH_ARGS) { |
|
|
16 |
0 |
if(SWITCH_ARGS) { |
|
|
16 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
14 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
14 |
if(SWITCH_ARGS) { |
|
1357
|
1 |
1 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvNVX(b)) return newSViv(1); |
|
1360
|
11 |
3 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvNVX(b)) return newSViv(1); |
|
1364
|
40 |
0 |
if(sv_isobject(b)) { |
|
1365
|
40 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
40 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
40 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
40 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
40 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
1366
|
40 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
1367
|
4 |
36 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(1); |
|
1377
|
4 |
36 |
if(SvUOK(b)) { |
|
1378
|
0 |
4 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
4 |
0 |
if(SWITCH_ARGS) { |
|
|
4 |
0 |
if(SWITCH_ARGS) { |
|
|
4 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
2 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
2 |
if(SWITCH_ARGS) { |
|
1379
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= (float128)SvUVX(b)) return newSViv(1); |
|
1382
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= (float128)SvUVX(b)) return newSViv(1); |
|
1386
|
6 |
30 |
if(SvIOK(b)) { |
|
1387
|
0 |
6 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
6 |
0 |
if(SWITCH_ARGS) { |
|
|
6 |
0 |
if(SWITCH_ARGS) { |
|
|
6 |
0 |
if(SWITCH_ARGS) { |
|
|
3 |
3 |
if(SWITCH_ARGS) { |
|
|
3 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
3 |
3 |
if(SWITCH_ARGS) { |
|
1388
|
3 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= (float128)SvIVX(b)) return newSViv(1); |
|
1391
|
3 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= (float128)SvIVX(b)) return newSViv(1); |
|
1395
|
9 |
21 |
if(SvPOK(b)) { |
|
1401
|
1 |
8 |
NOK_POK_DUALVAR_CHECK , "overload_lte");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_lte");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_lte");} |
|
1429
|
0 |
9 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
9 |
0 |
if(SWITCH_ARGS) { |
|
|
9 |
0 |
if(SWITCH_ARGS) { |
|
|
9 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
7 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
7 |
if(SWITCH_ARGS) { |
|
1430
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= strtoflt128(SvPV_nolen(b), &p)) { |
|
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= strtoflt128(SvPV_nolen(b), &p)) { |
|
1437
|
7 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= strtoflt128(SvPV_nolen(b), &p)) { |
|
|
5 |
2 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= strtoflt128(SvPV_nolen(b), &p)) { |
|
1446
|
12 |
9 |
if(SvNOK(b)) { |
|
1459
|
0 |
12 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
12 |
0 |
if(SWITCH_ARGS) { |
|
|
12 |
0 |
if(SWITCH_ARGS) { |
|
|
12 |
0 |
if(SWITCH_ARGS) { |
|
|
3 |
9 |
if(SWITCH_ARGS) { |
|
|
3 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
3 |
9 |
if(SWITCH_ARGS) { |
|
1460
|
2 |
1 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= (float128)SvNVX(b)) return newSViv(1); |
|
1463
|
5 |
4 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= (float128)SvNVX(b)) return newSViv(1); |
|
1467
|
9 |
0 |
if(sv_isobject(b)) { |
|
1468
|
9 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
9 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
9 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
9 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
9 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
1469
|
9 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
1470
|
9 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(1); |
|
1480
|
4 |
33 |
if(SvUOK(b)) { |
|
1481
|
0 |
4 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
4 |
0 |
if(SWITCH_ARGS) { |
|
|
4 |
0 |
if(SWITCH_ARGS) { |
|
|
4 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
2 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
2 |
if(SWITCH_ARGS) { |
|
1482
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= (float128)SvUVX(b)) return newSViv(1); |
|
1485
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= (float128)SvUVX(b)) return newSViv(1); |
|
1489
|
6 |
27 |
if(SvIOK(b)) { |
|
1490
|
0 |
6 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
6 |
0 |
if(SWITCH_ARGS) { |
|
|
6 |
0 |
if(SWITCH_ARGS) { |
|
|
6 |
0 |
if(SWITCH_ARGS) { |
|
|
3 |
3 |
if(SWITCH_ARGS) { |
|
|
3 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
3 |
3 |
if(SWITCH_ARGS) { |
|
1491
|
3 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= (float128)SvIVX(b)) return newSViv(1); |
|
1494
|
3 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= (float128)SvIVX(b)) return newSViv(1); |
|
1498
|
9 |
18 |
if(SvPOK(b)) { |
|
1504
|
1 |
8 |
NOK_POK_DUALVAR_CHECK , "overload_gte");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_gte");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_gte");} |
|
1533
|
0 |
9 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
9 |
0 |
if(SWITCH_ARGS) { |
|
|
9 |
0 |
if(SWITCH_ARGS) { |
|
|
9 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
7 |
if(SWITCH_ARGS) { |
|
|
2 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
2 |
7 |
if(SWITCH_ARGS) { |
|
1534
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= strtoflt128(SvPV_nolen(b), &p)) { |
|
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= strtoflt128(SvPV_nolen(b), &p)) { |
|
1542
|
7 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= strtoflt128(SvPV_nolen(b), &p)) { |
|
|
3 |
4 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= strtoflt128(SvPV_nolen(b), &p)) { |
|
1552
|
12 |
6 |
if(SvNOK(b)) { |
|
1565
|
0 |
12 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
12 |
0 |
if(SWITCH_ARGS) { |
|
|
12 |
0 |
if(SWITCH_ARGS) { |
|
|
12 |
0 |
if(SWITCH_ARGS) { |
|
|
3 |
9 |
if(SWITCH_ARGS) { |
|
|
3 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
0 |
0 |
if(SWITCH_ARGS) { |
|
|
3 |
9 |
if(SWITCH_ARGS) { |
|
1566
|
2 |
1 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= (float128)SvNVX(b)) return newSViv(1); |
|
1569
|
6 |
3 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= (float128)SvNVX(b)) return newSViv(1); |
|
1573
|
6 |
0 |
if(sv_isobject(b)) { |
|
1574
|
6 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
6 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
6 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
6 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
6 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
1575
|
6 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
1576
|
6 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(1); |
|
1586
|
0 |
65 |
if(SWITCH_ARGS) reversal = -1; |
|
|
0 |
0 |
if(SWITCH_ARGS) reversal = -1; |
|
|
0 |
0 |
if(SWITCH_ARGS) reversal = -1; |
|
|
65 |
0 |
if(SWITCH_ARGS) reversal = -1; |
|
|
65 |
0 |
if(SWITCH_ARGS) reversal = -1; |
|
|
65 |
0 |
if(SWITCH_ARGS) reversal = -1; |
|
|
22 |
43 |
if(SWITCH_ARGS) reversal = -1; |
|
|
22 |
0 |
if(SWITCH_ARGS) reversal = -1; |
|
|
0 |
0 |
if(SWITCH_ARGS) reversal = -1; |
|
|
0 |
0 |
if(SWITCH_ARGS) reversal = -1; |
|
|
0 |
0 |
if(SWITCH_ARGS) reversal = -1; |
|
|
0 |
0 |
if(SWITCH_ARGS) reversal = -1; |
|
|
0 |
0 |
if(SWITCH_ARGS) reversal = -1; |
|
|
22 |
43 |
if(SWITCH_ARGS) reversal = -1; |
|
1588
|
10 |
55 |
if(SvUOK(b)) { |
|
1589
|
4 |
6 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == (float128)SvUVX(b)) return newSViv( 0 * reversal); |
|
1590
|
2 |
4 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvUVX(b)) return newSViv(-1 * reversal); |
|
1591
|
2 |
2 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvUVX(b)) return newSViv( 1 * reversal); |
|
1595
|
12 |
43 |
if(SvIOK(b)) { |
|
1596
|
4 |
8 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == (float128)SvIVX(b)) return newSViv( 0); |
|
1597
|
4 |
4 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvIVX(b)) return newSViv(-1 * reversal); |
|
1598
|
2 |
2 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvIVX(b)) return newSViv( 1 * reversal); |
|
1602
|
15 |
28 |
if(SvPOK(b)) { |
|
1608
|
1 |
14 |
NOK_POK_DUALVAR_CHECK , "overload_spaceship");} |
|
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_spaceship");} |
|
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_spaceship");} |
|
1635
|
15 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == strtoflt128(SvPV_nolen(b), &p)) { |
|
|
4 |
11 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == strtoflt128(SvPV_nolen(b), &p)) { |
|
1639
|
11 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < strtoflt128(SvPV_nolen(b), &p)) { |
|
|
5 |
6 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < strtoflt128(SvPV_nolen(b), &p)) { |
|
1643
|
6 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > strtoflt128(SvPV_nolen(b), &p)) { |
|
|
3 |
3 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > strtoflt128(SvPV_nolen(b), &p)) { |
|
1651
|
15 |
13 |
if(SvNOK(b)) { |
|
1662
|
4 |
11 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == (float128)SvNVX(b)) return newSViv( 0); |
|
1663
|
3 |
8 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvNVX(b)) return newSViv(-1 * reversal); |
|
1664
|
3 |
5 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvNVX(b)) return newSViv(reversal); |
|
1668
|
13 |
0 |
if(sv_isobject(b)) { |
|
1669
|
13 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
13 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
13 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
13 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
13 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
1670
|
13 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
1671
|
3 |
10 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(-1); |
|
1672
|
3 |
7 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(1); |
|
1673
|
5 |
2 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(0); |
|
1687
|
0 |
1 |
if(ld == NULL) croak("Failed to allocate memory in _overload_copy function"); |
|
1702
|
26 |
0 |
if(sv_isobject(a)) { |
|
1703
|
26 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
26 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
0 |
26 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
26 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
0 |
26 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
1704
|
26 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
1707
|
0 |
26 |
if(f == NULL) croak("Failed to allocate memory in F128toF128 function"); |
|
1724
|
1 |
0 |
if(sv_isobject(a)) { |
|
1725
|
1 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
1 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
0 |
1 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
1 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
0 |
1 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
1726
|
1 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
1736
|
26 |
411 |
if(SvUOK(a)) return newSVuv(1); |
|
1737
|
147 |
264 |
if(SvIOK(a)) return newSVuv(2); |
|
1738
|
95 |
169 |
if(SvPOK(a)) return newSVuv(4); |
|
1739
|
141 |
28 |
if(SvNOK(a)) return newSVuv(3); |
|
1740
|
28 |
0 |
if(sv_isobject(a)) { |
|
1741
|
28 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
28 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
0 |
28 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
28 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
|
0 |
28 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
1742
|
28 |
0 |
if(strEQ(h, "Math::Float128")) return newSVuv(113); |
|
1753
|
0 |
63 |
if(f == NULL) croak("Failed to allocate memory in _overload_abs function"); |
|
1771
|
0 |
11 |
if(f == NULL) croak("Failed to allocate memory in _overload_int function"); |
|
1775
|
4 |
7 |
if(*f < 0.0Q) *f = ceilq(*f); |
|
1791
|
0 |
4 |
if(f == NULL) croak("Failed to allocate memory in _overload_sqrt function"); |
|
1808
|
0 |
4 |
if(f == NULL) croak("Failed to allocate memory in _overload_log function"); |
|
1826
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _overload_exp function"); |
|
1848
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _overload_sin function"); |
|
1866
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _overload_cos function"); |
|
1884
|
0 |
4 |
if(f == NULL) croak("Failed to allocate memory in _overload_atan2 function"); |
|
1891
|
0 |
4 |
if(SvUOK(b)) { |
|
1892
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
1898
|
0 |
4 |
if(SvIOK(b)) { |
|
1899
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
1905
|
1 |
3 |
if(SvPOK(b)) { |
|
1911
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_atan2");} |
|
|
0 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_atan2");} |
|
|
0 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_atan2");} |
|
1935
|
0 |
1 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
1 |
0 |
if(SWITCH_ARGS) |
|
|
1 |
0 |
if(SWITCH_ARGS) |
|
|
1 |
0 |
if(SWITCH_ARGS) |
|
|
1 |
0 |
if(SWITCH_ARGS) |
|
|
1 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
1 |
0 |
if(SWITCH_ARGS) |
|
1936
|
1 |
0 |
*f = atan2q(strtoflt128(SvPV_nolen(b), &p), *(INT2PTR(float128 *, SvIVX(SvRV(a))))); |
|
1937
|
0 |
0 |
else *f = atan2q(*(INT2PTR(float128 *, SvIVX(SvRV(a)))), strtoflt128(SvPV_nolen(b), &p)); |
|
1943
|
1 |
2 |
if(SvNOK(b)) { |
|
1952
|
0 |
1 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
1 |
0 |
if(SWITCH_ARGS) |
|
|
1 |
0 |
if(SWITCH_ARGS) |
|
|
1 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
1 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
1 |
if(SWITCH_ARGS) |
|
1958
|
2 |
0 |
if(sv_isobject(b)) { |
|
1959
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
2 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
2 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
1960
|
2 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
1993
|
0 |
16 |
if(f == NULL) croak("Failed to allocate memory in _overload_pow function"); |
|
2000
|
2 |
14 |
if(SvUOK(b)) { |
|
2001
|
0 |
2 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
2 |
0 |
if(SWITCH_ARGS) |
|
|
2 |
0 |
if(SWITCH_ARGS) |
|
|
2 |
0 |
if(SWITCH_ARGS) |
|
|
2 |
0 |
if(SWITCH_ARGS) |
|
|
2 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
2 |
0 |
if(SWITCH_ARGS) |
|
2007
|
5 |
9 |
if(SvIOK(b)) { |
|
2008
|
0 |
5 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
5 |
0 |
if(SWITCH_ARGS) |
|
|
5 |
0 |
if(SWITCH_ARGS) |
|
|
5 |
0 |
if(SWITCH_ARGS) |
|
|
3 |
2 |
if(SWITCH_ARGS) |
|
|
3 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
3 |
2 |
if(SWITCH_ARGS) |
|
2014
|
4 |
5 |
if(SvPOK(b)) { |
|
2020
|
2 |
2 |
NOK_POK_DUALVAR_CHECK , "overload_pow");} |
|
|
2 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_pow");} |
|
|
0 |
2 |
NOK_POK_DUALVAR_CHECK , "overload_pow");} |
|
2042
|
0 |
4 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
4 |
0 |
if(SWITCH_ARGS) |
|
|
4 |
0 |
if(SWITCH_ARGS) |
|
|
4 |
0 |
if(SWITCH_ARGS) |
|
|
3 |
1 |
if(SWITCH_ARGS) |
|
|
3 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
3 |
1 |
if(SWITCH_ARGS) |
|
2043
|
3 |
0 |
*f = powq(strtoflt128(SvPV_nolen(b), &p), *(INT2PTR(float128 *, SvIVX(SvRV(a))))); |
|
2044
|
1 |
0 |
else *f = powq(*(INT2PTR(float128 *, SvIVX(SvRV(a)))), strtoflt128(SvPV_nolen(b), &p)); |
|
2050
|
3 |
2 |
if(SvNOK(b)) { |
|
2059
|
0 |
3 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
3 |
0 |
if(SWITCH_ARGS) |
|
|
3 |
0 |
if(SWITCH_ARGS) |
|
|
3 |
0 |
if(SWITCH_ARGS) |
|
|
2 |
1 |
if(SWITCH_ARGS) |
|
|
2 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
0 |
0 |
if(SWITCH_ARGS) |
|
|
2 |
1 |
if(SWITCH_ARGS) |
|
2065
|
2 |
0 |
if(sv_isobject(b)) { |
|
2066
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
2 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
2 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
2067
|
2 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
2080
|
0 |
5 |
if(SvUOK(b)) { |
|
2086
|
1 |
4 |
if(SvIOK(b)) { |
|
2092
|
1 |
3 |
if(SvPOK(b)) { |
|
2098
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_pow_eq");} |
|
|
0 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_pow_eq");} |
|
|
0 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_pow_eq");} |
|
2119
|
1 |
0 |
*(INT2PTR(float128 *, SvIVX(SvRV(a)))) = powq(*(INT2PTR(float128 *, SvIVX(SvRV(a)))), |
|
2126
|
1 |
2 |
if(SvNOK(b)) { |
|
2139
|
2 |
0 |
if(sv_isobject(b)) { |
|
2140
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
2 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
2 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
|
0 |
2 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
2141
|
2 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
2157
|
71 |
0 |
if(sv_isobject(flt128_obj)) { |
|
2158
|
71 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(flt128_obj))); |
|
|
71 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(flt128_obj))); |
|
|
0 |
71 |
const char *h = HvNAME(SvSTASH(SvRV(flt128_obj))); |
|
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(flt128_obj))); |
|
|
71 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(flt128_obj))); |
|
|
0 |
71 |
const char *h = HvNAME(SvSTASH(SvRV(flt128_obj))); |
|
2159
|
71 |
0 |
if(strEQ(h, "Math::Float128")) { |
|
2161
|
50 |
21 |
nv = SvNV(sv); |
|
2163
|
71 |
0 |
if((f != f) || (nv != nv)) return &PL_sv_undef; |
|
|
0 |
71 |
if((f != f) || (nv != nv)) return &PL_sv_undef; |
|
2164
|
25 |
46 |
if(f < (float128)nv) return newSViv(-1); |
|
2165
|
24 |
22 |
if(f > (float128)nv) return newSViv(1); |
|
2185
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _FLT128_MAX function"); |
|
2208
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _FLT128_MIN function"); |
|
2231
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _FLT128_EPSILON function"); |
|
2255
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _FLT128_DENORM_MIN function"); |
|
2333
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_Eq function"); |
|
2355
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_LOG2Eq function"); |
|
2377
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_LOG10Eq function"); |
|
2399
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_LN2q function"); |
|
2421
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_LN10q function"); |
|
2443
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_PIq function"); |
|
2465
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_PI_2q function"); |
|
2487
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_PI_4q function"); |
|
2509
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_1_PIq function"); |
|
2531
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_2_PIq function"); |
|
2553
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_2_SQRTPIq function"); |
|
2575
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_SQRT2q function"); |
|
2597
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_SQRT1_2q function"); |
|
2617
|
0 |
1 |
if(buff == NULL) croak("Failed to allocate memory in _f128_bytes function"); |
|
2624
|
16 |
1 |
for (i = n - 1; i >= 0; i--) { |
|
2628
|
0 |
16 |
XPUSHs(sv_2mortal(newSVpv(buff, 0))); |
|
2846
|
1 |
0 |
*rop = nanq(SvPV_nolen(op)); |
|
3039
|
0 |
0 |
if(looks_like_number(x)) return 1; |
|
3056
|
23 |
93 |
if(SvNOK(in)) return 1; |
|
3061
|
20 |
0 |
if(SvPOK(in)) return 1; |
|
3098
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
|
3167
|
0 |
0 |
if (PL_markstack_ptr != temp) { |
|
3191
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3215
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3239
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3263
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3279
|
0 |
3 |
if (PL_markstack_ptr != temp) { |
|
3296
|
0 |
1 |
if (PL_markstack_ptr != temp) { |
|
3312
|
1083 |
0 |
if (PL_markstack_ptr != temp) { |
|
3519
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3804
|
0 |
1 |
if (PL_markstack_ptr != temp) { |
|
3821
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3838
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3855
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3872
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3889
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3906
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3924
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3941
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
3958
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
|
3976
|
4 |
0 |
if (PL_markstack_ptr != temp) { |
|
3993
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4010
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4027
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4044
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4061
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4078
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4095
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4113
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
|
4134
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
|
4153
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4171
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4189
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4207
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4225
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4243
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4261
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4290
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4307
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4325
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4342
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4387
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4404
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4421
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4438
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4456
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4473
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4490
|
6 |
0 |
if (PL_markstack_ptr != temp) { |
|
4508
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
|
4526
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4544
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4563
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4580
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
|
4597
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
|
4615
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4633
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4655
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4672
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4689
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4706
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4723
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4740
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4757
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4774
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4791
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4808
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4826
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4865
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4881
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
|
4908
|
0 |
0 |
if (PL_markstack_ptr != temp) { |
|
4924
|
3 |
0 |
if (PL_markstack_ptr != temp) { |