IO: Add missing item_size for 'complex64' in read_binary_xml().

Signed-off-by: Grzegorz Kowal <grzegorz@amuncode.org>
This commit is contained in:
Grzegorz Kowal 2023-08-11 19:54:29 -03:00
parent 14fad08f47
commit c015d5849a

View File

@ -2819,7 +2819,7 @@ module io
call XMLGetAttributeValue(xml_ptr, 'BinaryFiles', array_name, &
'data_type', str)
select case(str)
case('float64', 'int64')
case('complex64', 'float64', 'int64')
item_size = 8
case('float32', 'int32')
item_size = 4