With the following reduced test
program test
implicit none
integer :: i, j, k, ios
integer, parameter :: big = 600
character(kind=4,len=big) :: str1, str2
do i=1,big, 10
do j = 0, 9
k = i + j
str2(k:k) = char(65+j)
end do
end do
open(15, status='scratch', encoding="utf-8")
write(15,*) " 'abcdefgh!'", " ", str2
rewind(15)
read(15,*,iostat=ios) str1, str2
close(15)
end program
valgrind shows a lot of errors before and after the commit.
Dominique
> Le 16 févr. 2016 à 18:58, Jerry DeLisle <jvdeli...@charter.net> a écrit :
>
> Up until now we have not had a test case like this for kind=4 testing. I did
> try -fsanitize=address here and do see the same thing. I will work on this
> some
> more.
>
> Thanks,
>
> Jerry
