Branch Coverage

lib/PDL/IO/Pnm-pp-pnminraw.c
Criterion Covered Total %
branch 72 180 40.0


line true false branch
49 0 13 PDL_DECLARE_PARAMS_pnminraw_0(PDL_Byte,B,PDL_Byte,B,PDL_Byte,B)
0 13 PDL_DECLARE_PARAMS_pnminraw_0(PDL_Byte,B,PDL_Byte,B,PDL_Byte,B)
0 13 PDL_DECLARE_PARAMS_pnminraw_0(PDL_Byte,B,PDL_Byte,B,PDL_Byte,B)
51 6 7 __privtrans->ind_sizes[0] = __params->isbin ? (__privtrans->ind_sizes[1]+7) / 8 : __privtrans->ind_sizes[1] * sizeof(PDL_Byte);
55 0 14 PDL_DECLARE_PARAMS_pnminraw_0(PDL_Ushort,U,PDL_Ushort,U,PDL_Byte,B)
0 14 PDL_DECLARE_PARAMS_pnminraw_0(PDL_Ushort,U,PDL_Ushort,U,PDL_Byte,B)
0 14 PDL_DECLARE_PARAMS_pnminraw_0(PDL_Ushort,U,PDL_Ushort,U,PDL_Byte,B)
57 0 14 __privtrans->ind_sizes[0] = __params->isbin ? (__privtrans->ind_sizes[1]+7) / 8 : __privtrans->ind_sizes[1] * sizeof(PDL_Ushort);
61 0 0 PDL_DECLARE_PARAMS_pnminraw_0(PDL_Long,L,PDL_Long,L,PDL_Byte,B)
0 0 PDL_DECLARE_PARAMS_pnminraw_0(PDL_Long,L,PDL_Long,L,PDL_Byte,B)
0 0 PDL_DECLARE_PARAMS_pnminraw_0(PDL_Long,L,PDL_Long,L,PDL_Byte,B)
63 0 0 __privtrans->ind_sizes[0] = __params->isbin ? (__privtrans->ind_sizes[1]+7) / 8 : __privtrans->ind_sizes[1] * sizeof(PDL_Long);
70 0 27 PDL_RETERROR(PDL_err, PDL->redodims_default(__privtrans));
82 0 27 if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in pnminraw:" "broadcast.incs NULL");
128 0 13 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Byte,B,PDL_Byte,B,PDL_Byte,B)
13 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Byte,B,PDL_Byte,B,PDL_Byte,B)
0 13 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Byte,B,PDL_Byte,B,PDL_Byte,B)
0 13 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Byte,B,PDL_Byte,B,PDL_Byte,B)
13 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Byte,B,PDL_Byte,B,PDL_Byte,B)
0 13 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Byte,B,PDL_Byte,B,PDL_Byte,B)
0 13 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Byte,B,PDL_Byte,B,PDL_Byte,B)
13 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Byte,B,PDL_Byte,B,PDL_Byte,B)
0 13 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Byte,B,PDL_Byte,B,PDL_Byte,B)
129 0 13 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 13 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 13 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 13 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 13 PDL_BROADCASTLOOP_START_pnminraw_readdata {
13 13 PDL_BROADCASTLOOP_START_pnminraw_readdata {
13 13 PDL_BROADCASTLOOP_START_pnminraw_readdata {
131 70 13 {/* Open n=::-1 */ PDL_EXPAND2(register PDL_Indx n=(__n_size-1), __n_stop=0); for(; n>=__n_stop; n+=-1) {
132 0 70 if (PerlIO_read(__params->fp,buf_datap,__privtrans->ind_sizes[0]) != __privtrans->ind_sizes[0])
134 36 34 if (__params->isbin) { /* unpack buffer */
136 216 36 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
138 36 180 if (!bit) k = *bp++;
146 310 34 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (im_datap)[0+(__inc_im_m*(m))+(__inc_im_n*(n))] = *gbp++; }} /* Close m */
149 0 13 }PDL_BROADCASTLOOP_END_pnminraw_readdata
0 13 }PDL_BROADCASTLOOP_END_pnminraw_readdata
152 0 14 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Ushort,U,PDL_Ushort,U,PDL_Byte,B)
14 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Ushort,U,PDL_Ushort,U,PDL_Byte,B)
0 14 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Ushort,U,PDL_Ushort,U,PDL_Byte,B)
0 14 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Ushort,U,PDL_Ushort,U,PDL_Byte,B)
14 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Ushort,U,PDL_Ushort,U,PDL_Byte,B)
0 14 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Ushort,U,PDL_Ushort,U,PDL_Byte,B)
0 14 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Ushort,U,PDL_Ushort,U,PDL_Byte,B)
14 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Ushort,U,PDL_Ushort,U,PDL_Byte,B)
0 14 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Ushort,U,PDL_Ushort,U,PDL_Byte,B)
153 0 14 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 14 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 14 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 14 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 14 PDL_BROADCASTLOOP_START_pnminraw_readdata {
14 14 PDL_BROADCASTLOOP_START_pnminraw_readdata {
14 14 PDL_BROADCASTLOOP_START_pnminraw_readdata {
155 297 14 {/* Open n=::-1 */ PDL_EXPAND2(register PDL_Indx n=(__n_size-1), __n_stop=0); for(; n>=__n_stop; n+=-1) {
156 0 297 if (PerlIO_read(__params->fp,buf_datap,__privtrans->ind_sizes[0]) != __privtrans->ind_sizes[0])
158 0 297 if (__params->isbin) { /* unpack buffer */
160 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
162 0 0 if (!bit) k = *bp++;
170 65568 297 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (im_datap)[0+(__inc_im_m*(m))+(__inc_im_n*(n))] = *gbp++; }} /* Close m */
173 0 14 }PDL_BROADCASTLOOP_END_pnminraw_readdata
0 14 }PDL_BROADCASTLOOP_END_pnminraw_readdata
176 0 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Long,L,PDL_Long,L,PDL_Byte,B)
0 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Long,L,PDL_Long,L,PDL_Byte,B)
0 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Long,L,PDL_Long,L,PDL_Byte,B)
0 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Long,L,PDL_Long,L,PDL_Byte,B)
0 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Long,L,PDL_Long,L,PDL_Byte,B)
0 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Long,L,PDL_Long,L,PDL_Byte,B)
0 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Long,L,PDL_Long,L,PDL_Byte,B)
0 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Long,L,PDL_Long,L,PDL_Byte,B)
0 0 PDL_DECLARE_PARAMS_pnminraw_1(PDL_Long,L,PDL_Long,L,PDL_Byte,B)
177 0 0 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 0 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 0 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 0 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 0 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 0 PDL_BROADCASTLOOP_START_pnminraw_readdata {
0 0 PDL_BROADCASTLOOP_START_pnminraw_readdata {
179 0 0 {/* Open n=::-1 */ PDL_EXPAND2(register PDL_Indx n=(__n_size-1), __n_stop=0); for(; n>=__n_stop; n+=-1) {
180 0 0 if (PerlIO_read(__params->fp,buf_datap,__privtrans->ind_sizes[0]) != __privtrans->ind_sizes[0])
182 0 0 if (__params->isbin) { /* unpack buffer */
184 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
186 0 0 if (!bit) k = *bp++;
194 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (im_datap)[0+(__inc_im_m*(m))+(__inc_im_n*(n))] = *gbp++; }} /* Close m */
197 0 0 }PDL_BROADCASTLOOP_END_pnminraw_readdata
0 0 }PDL_BROADCASTLOOP_END_pnminraw_readdata
231 0 27 if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0};
233 0 27 if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans");
237 0 27 PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans));
242 0 27 PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans));