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
|
10 |
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
|
4 |
13 |
if(x != 0.0Q) return 0; |
115
|
6 |
7 |
if(((unsigned char*)p)[n - 1] >= 128) return -1; |
123
|
8 |
38 |
if(sign < 0) ret *= -1.0Q; |
137
|
0 |
16 |
if(f == NULL) croak("Failed to allocate memory in InfF128 function"); |
154
|
0 |
30 |
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
|
11 |
0 |
if(sv_isobject(b)) { |
204
|
11 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
11 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
0 |
11 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
11 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
0 |
11 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
205
|
11 |
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
|
17 |
0 |
if(sv_isobject(b)) { |
222
|
17 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
17 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
0 |
17 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
17 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
0 |
17 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
223
|
17 |
0 |
if(strEQ(h, "Math::Float128")) |
233
|
284 |
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 |
160 |
if(f == NULL) croak("Failed to allocate memory in STRtoF128 function"); |
261
|
118 |
42 |
*f = strtoflt128(SvPV_nolen(str), &p); |
264
|
160 |
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 |
216 |
if(f == NULL) croak("Failed to allocate memory in NVtoF128 function"); |
300
|
199 |
17 |
*f = (float128)SvNV(nv); |
308
|
1 |
0 |
*f = (float128)SvNV(nv); |
316
|
0 |
160 |
if(f == NULL) croak("Failed to allocate memory in IVtoF128 function"); |
321
|
160 |
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 |
82 |
if(ld == NULL) croak("Failed to allocate memory in _overload_add function"); |
443
|
1 |
81 |
if(SvUOK(b)) { |
448
|
5 |
76 |
if(SvIOK(b)) { |
458
|
5 |
71 |
if(SvPOK(b)) { |
465
|
1 |
4 |
NOK_POK_DUALVAR_CHECK , "overload_add");} |
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_add");} |
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_add");} |
477
|
5 |
0 |
*ld = *(INT2PTR(float128 *, SvIVX(SvRV(a)))) + strtoflt128(SvPV_nolen(b), &p); |
483
|
40 |
31 |
if(SvNOK(b)) { |
499
|
31 |
0 |
if(sv_isobject(b)) { |
500
|
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))); |
501
|
31 |
0 |
if(strEQ(h, "Math::Float128")) { |
517
|
0 |
17 |
if(ld == NULL) croak("Failed to allocate memory in _overload_mul function"); |
525
|
1 |
16 |
if(SvUOK(b)) { |
530
|
3 |
13 |
if(SvIOK(b)) { |
540
|
5 |
8 |
if(SvPOK(b)) { |
547
|
1 |
4 |
NOK_POK_DUALVAR_CHECK , "overload_mul");} |
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_mul");} |
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_mul");} |
559
|
5 |
0 |
*ld = *(INT2PTR(float128 *, SvIVX(SvRV(a)))) * strtoflt128(SvPV_nolen(b), &p); |
565
|
5 |
3 |
if(SvNOK(b)) { |
581
|
3 |
0 |
if(sv_isobject(b)) { |
582
|
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))); |
583
|
3 |
0 |
if(strEQ(h, "Math::Float128")) { |
597
|
0 |
146 |
if(ld == NULL) croak("Failed to allocate memory in _overload_sub function"); |
605
|
2 |
144 |
if(SvUOK(b)) { |
606
|
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)))); |
611
|
23 |
121 |
if(SvIOK(b)) { |
612
|
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)))); |
622
|
9 |
112 |
if(SvPOK(b)) { |
629
|
1 |
8 |
NOK_POK_DUALVAR_CHECK , "overload_sub");} |
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_sub");} |
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_sub");} |
645
|
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)))); |
646
|
8 |
0 |
else *ld = *(INT2PTR(float128 *, SvIVX(SvRV(a)))) - strtoflt128(SvPV_nolen(b), &p); |
652
|
33 |
79 |
if(SvNOK(b)) { |
665
|
0 |
33 |
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)))); |
|
33 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
33 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
33 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
1 |
32 |
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 |
32 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) - *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
670
|
79 |
0 |
if(sv_isobject(b)) { |
671
|
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))); |
672
|
79 |
0 |
if(strEQ(h, "Math::Float128")) { |
697
|
0 |
22 |
if(ld == NULL) croak("Failed to allocate memory in _overload_div function"); |
705
|
2 |
20 |
if(SvUOK(b)) { |
706
|
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)))); |
711
|
4 |
16 |
if(SvIOK(b)) { |
712
|
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)))); |
722
|
6 |
10 |
if(SvPOK(b)) { |
729
|
1 |
5 |
NOK_POK_DUALVAR_CHECK , "overload_div");} |
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_div");} |
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_div");} |
745
|
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)))); |
746
|
5 |
0 |
else *ld = *(INT2PTR(float128 *, SvIVX(SvRV(a)))) / strtoflt128(SvPV_nolen(b), &p); |
752
|
7 |
3 |
if(SvNOK(b)) { |
765
|
0 |
7 |
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)))); |
|
7 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
7 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
7 |
0 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
|
1 |
6 |
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 |
6 |
if(SWITCH_ARGS) *ld = (float128)SvNVX(b) / *(INT2PTR(float128 *, SvIVX(SvRV(a)))); |
770
|
3 |
0 |
if(sv_isobject(b)) { |
771
|
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))); |
772
|
3 |
0 |
if(strEQ(h, "Math::Float128")) { |
783
|
10 |
194 |
if(SvUOK(b)) { |
784
|
10 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == (float128)SvUVX(b)) return newSViv(1); |
788
|
51 |
143 |
if(SvIOK(b)) { |
789
|
51 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == (float128)SvIVX(b)) return newSViv(1); |
798
|
19 |
124 |
if(SvPOK(b)) { |
805
|
1 |
18 |
NOK_POK_DUALVAR_CHECK , "overload_equiv");} |
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_equiv");} |
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_equiv");} |
824
|
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)) { |
833
|
25 |
99 |
if(SvNOK(b)) { |
846
|
19 |
6 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == (float128)SvNVX(b)) return newSViv(1); |
850
|
99 |
0 |
if(sv_isobject(b)) { |
851
|
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))); |
852
|
99 |
0 |
if(strEQ(h, "Math::Float128")) { |
853
|
99 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(1); |
863
|
2 |
26 |
if(SvUOK(b)) { |
864
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) != (float128)SvUVX(b)) return newSViv(1); |
868
|
2 |
24 |
if(SvIOK(b)) { |
869
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) != (float128)SvIVX(b)) return newSViv(1); |
878
|
7 |
17 |
if(SvPOK(b)) { |
885
|
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");} |
905
|
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)) { |
914
|
9 |
8 |
if(SvNOK(b)) { |
927
|
9 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) != (float128)SvNVX(b)) return newSViv(1); |
931
|
8 |
0 |
if(sv_isobject(b)) { |
932
|
8 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
8 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
0 |
8 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
8 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
|
0 |
8 |
const char *h = HvNAME(SvSTASH(SvRV(b))); |
933
|
8 |
0 |
if(strEQ(h, "Math::Float128")) { |
934
|
0 |
8 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(0); |
944
|
1 |
3 |
if(_is_nan(*(INT2PTR(float128 *, SvIVX(SvRV(a)))))) return newSViv(0); |
945
|
2 |
1 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) != 0.0Q) return newSViv(1); |
950
|
1 |
5 |
if(_is_nan(*(INT2PTR(float128 *, SvIVX(SvRV(a)))))) return newSViv(1); |
951
|
2 |
3 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) != 0.0L) return newSViv(0); |
959
|
1 |
15 |
if(SvUOK(b)) { |
964
|
1 |
14 |
if(SvIOK(b)) { |
974
|
5 |
9 |
if(SvPOK(b)) { |
981
|
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");} |
1000
|
5 |
0 |
*(INT2PTR(float128 *, SvIVX(SvRV(a)))) += strtoflt128(SvPV_nolen(b), &p); |
1006
|
4 |
5 |
if(SvNOK(b)) { |
1022
|
5 |
0 |
if(sv_isobject(b)) { |
1023
|
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))); |
1024
|
5 |
0 |
if(strEQ(h, "Math::Float128")) { |
1039
|
1 |
14 |
if(SvUOK(b)) { |
1044
|
1 |
13 |
if(SvIOK(b)) { |
1054
|
6 |
7 |
if(SvPOK(b)) { |
1061
|
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");} |
1080
|
6 |
0 |
*(INT2PTR(float128 *, SvIVX(SvRV(a)))) *= strtoflt128(SvPV_nolen(b), &p); |
1086
|
4 |
3 |
if(SvNOK(b)) { |
1102
|
3 |
0 |
if(sv_isobject(b)) { |
1103
|
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))); |
1104
|
3 |
0 |
if(strEQ(h, "Math::Float128")) { |
1119
|
1 |
12 |
if(SvUOK(b)) { |
1124
|
1 |
11 |
if(SvIOK(b)) { |
1134
|
5 |
6 |
if(SvPOK(b)) { |
1141
|
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");} |
1160
|
5 |
0 |
*(INT2PTR(float128 *, SvIVX(SvRV(a)))) -= strtoflt128(SvPV_nolen(b), &p); |
1167
|
4 |
2 |
if(SvNOK(b)) { |
1183
|
2 |
0 |
if(sv_isobject(b)) { |
1184
|
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))); |
1185
|
2 |
0 |
if(strEQ(h, "Math::Float128")) { |
1200
|
1 |
12 |
if(SvUOK(b)) { |
1205
|
1 |
11 |
if(SvIOK(b)) { |
1215
|
5 |
6 |
if(SvPOK(b)) { |
1222
|
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");} |
1241
|
5 |
0 |
*(INT2PTR(float128 *, SvIVX(SvRV(a)))) /= strtoflt128(SvPV_nolen(b), &p); |
1247
|
4 |
2 |
if(SvNOK(b)) { |
1263
|
2 |
0 |
if(sv_isobject(b)) { |
1264
|
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))); |
1265
|
2 |
0 |
if(strEQ(h, "Math::Float128")) { |
1278
|
2 |
44 |
if(SvUOK(b)) { |
1279
|
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) { |
1280
|
1 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvUVX(b)) return newSViv(1); |
1283
|
1 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvUVX(b)) return newSViv(1); |
1287
|
8 |
36 |
if(SvIOK(b)) { |
1288
|
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) { |
1289
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvIVX(b)) return newSViv(1); |
1292
|
6 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvIVX(b)) return newSViv(1); |
1301
|
11 |
25 |
if(SvPOK(b)) { |
1308
|
1 |
10 |
NOK_POK_DUALVAR_CHECK , "overload_lt");} |
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_lt");} |
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_lt");} |
1337
|
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) { |
1338
|
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)) { |
1346
|
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)) { |
1355
|
21 |
4 |
if(SvNOK(b)) { |
1373
|
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) { |
1374
|
1 |
1 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvNVX(b)) return newSViv(1); |
1377
|
15 |
4 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvNVX(b)) return newSViv(1); |
1381
|
4 |
0 |
if(sv_isobject(b)) { |
1382
|
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))); |
1383
|
4 |
0 |
if(strEQ(h, "Math::Float128")) { |
1384
|
4 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(1); |
1394
|
2 |
79 |
if(SvUOK(b)) { |
1395
|
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) { |
1396
|
1 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvUVX(b)) return newSViv(1); |
1399
|
1 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvUVX(b)) return newSViv(1); |
1403
|
12 |
67 |
if(SvIOK(b)) { |
1404
|
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) { |
1405
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvIVX(b)) return newSViv(1); |
1408
|
10 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvIVX(b)) return newSViv(1); |
1417
|
11 |
56 |
if(SvPOK(b)) { |
1424
|
1 |
10 |
NOK_POK_DUALVAR_CHECK , "overload_gt");} |
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_gt");} |
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_gt");} |
1452
|
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) { |
1453
|
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)) { |
1461
|
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)) { |
1470
|
16 |
40 |
if(SvNOK(b)) { |
1488
|
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) { |
1489
|
1 |
1 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvNVX(b)) return newSViv(1); |
1492
|
11 |
3 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvNVX(b)) return newSViv(1); |
1496
|
40 |
0 |
if(sv_isobject(b)) { |
1497
|
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))); |
1498
|
40 |
0 |
if(strEQ(h, "Math::Float128")) { |
1499
|
4 |
36 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(1); |
1509
|
4 |
36 |
if(SvUOK(b)) { |
1510
|
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) { |
1511
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= (float128)SvUVX(b)) return newSViv(1); |
1514
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= (float128)SvUVX(b)) return newSViv(1); |
1518
|
6 |
30 |
if(SvIOK(b)) { |
1519
|
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) { |
1520
|
3 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= (float128)SvIVX(b)) return newSViv(1); |
1523
|
3 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= (float128)SvIVX(b)) return newSViv(1); |
1532
|
9 |
21 |
if(SvPOK(b)) { |
1539
|
1 |
8 |
NOK_POK_DUALVAR_CHECK , "overload_lte");} |
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_lte");} |
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_lte");} |
1567
|
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) { |
1568
|
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)) { |
1575
|
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)) { |
1584
|
12 |
9 |
if(SvNOK(b)) { |
1602
|
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) { |
1603
|
2 |
1 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= (float128)SvNVX(b)) return newSViv(1); |
1606
|
5 |
4 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= (float128)SvNVX(b)) return newSViv(1); |
1610
|
9 |
0 |
if(sv_isobject(b)) { |
1611
|
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))); |
1612
|
9 |
0 |
if(strEQ(h, "Math::Float128")) { |
1613
|
9 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(1); |
1623
|
4 |
33 |
if(SvUOK(b)) { |
1624
|
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) { |
1625
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= (float128)SvUVX(b)) return newSViv(1); |
1628
|
2 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= (float128)SvUVX(b)) return newSViv(1); |
1632
|
6 |
27 |
if(SvIOK(b)) { |
1633
|
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) { |
1634
|
3 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= (float128)SvIVX(b)) return newSViv(1); |
1637
|
3 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= (float128)SvIVX(b)) return newSViv(1); |
1646
|
9 |
18 |
if(SvPOK(b)) { |
1653
|
1 |
8 |
NOK_POK_DUALVAR_CHECK , "overload_gte");} |
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_gte");} |
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_gte");} |
1682
|
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) { |
1683
|
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)) { |
1691
|
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)) { |
1701
|
12 |
6 |
if(SvNOK(b)) { |
1719
|
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) { |
1720
|
2 |
1 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) <= (float128)SvNVX(b)) return newSViv(1); |
1723
|
6 |
3 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= (float128)SvNVX(b)) return newSViv(1); |
1727
|
6 |
0 |
if(sv_isobject(b)) { |
1728
|
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))); |
1729
|
6 |
0 |
if(strEQ(h, "Math::Float128")) { |
1730
|
6 |
0 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) >= *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(1); |
1740
|
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; |
1742
|
10 |
55 |
if(SvUOK(b)) { |
1743
|
4 |
6 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == (float128)SvUVX(b)) return newSViv( 0 * reversal); |
1744
|
2 |
4 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvUVX(b)) return newSViv(-1 * reversal); |
1745
|
2 |
2 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvUVX(b)) return newSViv( 1 * reversal); |
1749
|
12 |
43 |
if(SvIOK(b)) { |
1750
|
4 |
8 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == (float128)SvIVX(b)) return newSViv( 0); |
1751
|
4 |
4 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvIVX(b)) return newSViv(-1 * reversal); |
1752
|
2 |
2 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvIVX(b)) return newSViv( 1 * reversal); |
1761
|
15 |
28 |
if(SvPOK(b)) { |
1768
|
1 |
14 |
NOK_POK_DUALVAR_CHECK , "overload_spaceship");} |
|
1 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_spaceship");} |
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_spaceship");} |
1795
|
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)) { |
1799
|
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)) { |
1803
|
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)) { |
1811
|
15 |
13 |
if(SvNOK(b)) { |
1827
|
4 |
11 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == (float128)SvNVX(b)) return newSViv( 0); |
1828
|
3 |
8 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < (float128)SvNVX(b)) return newSViv(-1 * reversal); |
1829
|
3 |
5 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > (float128)SvNVX(b)) return newSViv(reversal); |
1833
|
13 |
0 |
if(sv_isobject(b)) { |
1834
|
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))); |
1835
|
13 |
0 |
if(strEQ(h, "Math::Float128")) { |
1836
|
3 |
10 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) < *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(-1); |
1837
|
3 |
7 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) > *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(1); |
1838
|
5 |
2 |
if(*(INT2PTR(float128 *, SvIVX(SvRV(a)))) == *(INT2PTR(float128 *, SvIVX(SvRV(b))))) return newSViv(0); |
1852
|
0 |
1 |
if(ld == NULL) croak("Failed to allocate memory in _overload_copy function"); |
1867
|
27 |
0 |
if(sv_isobject(a)) { |
1868
|
27 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
27 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
0 |
27 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
27 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
0 |
27 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
1869
|
27 |
0 |
if(strEQ(h, "Math::Float128")) { |
1872
|
0 |
27 |
if(f == NULL) croak("Failed to allocate memory in F128toF128 function"); |
1889
|
1 |
0 |
if(sv_isobject(a)) { |
1890
|
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))); |
1891
|
1 |
0 |
if(strEQ(h, "Math::Float128")) { |
1901
|
26 |
423 |
if(SvUOK(a)) return newSVuv(1); |
1902
|
150 |
273 |
if(SvIOK(a)) return newSVuv(2); |
1904
|
100 |
173 |
if(SvPOK(a)) { |
1912
|
144 |
29 |
if(SvNOK(a)) return newSVuv(3); |
1913
|
29 |
0 |
if(sv_isobject(a)) { |
1914
|
29 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
29 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
0 |
29 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
0 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
29 |
0 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
|
0 |
29 |
const char *h = HvNAME(SvSTASH(SvRV(a))); |
1915
|
29 |
0 |
if(strEQ(h, "Math::Float128")) return newSVuv(113); |
1926
|
0 |
63 |
if(f == NULL) croak("Failed to allocate memory in _overload_abs function"); |
1944
|
0 |
11 |
if(f == NULL) croak("Failed to allocate memory in _overload_int function"); |
1948
|
4 |
7 |
if(*f < 0.0Q) *f = ceilq(*f); |
1964
|
0 |
4 |
if(f == NULL) croak("Failed to allocate memory in _overload_sqrt function"); |
1981
|
0 |
4 |
if(f == NULL) croak("Failed to allocate memory in _overload_log function"); |
1999
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _overload_exp function"); |
2021
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _overload_sin function"); |
2039
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _overload_cos function"); |
2057
|
0 |
4 |
if(f == NULL) croak("Failed to allocate memory in _overload_atan2 function"); |
2064
|
0 |
4 |
if(SvUOK(b)) { |
2065
|
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) |
2071
|
0 |
4 |
if(SvIOK(b)) { |
2072
|
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) |
2083
|
1 |
3 |
if(SvPOK(b)) { |
2090
|
0 |
1 |
NOK_POK_DUALVAR_CHECK , "overload_atan2");} |
|
0 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_atan2");} |
|
0 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_atan2");} |
2114
|
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) |
2115
|
1 |
0 |
*f = atan2q(strtoflt128(SvPV_nolen(b), &p), *(INT2PTR(float128 *, SvIVX(SvRV(a))))); |
2116
|
0 |
0 |
else *f = atan2q(*(INT2PTR(float128 *, SvIVX(SvRV(a)))), strtoflt128(SvPV_nolen(b), &p)); |
2122
|
1 |
2 |
if(SvNOK(b)) { |
2136
|
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) |
2142
|
2 |
0 |
if(sv_isobject(b)) { |
2143
|
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))); |
2144
|
2 |
0 |
if(strEQ(h, "Math::Float128")) { |
2177
|
0 |
16 |
if(f == NULL) croak("Failed to allocate memory in _overload_pow function"); |
2184
|
2 |
14 |
if(SvUOK(b)) { |
2185
|
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) |
2191
|
5 |
9 |
if(SvIOK(b)) { |
2192
|
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) |
2203
|
4 |
5 |
if(SvPOK(b)) { |
2210
|
2 |
2 |
NOK_POK_DUALVAR_CHECK , "overload_pow");} |
|
2 |
0 |
NOK_POK_DUALVAR_CHECK , "overload_pow");} |
|
0 |
2 |
NOK_POK_DUALVAR_CHECK , "overload_pow");} |
2232
|
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) |
2233
|
3 |
0 |
*f = powq(strtoflt128(SvPV_nolen(b), &p), *(INT2PTR(float128 *, SvIVX(SvRV(a))))); |
2234
|
1 |
0 |
else *f = powq(*(INT2PTR(float128 *, SvIVX(SvRV(a)))), strtoflt128(SvPV_nolen(b), &p)); |
2240
|
3 |
2 |
if(SvNOK(b)) { |
2254
|
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) |
2260
|
2 |
0 |
if(sv_isobject(b)) { |
2261
|
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))); |
2262
|
2 |
0 |
if(strEQ(h, "Math::Float128")) { |
2275
|
0 |
5 |
if(SvUOK(b)) { |
2281
|
1 |
4 |
if(SvIOK(b)) { |
2292
|
1 |
3 |
if(SvPOK(b)) { |
2299
|
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");} |
2320
|
1 |
0 |
*(INT2PTR(float128 *, SvIVX(SvRV(a)))) = powq(*(INT2PTR(float128 *, SvIVX(SvRV(a)))), |
2327
|
1 |
2 |
if(SvNOK(b)) { |
2345
|
2 |
0 |
if(sv_isobject(b)) { |
2346
|
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))); |
2347
|
2 |
0 |
if(strEQ(h, "Math::Float128")) { |
2363
|
71 |
0 |
if(sv_isobject(flt128_obj)) { |
2364
|
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))); |
2365
|
71 |
0 |
if(strEQ(h, "Math::Float128")) { |
2367
|
50 |
21 |
nv = SvNV(sv); |
2369
|
71 |
0 |
if((f != f) || (nv != nv)) return &PL_sv_undef; |
|
0 |
71 |
if((f != f) || (nv != nv)) return &PL_sv_undef; |
2370
|
25 |
46 |
if(f < (float128)nv) return newSViv(-1); |
2371
|
24 |
22 |
if(f > (float128)nv) return newSViv(1); |
2391
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _FLT128_MAX function"); |
2414
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _FLT128_MIN function"); |
2437
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _FLT128_EPSILON function"); |
2461
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _FLT128_DENORM_MIN function"); |
2539
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_Eq function"); |
2561
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_LOG2Eq function"); |
2583
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_LOG10Eq function"); |
2605
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_LN2q function"); |
2627
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_LN10q function"); |
2649
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_PIq function"); |
2671
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_PI_2q function"); |
2693
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_PI_4q function"); |
2715
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_1_PIq function"); |
2737
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_2_PIq function"); |
2759
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_2_SQRTPIq function"); |
2781
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_SQRT2q function"); |
2803
|
0 |
1 |
if(f == NULL) croak("Failed to allocate memory in _M_SQRT1_2q function"); |
2823
|
0 |
1 |
if(buff == NULL) croak("Failed to allocate memory in _f128_bytes function"); |
2830
|
16 |
1 |
for (i = n - 1; i >= 0; i--) { |
2834
|
0 |
16 |
XPUSHs(sv_2mortal(newSVpv(buff, 0))); |
3052
|
1 |
0 |
*rop = nanq(SvPV_nolen(op)); |
3245
|
0 |
0 |
if(looks_like_number(x)) return 1; |
3262
|
26 |
93 |
if(SvNOK(in)) return 1; |
3267
|
20 |
0 |
if(SvPOK(in)) return 1; |
3314
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
3383
|
0 |
0 |
if (PL_markstack_ptr != temp) { |
3407
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
3431
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
3455
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
3479
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
3495
|
0 |
3 |
if (PL_markstack_ptr != temp) { |
3512
|
0 |
1 |
if (PL_markstack_ptr != temp) { |
3528
|
1098 |
0 |
if (PL_markstack_ptr != temp) { |
3735
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4020
|
0 |
1 |
if (PL_markstack_ptr != temp) { |
4037
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4054
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4071
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4088
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4105
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4122
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4140
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4157
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4174
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
4192
|
4 |
0 |
if (PL_markstack_ptr != temp) { |
4209
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4226
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4243
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4260
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4277
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4294
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4311
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4329
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
4350
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
4369
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4387
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4405
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4423
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4441
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4459
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4477
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4506
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4523
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4541
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4558
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4603
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4620
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4637
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4654
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4672
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4689
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4706
|
6 |
0 |
if (PL_markstack_ptr != temp) { |
4724
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
4742
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4760
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4779
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4796
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
4813
|
2 |
0 |
if (PL_markstack_ptr != temp) { |
4831
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4849
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4871
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4888
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4905
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4922
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4939
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4956
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4973
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
4990
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
5007
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
5024
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
5042
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
5081
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
5097
|
1 |
0 |
if (PL_markstack_ptr != temp) { |
5124
|
0 |
0 |
if (PL_markstack_ptr != temp) { |
5140
|
6 |
0 |
if (PL_markstack_ptr != temp) { |