From 967f1dd477615fa75dd1b1e9aae06bd83fd8cee4 Mon Sep 17 00:00:00 2001 From: Uriel Ramirez Date: Wed, 30 Oct 2024 10:28:44 -0400 Subject: [PATCH] Remove trailing whitespace --- test_fms/mpp/test_stdlog.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/test_fms/mpp/test_stdlog.F90 b/test_fms/mpp/test_stdlog.F90 index d009ef71f..92b407915 100644 --- a/test_fms/mpp/test_stdlog.F90 +++ b/test_fms/mpp/test_stdlog.F90 @@ -85,7 +85,7 @@ subroutine check_write() if (trim(line) == '') cycle !! if we're testing with the old io enabled, we'll have some additional output we can skip if (trim(line) == 'NOTE from PE 0: MPP_IO_SET_STACK_SIZE: stack size set to 131072.') cycle - if (index(trim(line), "fms_io") .ne. 0) cycle + if (index(trim(line), "fms_io") .ne. 0) cycle if(trim(line) .ne. trim(ref_line(ref_num))) call mpp_error(FATAL, "warnfile output does not match reference data"& //"reference line:"//ref_line(ref_num) & //"output line:"//line)