ttsmit

proc jsonToDict {jsonString} {
    # Remove whitespace
    set jsonString [string trim $jsonString]

    # Initialize an empty dictionary
    set dict {}

    # Check for empty string
    if {$jsonString eq ""} {
        return $dict