Index: Fortran/UnitTests/fcvs21_f95/FM905.f =================================================================== --- Fortran/UnitTests/fcvs21_f95/FM905.f +++ Fortran/UnitTests/fcvs21_f95/FM905.f @@ -222,15 +222,15 @@ WRITE (NUVI, 80020) 02200905 A5VK = 'SHORT' 02210905 A33VK = 'THIS IS A LONGER CHARACTER STRING' 02220905 - A82VK = '123456789012345678901234567890123456789012345678901234502230905 - 167890123456789012' 02240905 + A82VK = 'abcdefghijabcdefghijabcdefghijabcdefghijabcdefghijabcde02230905 + 1fghijabcdefghijab' 02240905 WRITE(NUVI, *) A5VK, A33VK, A82VK 02250905 IVINSP = IVINSP + 1 02260905 WRITE (NUVI, 80022) 02270905 WRITE (NUVI, 70091) 02280905 70091 FORMAT(" ", "SHORT THIS IS A LONGER CHARACTER STRING" , 02290905 - 1 " 123456789012345678901234567890123456789" / 02300905 - 2 " ","012345678901234567890123456789012" ) 02310905 + 1 " abcdefghijabcdefghijabcdefghijabcdefghi" / 02300905 + 2 " ","jabcdefghijabcdefghijabcdefghijab" ) 02310905 CT010* TEST 10 - SEVERAL IDENTICAL VALUES 02320905 IVTNUM = 10 02330905 WRITE (NUVI, 80004) IVTNUM 02340905 Index: Fortran/UnitTests/fcvs21_f95/FM905.reference_output =================================================================== --- Fortran/UnitTests/fcvs21_f95/FM905.reference_output +++ Fortran/UnitTests/fcvs21_f95/FM905.reference_output @@ -67,10 +67,10 @@ 5 O'CLOCK 9 INSPECT COMPUTED= - SHORTTHIS IS A LONGER CHARACTER STRING123456789012345678901234567890123456789012345678901234567890123456789012 + SHORTTHIS IS A LONGER CHARACTER STRINGabcdefghijabcdefghijabcdefghijabcdefghijabcdefghijabcdefghijabcdefghijab CORRECT= - SHORT THIS IS A LONGER CHARACTER STRING 123456789012345678901234567890123456789 - 012345678901234567890123456789012 + SHORT THIS IS A LONGER CHARACTER STRING abcdefghijabcdefghijabcdefghijabcdefghi + jabcdefghijabcdefghijabcdefghijab 10 INSPECT COMPUTED= 5 5 5 5 5 Index: Fortran/UnitTests/fcvs21_f95/README =================================================================== --- Fortran/UnitTests/fcvs21_f95/README +++ Fortran/UnitTests/fcvs21_f95/README @@ -47,6 +47,8 @@ strings to conform to the Fortran 95 standard. Modifications: +2022 June by Diana Picus +- replaced digits with letters in test 9 from FM905.f June 10 by Nichols A. Romero - modified driver_run input and output files to make it easier to update LLVM Test-Suite - remove a number of problematic tests, see CMakeLists.txt