line |
true |
false |
branch |
44
|
34 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
34 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
34 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
34 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
34 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
34 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
34 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
34 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
34 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
34 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
34 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
34 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
34 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
34 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
0 |
if (SvTRUE(ERRSV)) return 0; |
|
0 |
34 |
if (SvTRUE(ERRSV)) return 0; |
47
|
0 |
34 |
if (!math_int64_c_api_hash) { |
48
|
0 |
0 |
sv_setpv(ERRSV, "Unable to load Math::Int64 C API"); |
49
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
54
|
0 |
34 |
if (!svp) svp = hv_fetch(math_int64_c_api_hash, "version", 7, 1); |
55
|
34 |
0 |
if (!svp || !*svp) { |
|
0 |
34 |
if (!svp || !*svp) { |
56
|
0 |
0 |
sv_setpv(ERRSV, "Unable to retrieve C API version for Math::Int64"); |
57
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
60
|
34 |
0 |
math_int64_c_api_min_version = SvIV(*svp); |
63
|
0 |
34 |
if (!svp) svp = hv_fetch(math_int64_c_api_hash, "version", 7, 1); |
64
|
34 |
0 |
if (!svp || !*svp) { |
|
0 |
34 |
if (!svp || !*svp) { |
65
|
0 |
0 |
sv_setpv(ERRSV, "Unable to retrieve C API version for Math::Int64"); |
66
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
69
|
34 |
0 |
math_int64_c_api_max_version = SvIV(*svp); |
71
|
34 |
0 |
if ((required_version < math_int64_c_api_min_version) || |
|
0 |
34 |
if ((required_version < math_int64_c_api_min_version) || |
73
|
0 |
0 |
sv_setpvf(ERRSV, |
79
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
84
|
34 |
0 |
if (!svp || !*svp) { |
|
0 |
34 |
if (!svp || !*svp) { |
85
|
0 |
0 |
sv_setpv(ERRSV, "Unable to fetch pointer 'SvI64' C function from Math::Int64"); |
86
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
89
|
34 |
0 |
math_int64_c_api_SvI64 = INT2PTR(void *, SvIV(*svp)); |
91
|
34 |
0 |
if (!svp || !*svp) { |
|
0 |
34 |
if (!svp || !*svp) { |
92
|
0 |
0 |
sv_setpv(ERRSV, "Unable to fetch pointer 'SvI64OK' C function from Math::Int64"); |
93
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
96
|
34 |
0 |
math_int64_c_api_SvI64OK = INT2PTR(void *, SvIV(*svp)); |
98
|
34 |
0 |
if (!svp || !*svp) { |
|
0 |
34 |
if (!svp || !*svp) { |
99
|
0 |
0 |
sv_setpv(ERRSV, "Unable to fetch pointer 'SvU64' C function from Math::Int64"); |
100
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
103
|
34 |
0 |
math_int64_c_api_SvU64 = INT2PTR(void *, SvIV(*svp)); |
105
|
34 |
0 |
if (!svp || !*svp) { |
|
0 |
34 |
if (!svp || !*svp) { |
106
|
0 |
0 |
sv_setpv(ERRSV, "Unable to fetch pointer 'SvU64OK' C function from Math::Int64"); |
107
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
110
|
34 |
0 |
math_int64_c_api_SvU64OK = INT2PTR(void *, SvIV(*svp)); |
112
|
34 |
0 |
if (!svp || !*svp) { |
|
0 |
34 |
if (!svp || !*svp) { |
113
|
0 |
0 |
sv_setpv(ERRSV, "Unable to fetch pointer 'newSVi64' C function from Math::Int64"); |
114
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
117
|
34 |
0 |
math_int64_c_api_newSVi64 = INT2PTR(void *, SvIV(*svp)); |
119
|
34 |
0 |
if (!svp || !*svp) { |
|
0 |
34 |
if (!svp || !*svp) { |
120
|
0 |
0 |
sv_setpv(ERRSV, "Unable to fetch pointer 'newSVu64' C function from Math::Int64"); |
121
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
124
|
34 |
0 |
math_int64_c_api_newSVu64 = INT2PTR(void *, SvIV(*svp)); |
126
|
34 |
0 |
if (!svp || !*svp) { |
|
0 |
34 |
if (!svp || !*svp) { |
127
|
0 |
0 |
sv_setpv(ERRSV, "Unable to fetch pointer 'randU64' C function from Math::Int64"); |
128
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
|
0 |
0 |
SvSETMAGIC(ERRSV); |
131
|
34 |
0 |
math_int64_c_api_randU64 = INT2PTR(void *, SvIV(*svp)); |