| line |
true |
false |
branch |
|
2451
|
33 |
333 |
if ($COMP(whichdims_count) < 1) |
|
2466
|
49 |
317 |
$SETNDIMS($PDL(PARENT)->ndims-$COMP(whichdims_count)+1); |
|
2470
|
278 |
6 |
$COMP(whichdims)[0] < 0) |
|
2471
|
3 |
281 |
$CROAK("dim out of range"); |
|
2474
|
573 |
360 |
if (nthd < $COMP(whichdims_count) && |
|
2475
|
560 |
89 |
nthp == $COMP(whichdims)[nthd]) { |
|
2476
|
556 |
2 |
if (!nthd) { |
|
2477
|
279 |
323 |
$PDL(CHILD)->dims[cd] = $PDL(PARENT)->dims[cd]; |
|
2482
|
282 |
359 |
$COMP(whichdims)[nthd-1]) |
|
2483
|
46 |
314 |
$CROAK("dims must be unique"); |
|
2487
|
0 |
561 |
$CROAK("Different dims %"IND_FLAG" and %"IND_FLAG"", |
|
2496
|
2 |
281 |
} |