[ [ ( KeywordTok , "package" ) , ( NormalTok , " " ) , ( OtherTok , "require" ) , ( NormalTok , " Tcl " ) , ( FloatTok , "8.6" ) ] , [] , [ ( KeywordTok , "proc" ) , ( NormalTok , " abc " ) , ( KeywordTok , "{" ) , ( NormalTok , "word " ) , ( KeywordTok , "{" ) , ( NormalTok , "blocks " ) , ( KeywordTok , "{" ) , ( NormalTok , "BO XK DQ CP NA GT RE TG QD FS JW HU VI AN OB ER FS LY PC ZM" ) , ( KeywordTok , "}}}" ) , ( NormalTok , " " ) , ( KeywordTok , "{" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "set" ) , ( NormalTok , " abc " ) , ( KeywordTok , "{{" ) , ( NormalTok , "letters blocks abc" ) , ( KeywordTok , "}" ) , ( NormalTok , " " ) , ( KeywordTok , "{" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "set" ) , ( NormalTok , " rest " ) , ( KeywordTok , "[lassign" ) , ( NormalTok , " " ) , ( DataTypeTok , "$letters" ) , ( NormalTok , " ch" ) , ( KeywordTok , "]" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "set" ) , ( NormalTok , " i " ) , ( DecValTok , "0" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "foreach" ) , ( NormalTok , " blk " ) , ( DataTypeTok , "$blocks" ) , ( NormalTok , " " ) , ( KeywordTok , "{" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "if" ) , ( NormalTok , " " ) , ( KeywordTok , "{" ) , ( DataTypeTok , "$ch" ) , ( NormalTok , " in " ) , ( DataTypeTok , "$blk" ) , ( NormalTok , " && (!" ) , ( KeywordTok , "[llength" ) , ( NormalTok , " " ) , ( DataTypeTok , "$rest" ) , ( KeywordTok , "]" ) ] , [ ( NormalTok , " || " ) , ( KeywordTok , "[" ) , ( NormalTok , "apply " ) , ( DataTypeTok , "$abc" ) , ( NormalTok , " " ) , ( DataTypeTok , "$rest" ) , ( NormalTok , " " ) , ( KeywordTok , "[lreplace" ) , ( NormalTok , " " ) , ( DataTypeTok , "$blocks" ) , ( NormalTok , " " ) , ( DataTypeTok , "$i" ) , ( NormalTok , " " ) , ( DataTypeTok , "$i" ) , ( KeywordTok , "]" ) , ( NormalTok , " " ) , ( DataTypeTok , "$abc" ) , ( KeywordTok , "]" ) , ( NormalTok , ")" ) , ( KeywordTok , "}" ) , ( NormalTok , " " ) , ( KeywordTok , "{" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "return" ) , ( NormalTok , " true" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "}" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "incr" ) , ( NormalTok , " i" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "}" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "return" ) , ( NormalTok , " false" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "}}" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "return" ) , ( NormalTok , " " ) , ( KeywordTok , "[" ) , ( NormalTok , "apply " ) , ( DataTypeTok , "$abc" ) , ( NormalTok , " " ) , ( KeywordTok , "[split" ) , ( NormalTok , " " ) , ( DataTypeTok , "$word" ) , ( NormalTok , " " ) , ( StringTok , "\"\"" ) , ( KeywordTok , "]" ) , ( NormalTok , " " ) , ( KeywordTok , "[" ) , ( NormalTok , "lmap b " ) , ( DataTypeTok , "$blocks" ) , ( NormalTok , " " ) , ( KeywordTok , "{split" ) , ( NormalTok , " " ) , ( DataTypeTok , "$b" ) , ( NormalTok , " " ) , ( StringTok , "\"\"" ) , ( KeywordTok , "}]" ) , ( NormalTok , " " ) , ( DataTypeTok , "$abc" ) , ( KeywordTok , "]" ) ] , [ ( KeywordTok , "}" ) ] , [] , [ ( KeywordTok , "foreach" ) , ( NormalTok , " word " ) , ( KeywordTok , "{" ) , ( StringTok , "\"\"" ) , ( NormalTok , " A BARK BOOK TREAT COMMON SQUAD CONFUSE" ) , ( KeywordTok , "}" ) , ( NormalTok , " " ) , ( KeywordTok , "{" ) ] , [ ( NormalTok , " " ) , ( KeywordTok , "puts" ) , ( NormalTok , " " ) , ( KeywordTok , "[format" ) , ( NormalTok , " " ) , ( StringTok , "\"Can we spell %9s? %s\"" ) , ( NormalTok , " '" ) , ( DataTypeTok , "$word" ) , ( NormalTok , "' " ) , ( KeywordTok , "[" ) , ( NormalTok , "abc " ) , ( DataTypeTok , "$word" ) , ( KeywordTok , "]]" ) ] , [ ( KeywordTok , "}" ) ] ]