minor changes

Author: jacobwilliams

src/json_example.f90

@@ -160,7 +160,7 @@ subroutine memory_leak_test()
     do
 
         i=i+1
-        write(*,'(A)') '***********************', i
+        write(*,'(A,1X,I5)') '***********************', i
 
         call test_4()
 

src/json_module.f90

@@ -114,8 +114,6 @@ module json_module
     character(len=*),parameter :: real_fmt  = '(E30.16E3)'      !format for real numbers
     character(len=*),parameter :: int_fmt   = '(I10)'           !format for integers
 
-    logical,parameter :: debug = .false.    !for printing the debug messages
-
     ! The types of data:
     integer,parameter,public :: json_unknown   = 0
     integer,parameter,public :: json_null      = 1