From 5d5ffb085c11c5f77829164a53d3584c2cb13535 Mon Sep 17 00:00:00 2001
From: Ed J <mohawk2@users.noreply.github.com>
Date: Fri, 20 Dec 2024 07:31:57 +0000
Subject: [PATCH] CCS/t/03_ufuncs.t assign data of correct type

---
 CCS/t/03_ufuncs.t | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/CCS/t/03_ufuncs.t b/CCS/t/03_ufuncs.t
index bfa9953..38e46e0 100644
--- a/CCS/t/03_ufuncs.t
+++ b/CCS/t/03_ufuncs.t
@@ -52,11 +52,11 @@ sub test_ufunc {
 
   if ($ufunc_name =~ /_ind$/) {
     ##-- hack: adjust $dense_rc for maximum_ind, minimum_ind
-    $dense_rc->where( $a->index2d($dense_rc,sequence($a->dim(1))) == $missing_val ) .= -1;
+    $dense_rc->where( $a->index2d($dense_rc,sequence($a->dim(1))) == $missing_val ) .= indx(-1);
   } elsif ($ufunc_name =~ /qsorti$/) {
     ##-- hack: adjust $dense_rc for qsorti()
     my $ccs_mask = $dense_rc->zeroes;
-    $ccs_mask->indexND( scalar($ccs_rc->whichND) ) .= 1;
+    $ccs_mask->indexND( scalar($ccs_rc->whichND) ) .= indx(1);
     $dense_rc->where( $ccs_mask->not ) .= $ccs_rc->missing;
   }
   my $label = "${ufunc_name}:missing=$missing_val";