{ServeLocalCollection (5):} {catched error from mtc-m21b.sid.inpe.br} {too many nested evaluations (infinite loop?)} {    while executing} {"regsub {^#} $fieldName {} fieldName2"} {    invoked from within} \"if\ \[regexp\ \{\\.\}\ \$fieldName\]\ \{ {# ex: mark.theta*} {						set #Flag 0	;# the field name doesn't begin with #} {						set fieldList $fieldName} \t\t\t\t\t\}\ else\ \{ ...\" {    invoked from within} \"if\ \[regexp\ \{\\*\}\ \$pattern\]\ \{ {					set pattern2 [SetNoMatch $pattern $accent $case 0 $intervalRepresentationFlag]} {# puts --$pattern2} {					set string $pa..."} {    ("foreach" body line 9)} {    invoked from within} \"foreach\ pattern\ \[CreateIntervalRepresentation\ \$word\]\ \{ {# puts [list $pattern $fieldName]} {# => 50 mark.theta*} {# => shown visibility} {# => ** *} {# return} ...\" {    ("foreach" body line 17)} {    invoked from within} \"foreach\ word\ \[eval\ concat\ \$words\]\ \{ \t\t\tif\ \$listOfWordsFlag\ \{ \t\t\t\tif\ \[info\ exists\ wordArray(\$fieldName)\]\ \{ \t\t\t\t\tif\ \{\[lsearch\ \$wordArray(\$fieldName)\ \$wo...\" {    invoked from within} \"if\ \[regexp\ \{\ and\ |\ or\ \}\ \$string\]\ \{ {# puts $string} #\t\tif\ !\[string\ equal\ \[llength\ \$string\]\ \[llength\ \[join\ \$string\]\]\]\ \{ #\ syntax\ error\ example:\ \{af\ inpe\ ...\" {    (procedure "Search" line 65)} {    invoked from within} {"Search {visibility, shown} yes yes repArray {} {}"} {    ("eval" body line 1)} {    invoked from within} {"eval $virtualRepList"} {    invoked from within} \"if\ \[regexp\ \{^not\ \}\ \$virtualRepList\]\ \{ {# and not} {		if $listOfWordsFlag {return}} {		} {		set list2 [lindex $virtualRepList 1]} {		foreach element $searchResu..."} {    (procedure "and" line 8)} {    invoked from within} {"and [list Search [list visibility, shown] yes yes repArray {} {}]"} {    ("eval" body line 1)} {    invoked from within} {"eval $statement"} {    ("foreach" body line 26)} {    invoked from within} \"foreach\ statement\ \[lreplace\ \[split\ \$string\ %\]\ 0\ 0\]\ \{ {# puts -1->$statement--} {# puts --$codedPassword--} #\t\t\tif\ \[regsub\ \{^(and\ |or\ )not\ \}\ \$statement\ \{\\1...\" {    invoked from within} {"if [regexp {^related:(.*?):(.*?):(.*?):(.*?):(.*?):(.*?):} $string m metadataRep-i language selectedFieldNameList numberOfCombinations importantWordLi..."} {    (procedure "dpi.inpe.br/banon/1999/04.21.17.06::MountSearch" line 24)} {    invoked from within} {"${searchRepository}::MountSearch $searchExpression $accent $case"} {    (procedure "Select" line 13)} {    invoked from within} {"Select readergroup [list repository, $repName]"} {    (procedure "ComputeRedirectToMetadata" line 3)} {    invoked from within} {"ComputeRedirectToMetadata $repName $clientIPAddress"} {    (procedure "GetURLPropertyList" line 546)} {    invoked from within} \"GetURLPropertyList\ \{clientinformation.ipaddress\ 18.223.106.232\ parsedibiurl.ibi\ sid.inpe.br/mtc-m21b/2016/03.03.15.55\ parsedibiurl.verblist\ GetFileLis...\" {    ("eval" body line 1)} {    invoked from within} {"eval $cmd"}