Skip to content

Commit 7bbcf86

Browse files
committed
Merge branch 'master' of https://github.com/jacobwilliams/json-fortran into CMake-build
2 parents 9d15770 + 3964359 commit 7bbcf86

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/json_module.f90

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -94,7 +94,7 @@ module json_module
9494
character(len=*),parameter,public :: json_ext = '.json' !JSON file extension
9595

9696
character(len=1),parameter :: space = ' '
97-
character(len=1),parameter :: newline = char(10) !new line character
97+
character(len=1),parameter :: newline = new_line(space) !new line character
9898
character(len=*),parameter :: real_fmt = '(E30.16E3)' !format for real numbers
9999
character(len=*),parameter :: int_fmt = '(I10)' !format for integers
100100

@@ -2887,7 +2887,7 @@ subroutine json_parse(file, p)
28872887
!
28882888
if (exception_thrown) then
28892889
call get_current_line_from_file(iunit,line)
2890-
if (istat==0) err_message = err_message//new_line(' ')//&
2890+
if (istat==0) err_message = err_message//newline//&
28912891
'Offending line: '//trim(line)
28922892
if (allocated(line)) deallocate(line)
28932893
end if

0 commit comments

Comments
 (0)