From c5ea35d0d1a1dd24fb2deb4abafbed9830261cd9 Mon Sep 17 00:00:00 2001 From: Aman-Godara Date: Sun, 17 Oct 2021 17:06:03 +0530 Subject: [PATCH] temp commit --- src/tests/stringlist/test_insert_at.f90 | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/tests/stringlist/test_insert_at.f90 b/src/tests/stringlist/test_insert_at.f90 index c6ef4b739..126525aad 100644 --- a/src/tests/stringlist/test_insert_at.f90 +++ b/src/tests/stringlist/test_insert_at.f90 @@ -423,7 +423,9 @@ subroutine compare_list(list, first, last, call_number, from, to) do i = work_from, work_to call check( list%get( fidx(i) ) == to_string( first + ( ( i - work_from ) * j ) ), & & "compare_list: call_number " // to_string( call_number ) & - & // " fidx( " // to_string( i ) // " )" ) + & // " fidx( " // to_string( i ) // " )" // & + char( list%get( fidx(200)) ) // char( list%get( fidx(201)) ) // & + char( list%get( fidx(202)) ) // char( list%get( fidx(402)) ) ) k = length - ( work_to - ( i - work_from ) ) + 1 call check( list%get( bidx(k) ) == &