Branch Coverage

xs/perl_math_int64.c

Criterion	Covered	Total	%
branch	58	262	22.1

line	true	false	branch
43	25	0	eval_pv("require Math::Int64", TRUE);
	25	0	eval_pv("require Math::Int64", TRUE);
	25	0	eval_pv("require Math::Int64", TRUE);
	25	0	eval_pv("require Math::Int64", TRUE);
	0	25	eval_pv("require Math::Int64", TRUE);
	0	0	eval_pv("require Math::Int64", TRUE);
	0	25	eval_pv("require Math::Int64", TRUE);
	0	0	eval_pv("require Math::Int64", TRUE);
	0	0	eval_pv("require Math::Int64", TRUE);
	25	0	eval_pv("require Math::Int64", TRUE);
	25	0	eval_pv("require Math::Int64", TRUE);
	25	0	eval_pv("require Math::Int64", TRUE);
	0	25	eval_pv("require Math::Int64", TRUE);
	0	0	eval_pv("require Math::Int64", TRUE);
	0	25	eval_pv("require Math::Int64", TRUE);
	0	0	eval_pv("require Math::Int64", TRUE);
	0	0	eval_pv("require Math::Int64", TRUE);
	0	0	eval_pv("require Math::Int64", TRUE);
	0	0	eval_pv("require Math::Int64", TRUE);
	0	0	eval_pv("require Math::Int64", TRUE);
	0	0	eval_pv("require Math::Int64", TRUE);
	0	0	eval_pv("require Math::Int64", TRUE);
44	25	0	if (SvTRUE(ERRSV)) return 0;
	25	0	if (SvTRUE(ERRSV)) return 0;
	25	0	if (SvTRUE(ERRSV)) return 0;
	0	25	if (SvTRUE(ERRSV)) return 0;
	0	0	if (SvTRUE(ERRSV)) return 0;
	25	0	if (SvTRUE(ERRSV)) return 0;
	0	25	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;
	25	0	if (SvTRUE(ERRSV)) return 0;
	25	0	if (SvTRUE(ERRSV)) return 0;
	25	0	if (SvTRUE(ERRSV)) return 0;
	25	0	if (SvTRUE(ERRSV)) return 0;
	25	0	if (SvTRUE(ERRSV)) return 0;
	25	0	if (SvTRUE(ERRSV)) return 0;
	25	0	if (SvTRUE(ERRSV)) return 0;
	0	25	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	25	if (SvTRUE(ERRSV)) return 0;
47	0	25	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	25	if (!svp) svp = hv_fetch(math_int64_c_api_hash, "version", 7, 1);
55	25	0	if (!svp || !*svp) {
	0	25	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	25	0	math_int64_c_api_min_version = SvIV(*svp);
63	0	25	if (!svp) svp = hv_fetch(math_int64_c_api_hash, "version", 7, 1);
64	25	0	if (!svp || !*svp) {
	0	25	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	25	0	math_int64_c_api_max_version = SvIV(*svp);
71	25	0	if ((required_version < math_int64_c_api_min_version) ||
	0	25	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	25	0	if (!svp || !*svp) {
	0	25	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	25	0	math_int64_c_api_SvI64 = INT2PTR(void *, SvIV(*svp));
91	25	0	if (!svp || !*svp) {
	0	25	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	25	0	math_int64_c_api_SvI64OK = INT2PTR(void *, SvIV(*svp));
98	25	0	if (!svp || !*svp) {
	0	25	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	25	0	math_int64_c_api_SvU64 = INT2PTR(void *, SvIV(*svp));
105	25	0	if (!svp || !*svp) {
	0	25	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	25	0	math_int64_c_api_SvU64OK = INT2PTR(void *, SvIV(*svp));
112	25	0	if (!svp || !*svp) {
	0	25	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	25	0	math_int64_c_api_newSVi64 = INT2PTR(void *, SvIV(*svp));
119	25	0	if (!svp || !*svp) {
	0	25	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	25	0	math_int64_c_api_newSVu64 = INT2PTR(void *, SvIV(*svp));
126	25	0	if (!svp || !*svp) {
	0	25	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	25	0	math_int64_c_api_randU64 = INT2PTR(void *, SvIV(*svp));