From ce8e786a732124e6d06a30c23f99fd9f54c39f55 Mon Sep 17 00:00:00 2001 From: Maps Date: Tue, 28 Feb 2023 13:33:24 +0100 Subject: [PATCH] better handling of no-answer in case of broadcast address --- scripts/Mimosis.pm | 2 +- scripts/basicsettings.pl | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/scripts/Mimosis.pm b/scripts/Mimosis.pm index 1ab8731..ef9fc56 100644 --- a/scripts/Mimosis.pm +++ b/scripts/Mimosis.pm @@ -49,7 +49,7 @@ sub mimosis_i2c_command { my $reg_return = trb_register_read( $fpga, 0xde04 ); # print Dumper $reg_return; - return $reg_return->{$fpga} & 0xffff; + return ($reg_return->{$fpga}//0) & 0xffff; } } diff --git a/scripts/basicsettings.pl b/scripts/basicsettings.pl index f48f910..6eeeb81 100755 --- a/scripts/basicsettings.pl +++ b/scripts/basicsettings.pl @@ -52,8 +52,8 @@ foreach my $a (@config) { usleep(1000); unless(($val & 0xff) == @$a[1]) { - my $reg_return = trb_register_read $fpga, 0xde04; - my $status = ($reg_return->{$fpga} >> 16 ) & 0xff; + my $reg_return = trb_register_read $fpga, 0xde04 ; + my $status = (($reg_return->{$fpga}//0) >> 16 ) & 0xff; printf "%x %x Status: %x\n", @$a[0], $val, $status; } } -- 2.43.0