From 3490a2ac5c5205281ed230af42a18fdaa8cb0e9c Mon Sep 17 00:00:00 2001 From: Bryan Jurish Date: Thu, 26 Dec 2024 13:10:54 +0100 Subject: [PATCH] fix failing 06_matops.t test 'm0:b-has-bad:matmult2d_zdd:obj:missing=0' --- CCS/t/06_matops.t | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/CCS/t/06_matops.t b/CCS/t/06_matops.t index 9a4d27d..68ff7d1 100644 --- a/CCS/t/06_matops.t +++ b/CCS/t/06_matops.t @@ -53,11 +53,12 @@ sub test_matmult2d_all { test_matmult2d_sdd('m1',$a,$b, $a->toccs(1)); ##-- test non-missing BAD values (expect warnings from older PDLs which don't support BAD in matmult) - test_matmult2d_zdd('m0:a-has-bad', $a->pdl->setvaltobad(1), $b, $a->toccs->setvaltobad(1)); - test_matmult2d_sdd('m0:a-has-bad', $a->pdl->setvaltobad(1), $b, $a->toccs->setvaltobad(1)); + $a1 = $a + 1; + test_matmult2d_zdd('m0:a-has-bad', $a1->pdl->setvaltobad(1), $b, $a1->toccs(0)->setvaltobad(1)); + test_matmult2d_sdd('m0:a-has-bad', $a1->pdl->setvaltobad(1), $b, $a1->toccs(0)->setvaltobad(1)); - test_matmult2d_zdd('m0:b-has-bad', $a, $b->pdl->setvaltobad(10), $a->toccs); - test_matmult2d_sdd('m0:b-has-bad', $a, $b->pdl->setvaltobad(10), $a->toccs); + test_matmult2d_zdd('m0:b-has-bad', $a1, $b->pdl->setvaltobad(20), $a1->toccs(0)); + test_matmult2d_sdd('m0:b-has-bad', $a1, $b->pdl->setvaltobad(20), $a1->toccs(0)); } test_matmult2d_all();