Lines Matching refs:tokens
21 # tokens consisting of a single character
25 # quoted string tokens
35 # number tokens
72 set tokens [regexp -all -inline -- $tokenRE $jsonText]
73 set nrTokens [llength $tokens]
75 return [parseValue $tokens $nrTokens tokenCursor]
93 # @param tokens list of tokens
94 # @param nrTokens length of $tokens
96 # holding current position in $tokens
100 proc json::parseObjectMember {tokens nrTokens tokenCursorName objectDictName} {
104 set token [lindex $tokens $tokenCursor]
114 set token [lindex $tokens $tokenCursor]
118 set memberValue [parseValue $tokens $nrTokens tokenCursor]
130 # @param tokens list of tokens
131 # @param nrTokens length of $tokens
133 # holding current position in $tokens
137 proc json::parseObjectMembers {tokens nrTokens tokenCursorName objectDictName} {
142 parseObjectMember $tokens $nrTokens tokenCursor objectDict
144 set token [lindex $tokens $tokenCursor]
162 # @param tokens list of tokens
163 # @param nrTokens length of $tokens
165 # holding current position in $tokens
167 proc json::parseObject {tokens nrTokens tokenCursorName} {
175 set token [lindex $tokens $tokenCursor]
181 parseObjectMembers $tokens $nrTokens tokenCursor result
189 # @param tokens list of tokens
190 # @param nrTokens length of $tokens
192 # holding current position in $tokens
195 proc json::parseArrayElements {tokens nrTokens tokenCursorName resultName} {
200 lappend result [parseValue $tokens $nrTokens tokenCursor]
205 set token [lindex $tokens $tokenCursor]
224 # @param tokens list of tokens
225 # @param nrTokens length of $tokens
227 # holding current position in $tokens
229 proc json::parseArray {tokens nrTokens tokenCursorName} {
237 set token [lindex $tokens $tokenCursor]
244 parseArrayElements $tokens $nrTokens tokenCursor result
252 # @param tokens list of tokens
253 # @param nrTokens length of $tokens
255 # holding current position in $tokens
257 proc json::parseValue {tokens nrTokens tokenCursorName} {
263 set token [lindex $tokens $tokenCursor]
269 return [parseObject $tokens $nrTokens tokenCursor]
272 return [parseArray $tokens $nrTokens tokenCursor]