| line |
true |
false |
branch |
|
43
|
0 |
2 |
PDL_RETERROR(PDL_err, PDL->redodims_default(__privtrans)); |
|
53
|
0 |
2 |
if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in rasc:" "broadcast.incs NULL"); |
|
92
|
0 |
1 |
PDL_DECLARE_PARAMS_rasc_1(PDL_Float,F,PDL_Long,L) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_rasc_1(PDL_Float,F,PDL_Long,L) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_rasc_1(PDL_Float,F,PDL_Long,L) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_rasc_1(PDL_Float,F,PDL_Long,L) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_rasc_1(PDL_Float,F,PDL_Long,L) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_rasc_1(PDL_Float,F,PDL_Long,L) |
|
95
|
0 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
|
2 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
96
|
21 |
1 |
for (i=0;i
|
|
104
|
21 |
0 |
if (s == EOF) { nread = 0; goto endread_PDL_Float; } |
|
106
|
1 |
21 |
if (s == EOF) { nread = 0; goto endread_PDL_Float; } /* signal end of line */ |
|
107
|
0 |
21 |
if (s == '#') |
|
108
|
0 |
0 |
SWALLOWLINE(__params->fp); |
|
|
0 |
0 |
SWALLOWLINE(__params->fp); |
|
109
|
20 |
1 |
if ((s >='0' && s <='9') || s =='.' || s == 'e' || s == 'E' |
|
|
20 |
0 |
if ((s >='0' && s <='9') || s =='.' || s == 'e' || s == 'E' |
|
|
0 |
1 |
if ((s >='0' && s <='9') || s =='.' || s == 'e' || s == 'E' |
|
|
0 |
1 |
if ((s >='0' && s <='9') || s =='.' || s == 'e' || s == 'E' |
|
|
0 |
1 |
if ((s >='0' && s <='9') || s =='.' || s == 'e' || s == 'E' |
|
110
|
0 |
1 |
|| s == '+' || s == '-') break; |
|
|
0 |
1 |
|| s == '+' || s == '-') break; |
|
111
|
1 |
0 |
if (s!=' ' && s!='\t' && s!='\r' && s!='\n' && s!=',') |
|
|
1 |
0 |
if (s!=' ' && s!='\t' && s!='\r' && s!='\n' && s!=',') |
|
|
1 |
0 |
if (s!=' ' && s!='\t' && s!='\r' && s!='\n' && s!=',') |
|
|
0 |
1 |
if (s!=' ' && s!='\t' && s!='\r' && s!='\n' && s!=',') |
|
|
0 |
0 |
if (s!=' ' && s!='\t' && s!='\r' && s!='\n' && s!=',') |
|
120
|
0 |
198 |
if (aftere) |
|
122
|
178 |
20 |
else if (afterp) { |
|
132
|
0 |
0 |
if (aftere) |
|
138
|
0 |
0 |
if (aftere) { nread = -1; goto endread_PDL_Float; } |
|
142
|
20 |
0 |
if (afterp || aftere) { nread = -1; goto endread_PDL_Float; } |
|
|
0 |
20 |
if (afterp || aftere) { nread = -1; goto endread_PDL_Float; } |
|
153
|
1 |
20 |
if (((ierr_datap)[0+(__inc_ierr_n*(i))] = nread) <= 0) |
|
157
|
0 |
20 |
for (i2=0;i2
|
|
158
|
0 |
0 |
f *= (esig > 0 ? 10.0 : 0.1); |
|
160
|
20 |
0 |
TRAILING_WHITESPACE_CHECK(s, endread_PDL_Float); |
|
|
20 |
0 |
TRAILING_WHITESPACE_CHECK(s, endread_PDL_Float); |
|
|
20 |
0 |
TRAILING_WHITESPACE_CHECK(s, endread_PDL_Float); |
|
|
0 |
20 |
TRAILING_WHITESPACE_CHECK(s, endread_PDL_Float); |
|
|
0 |
0 |
TRAILING_WHITESPACE_CHECK(s, endread_PDL_Float); |
|
162
|
19 |
2 |
for (j=i+1; j
|
|
164
|
0 |
1 |
PDL_BROADCASTLOOP_END_rasc_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_END_rasc_readdata |
|
168
|
0 |
1 |
PDL_DECLARE_PARAMS_rasc_1(PDL_Double,D,PDL_Long,L) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_rasc_1(PDL_Double,D,PDL_Long,L) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_rasc_1(PDL_Double,D,PDL_Long,L) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_rasc_1(PDL_Double,D,PDL_Long,L) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_rasc_1(PDL_Double,D,PDL_Long,L) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_rasc_1(PDL_Double,D,PDL_Long,L) |
|
171
|
0 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_rasc_readdata |
|
172
|
20 |
1 |
for (i=0;i
|
|
180
|
20 |
0 |
if (s == EOF) { nread = 0; goto endread_PDL_Double; } |
|
182
|
0 |
20 |
if (s == EOF) { nread = 0; goto endread_PDL_Double; } /* signal end of line */ |
|
183
|
0 |
20 |
if (s == '#') |
|
184
|
0 |
0 |
SWALLOWLINE(__params->fp); |
|
|
0 |
0 |
SWALLOWLINE(__params->fp); |
|
185
|
20 |
0 |
if ((s >='0' && s <='9') || s =='.' || s == 'e' || s == 'E' |
|
|
20 |
0 |
if ((s >='0' && s <='9') || s =='.' || s == 'e' || s == 'E' |
|
|
0 |
0 |
if ((s >='0' && s <='9') || s =='.' || s == 'e' || s == 'E' |
|
|
0 |
0 |
if ((s >='0' && s <='9') || s =='.' || s == 'e' || s == 'E' |
|
|
0 |
0 |
if ((s >='0' && s <='9') || s =='.' || s == 'e' || s == 'E' |
|
186
|
0 |
0 |
|| s == '+' || s == '-') break; |
|
|
0 |
0 |
|| s == '+' || s == '-') break; |
|
187
|
0 |
0 |
if (s!=' ' && s!='\t' && s!='\r' && s!='\n' && s!=',') |
|
|
0 |
0 |
if (s!=' ' && s!='\t' && s!='\r' && s!='\n' && s!=',') |
|
|
0 |
0 |
if (s!=' ' && s!='\t' && s!='\r' && s!='\n' && s!=',') |
|
|
0 |
0 |
if (s!=' ' && s!='\t' && s!='\r' && s!='\n' && s!=',') |
|
|
0 |
0 |
if (s!=' ' && s!='\t' && s!='\r' && s!='\n' && s!=',') |
|
196
|
0 |
198 |
if (aftere) |
|
198
|
178 |
20 |
else if (afterp) { |
|
208
|
0 |
0 |
if (aftere) |
|
214
|
0 |
0 |
if (aftere) { nread = -1; goto endread_PDL_Double; } |
|
218
|
20 |
0 |
if (afterp || aftere) { nread = -1; goto endread_PDL_Double; } |
|
|
0 |
20 |
if (afterp || aftere) { nread = -1; goto endread_PDL_Double; } |
|
229
|
0 |
20 |
if (((ierr_datap)[0+(__inc_ierr_n*(i))] = nread) <= 0) |
|
233
|
0 |
20 |
for (i2=0;i2
|
|
234
|
0 |
0 |
f *= (esig > 0 ? 10.0 : 0.1); |
|
236
|
20 |
0 |
TRAILING_WHITESPACE_CHECK(s, endread_PDL_Double); |
|
|
20 |
0 |
TRAILING_WHITESPACE_CHECK(s, endread_PDL_Double); |
|
|
20 |
0 |
TRAILING_WHITESPACE_CHECK(s, endread_PDL_Double); |
|
|
0 |
20 |
TRAILING_WHITESPACE_CHECK(s, endread_PDL_Double); |
|
|
0 |
0 |
TRAILING_WHITESPACE_CHECK(s, endread_PDL_Double); |
|
238
|
0 |
1 |
for (j=i+1; j
|
|
240
|
0 |
1 |
PDL_BROADCASTLOOP_END_rasc_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_END_rasc_readdata |
|
274
|
0 |
2 |
if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0}; |
|
276
|
0 |
2 |
if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans"); |
|
280
|
0 |
2 |
PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans)); |
|
283
|
0 |
2 |
PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans)); |