From 7c044913dcdf8bd12793f83d3b868e8f5fdbcdb5 Mon Sep 17 00:00:00 2001 From: Aman-Godara Date: Sun, 17 Oct 2021 16:41:46 +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..b3c8375e4 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(10)) ) // char( list%get( fidx(100)) ) // & + char( list%get( fidx(200)) ) // char( list%get( fidx(400)) ) ) k = length - ( work_to - ( i - work_from ) ) + 1 call check( list%get( bidx(k) ) == &