Skip to content

Commit 9ce5032

Browse files
committed
minor comment changes.
1 parent 513a617 commit 9ce5032

File tree

2 files changed

+1
-2
lines changed

2 files changed

+1
-2
lines changed

src/json_parameters.F90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -35,7 +35,7 @@ module json_parameters
3535
!! (see [[json_file_variable_info]] and [[json_info]]).
3636
integer(IK),parameter :: json_real = 6 !! Real number JSON data type (`real(RK)`)
3737
!! (see [[json_file_variable_info]] and [[json_info]])
38-
integer(IK),parameter :: json_string = 7 !! String JSON data type (`character(CK)`)
38+
integer(IK),parameter :: json_string = 7 !! String JSON data type (`character(kind=CK)`)
3939
!! (see [[json_file_variable_info]] and [[json_info]])
4040
integer(IK),parameter :: json_double = json_real !! Equivalent to `json_real` for
4141
!! backward compatibility.

src/tests/jf_test_45.F90

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -22,7 +22,6 @@ subroutine test_45(error_cnt)
2222

2323
integer,intent(out) :: error_cnt !! error counter
2424

25-
! character(kind=CK,len=*),parameter :: str = CK_'{ "x": [0, [1,2,[3,3,[4,4]]], [4,5,6] ] }'
2625
character(kind=CK,len=*),parameter :: str = CK_'{ "x": [[1], [1,2,3,[4]]] }'
2726

2827
type(json_core) :: json

0 commit comments

Comments
 (0)