Merge pull request #292 from jacobwilliams/jsonpath

WIP: Bracket Notation

Author: jacobwilliams

files/inputs/test1.json

@@ -17,6 +17,7 @@
     "a": {
         "b": 1
     },
+    "escape": " \" \\ \/ \b \f \n \r \t ",
 	"empty_array": [],
 	"empty_object": {},
 	"empty_string": "",

src/json_parameters.F90

@@ -52,6 +52,7 @@ module json_parameters
     character(kind=CK,len=*),parameter :: dot             = CK_'.'  !! for [[json_get_by_path]]
     character(kind=CK,len=*),parameter :: tilde           = CK_'~'  !! RFC 6901 escape character
     character(kind=CK,len=*),parameter :: percent         = CK_'%'  !! Fortran path separator
+    character(kind=CK,len=*),parameter :: single_quote    = CK_"'"  !! for JSONPath bracket-notation
     character(kind=CK,len=*),parameter :: bspace          = achar(8,  kind=CK)
     character(kind=CK,len=*),parameter :: horizontal_tab  = achar(9,  kind=CK)
     character(kind=CK,len=*),parameter :: newline         = achar(10, kind=CK)