From cb1802d7fd5707c3e526b8b99fc341efea4f33da Mon Sep 17 00:00:00 2001 From: Sascha Mann Date: Tue, 29 Mar 2022 11:09:13 +0200 Subject: [PATCH] Remove trailing comma Maybe fixes https://github.com/exercism/fortran-test-runner/issues/35 and https://github.com/exercism/fortran-test-runner/pull/21#issuecomment-975204253 - needs to be merged after https://github.com/exercism/fortran-test-runner/pull/36 --- testlib/TesterMain.f90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/testlib/TesterMain.f90 b/testlib/TesterMain.f90 index 81edaaf..a8935f5 100644 --- a/testlib/TesterMain.f90 +++ b/testlib/TesterMain.f90 @@ -80,7 +80,7 @@ subroutine write_json_success( test_description ) write(TEST_JSON_FILE_UNIT,*) ' {' write(TEST_JSON_FILE_UNIT,*) ' "name" : "'//trim(test_info)//'",' write(TEST_JSON_FILE_UNIT,*) ' "test_code": "'//trim(test_info)//'",' - write(TEST_JSON_FILE_UNIT,*) ' "status" : "pass",' + write(TEST_JSON_FILE_UNIT,*) ' "status" : "pass"' write(TEST_JSON_FILE_UNIT,*) ' }' end subroutine @@ -146,7 +146,7 @@ subroutine close_and_write_json_footer() if (TESTS_FAILED==0) then write(TEST_JSON_FILE_UNIT,*) ' "status" : "pass"' else - write(TEST_JSON_FILE_UNIT,*) ' "status" : "fail"' + write(TEST_JSON_FILE_UNIT,*) ' "status" : "fail",' ! only write message on fail: write(TEST_JSON_FILE_UNIT,*) ' "message": "Test summary: '// & & trim(adjustl(i_to_s(TESTS_FAILED)))//' of '//trim(adjustl(i_to_s(TESTS_RUN)))//' tests failed",'