ÿØÿà JFIF 

  
 
  ÿÛ „ 
 !.%+&8&+/1555$;@;4?.451
4,$,44444444444414444444444444444444444444444444444444ÿÀ  á á
" 

ÿÄ   



           
 ÿÄ ? 
    
 !1AQaq"2‘¡±ÁðBRbrÑá#‚’¢²3S CñÿÄ 
 

             
ÿÄ ! 
 
 
       
!1QAa‘2ÿÚ 
  ? 5˜Z¯V¦cø)›t/? z¨±>Õ5€¶‹Á¤·¼z¼Ü¬+ñ®v¤¨_ˆR­BFn©—˜ý®ç̝P8gýt·ÉSTŦˆìät?þé¼íìN/Þa)ì–í6ô…
Ï¿øÃj´¿KÇü]ÿ ªô¹-eKànëÕHTx}ýSÜ›ÿ ”7Ø×&µ<¦  ¥ÑO¶[Ù¯ä¨ÞÃÿ PZ-¬;#õ|•
oaÿ ©CìÞz3˜öː/¤­ñTûIØ}š^   mÓ%ªxˆ¥ÉŸu=Z+ISe¿45™¼u;ú&WØ÷€æßQ™®{|
íx*TC“#ZŠìZ§²‹ 6pv…³¿¡äª*áZÐ%ÒOáˆo"x«OHk
w±æ+¬V(kMúŸ5Vö«$ ÁrÏbàb57/luR ¸ÑÛj Òµì`Ðœq­û žICÀ
Ê•©4€Âcà¨Ï€O´<èÐ:›ù(Ë^L8þ‘ÍÌ#¸Ð_Ì©ÙK(Öz 4¬û+¸;ü’V’84‘¬ÃŽ:[â‡ÔÌáõp¢~§ªlæ£ö{®G>J¼"°‡7¯ÆÉèßû ‹É‹§ÁòÃýâßî
^ƾÙõ‹×óH#«LP½ïX=xÑÍ$|W?•~•îëÔ©ª‹
{ÝT…Kÿ ”hûâá)J*ö˜–ÔU;iÇ€/ ÆþjóZ\ýwØ=Ìm
ºèËL9 ýè
Æð/¨’¥öo=nË.%Îì   ŽÕ¯È|{Oj²ƒE6e/ßdÄõ²Ìâ1O®ò×TsəԸhOMýíMˆ¿¼H˜l²,7Â¥#MF/Úf°Ö½± ¸–dr‹NýÊ íjqx{œÉ ä-È    ¦
øÄër¨q°ð
†nцýÑÄÆ’mä…n<0È™;ÁÝá¯ÁZƒ7FÀmì­ É&9ˆîéi¶ùN§Y•ÃZãAâ?•‡©‰ , ó¾IŸŠc1 4â&y­&pŠ­6;M À 0¹qç»p.á …ŸÅáK@<u %Ü6ÓtIÌpÓr»söfeÁ0O…­´Kƒ&ñ™\©<+,~)‹
ºHÐ*×µ&†ž‘Æ÷ÚŸ
1ßjC5Oh´‡›

Ø×ë æâ“Þà

ÒT]§n{ºöB³ ¦ ̹Â8Êï¦MÉ<„¨s¹¶ì7Ì”æR$Ncà! /éþäRM÷Gƒ¿É$
¦oà>%6·y6ƒ‰3?”úºŽ‰éX5ªPT §µ!=Mž«Ú½‹ÅgÂSâÉaþÓoö–¯ÁÔìR>5éÿ üs¶ÆUcÌ  kÇR
]ÿ ù¬¼«VŽ;Â|‡~¢¦”ÏÅ°æ
{L™Õ°Óv¹ò¸írŽ¡×¢CÃ!íVÕ {¶»sŒNPg/
"uÕbkm²“$ďå¿é¹§°½æz¯6 †s¿!s–wÚÝ“™Œ°.ûj>·+™Òa…©Œ&rÝÎtÛë긪Ît’LAVp%c Úý[ÄzJ¾ÇàXXç@˜ó<êL]·T˜¾¥1Ó©V‡g´æ½¦Ý@¹óø!_@´ÞâSÁ —S3™•& ]@JHÚý©ZŽ €×æÔr»Áf!‡yÞ4Mv*èÓã_{‘åóUuљØ«Oïé*®EvÑ
Œ÷‡U \"㪒ÍK+À 4“M¡ï:0¥5í!'<@î´”>Ç»&Z–ïCCV˜Ì5Šo&îhè.žû
|ÓK©h$s6KìŒëã)¹hI¦GïOåóI;ììü#É$Š0…Ææ¥TØ.5­¾gn´ “ÂÖ\:hœ89G)J@„}œ:’Ò{/Š"¦_Æ×7Æ3VÇŠÊa]ÚŒÙ€Ä–=®uÁßâACZƒ§§£Qnâ:«,×{tyø¬iÛcœÜÄ€H½ÄÍCk´÷šß
.W'b¤Íåh]÷€=,Žv×cÚEÚHXJX¶îo¨FÒtèöŸ>ªª6[J®Fµ£sGÁeqõfe\íjÒÐïÄÐGˆe1Ø‹.Ø”‘Ëuø
Y­ˆÜŽG|zùªüMpDnQWÄ”%JŠ™)â*p@Örš«ÕT2Ð%ˆG#ª„
·¤!°ŸOTÂT¸aÚ%4&h™LµšØüÐ.F¿²ÐÞ_Ç‚¾ÅÃaÜ÷09Æ 
q€öy˜v‡85õN÷]¬äѼóS{°_MŽ¬úÔ#°Ç¸0åÞè2ëôPcvÆw9®ií1Ä8F™˜à‰´+‰Ik1òÝ7“Ñ×ÒsÝ\x‚h`ÞÑ`ó"|µEcý£n˜h`}GÞ  !±ù²Ápü²
ß6
0ïi󜵩SÈÇ7˜-ÕURO˜¦´f$ªž-Í6(œ}<„ éc øs]ŽŽ„*—¾
ìdŽ„)méª\¿êÎIg¾ØÞ~I#C/¼¼´EÁÈŽi8“©õådô·>euä ƒ'Ê×लR1ÉJE1ÐAát`t;ÇР%Ý<‡¥„ÍÆ`×Oyó)õiI€ñQaŸ4Ûù\áàaÃÔ¹HÃu¹*k€¦<„eS‡&õÏ
B!ŽhüÞ`yj}mªf×\¿
Ç~æ­9‡û\՞Ǖg²1Žû5V7 !àöšm°
c`ܬøÇìµÒ'P"?…´Ö,"§^•õŽ¨sÔ)6˜sæéÍR¼
ò|Sl”‹7 nPW

Gòú÷½§O¯‡„l¡kSÞŒr½PÊ@æ¢pŽ-mÿ #Ÿ˜Àº¶Áä¦;ïÔæ$1££`“Õ>„—·ž)ß
ð
³ñ#Ï Ô$¶œ‰ÊE‹À;÷º
¯«P:Ñ”8–IÊtpÞ3ª“>ê“þës4ò2OÏÕ­±zô†Õ§‰.÷ä¸;¿˜“'œ›žª}«Œ{ª±Ì 9ÔóÞÕ‡0
$íWV3Üì¬
—@kÝ4@¿r¼±½¬™›?øØæ´'Áé®CË3-g$˜ö‡×auÚi´Žp/êÛæF›Ú2v‹ã¿¿,nB1̨ƃqÞa5͝@&Æû“él÷ \C²½UÍc ¯k×¢U
ÖéQå™—-r    wô ÞÏ<Ò=&=ÿ Ôê Òêˈt,i—;LîÜ á¸*ÚÃ1$êL•LÍ <É)ýÐà’
;F™{ƒ™˜€&'}‚ãÄK`¡ÞT@I;®žZóè‚s’7®°›+§O­Åq©é»²9<Ô
J ¼9O’HL»Ùïì¸rk¼Ž_ý‘TŸu[²ßÚŒ·ü÷B%¯E ŸÔX5êO´Ç•€’I0 É<mÆÈJoúáõóQâØòÙaÙt:  ·=|Ôaz]a1cÉŸ1
4˜à3΍}GFøí7/B«vεŕL=Ðr1ÕšnwH›óÞ¢ºö{)´4€æZç^ÿ yÑ:_([¿ipqQÊ^âÆe;»½“¦º|¢ÀTçèrú1”óTÃ’u¦CG¤ ¡
Š­7ë

·i“¿z»n
ö¼±ù^ö<‹çu7¸ÈlvZðÛAUXje•
dLÞH ÚosÇr`È™‡pÊeÇ4@x7´)ö†Ótœ~i‘Ï[x@äUÃæ­m·e´x
°t¸·²5'žªža   =ÖÌåzϘ'-´ˆpž3§ò‡k  Ý'‰ýÑï¦3ºdè“{eiÔõNkîšECEΠ¥ÃT9ãqÃâŸîɐ8z \?€    >JX` 
ñ¹õ%;µŸD‘«´€àwÒ™UûئžÖö\×®×´8 ½‡ºÐÆÓ§?Àkmœ=;d5*@-ì0F Rªýš[Ü6âö̃ڸr*KA9· u*µæ£?U¸Âêí†8@¦X4 e-ò„0s{ HâUpU?¼mñRa°®a%Ð'tÉ×’\¾ÊÉ]t›h>·(Ë@R¼¡Ãt h}’O÷au<+nT…Ö…MӐ??Óe95 q>í/;&JSû °¯ÊéÞøƒ*Ã2½Ài&:nôUl=¾¿5eˆ3”ñc|Ú2V”>„»&eE;«ÚäC
p¢Ûúy 9š[ŒÌx¼擼A&DåÒ¯ˆ¤ÀÌ;"˜ÏQä¸åhÊ}Ûq«Û0WžÒ|»€ø®öCm5•\ÇÀ§Pe3£]0ÃàLDÉ‰1øªxjgwT‚÷¿LΨK‹›ùs—xˆÜ±µ
kæ¸f‰‰ÜGk/LÛØ6d9ò¶ùA{ƒA3š/¬D¬khÓk‰`˜"㯒r¿±Óã jx‡°e}<Ñø\3y:'À•/h½Í€Ç4~g ?Û(¼]v‘ªlKÎâ~?O‚W%{Ì:“'©úNq¾›úo(X’¥¯ˆ
nFê{Ç€ü?º'ë
ø‹ì
Þ09ŒÌç9Æ —ËC`j@ÓÄ(+a‹un¸#ÂꟋ{K`‘ÑÍÍ'à´»/Û,KW;Þ4²þð ï Nm|~fGÏ(…³Ã)«1ö­Õ
¥‡¨©ƒÃ™ü-s=à=U66Ï«Ýc蓦W¹íž®›nÔ%êÇìŒ<#Ü×84ån®Ð ÒåOC`  ñânÑs‡¢ç 1õ%Îhì½Ã½® e:ݼUZo
™`  
ÅZŸŒÊ«ê1ÏÄo$q¹Þ€©ˆhÐÉä¯ñ[!…Ú˜àJ:x2$Íß&PåT£6ç—
‡Í*4Ýšçjÿ ‰É nófÐ ó(L5C•åÆ\rMÒ@ò
}y-W}™üýVù—ú¢=Ù”c®‘< M ž
´Phr¦©TD ‘ù.$´÷O‡‘V2Æò.=IUŒ=ž‡â¬i™aþÓåÙ?òUø'ØÖ•.~* šTŒ!•-×áºTâ®ä#õü'´ eýlYÅÓeÕKÂrT"CÚ@u!Óxƒ{š3€}1¿(r}%«nËamjÑ%ÑNEò
v  ˜à  σöK³,*º.àzù¨™Ó ÚçâU¦*¿ 9{%Ö¹ njûdaXöb)  kÛƱûÓ\°M7ˆÂ=û›ç¿Ã‚­V»Cg–8ÙêE-j)k$º`Ã-ùEýeBÆÇ]c¡°ñty&Òd0nõ'¡W+ƒ*|–ø<K\%¦cÏÄ#N,Úú‘¤òÒÛõ ’¶§‰Ì
ú•dçb31Ð\7‡ëÚw82
‰KÝkÚñ'¢Ž…[&¼ÌAÔzHàP *اoßreÁY¥Ñ¾ãE|&QbKg]ã„þê*b;R³Öi‹  ±î$£ÈTm¶k÷ˆ
¦»Ù¹i¦¨6 h%Á'Ú
J   \F±â+‹b/Å9ñå5Àë­nˆRv«¯#„&î„$º’@:‘Ôrø+,àq‘秬*Úg´>µFa\GQªEAÔp5\Ǽ·¼Ç8·õ -â§Ú[
‡
uZeÖ 3}×d'+¹:ð+K†Û®s!Ï$úe€<Û”x)1»a­¡LC]¸µík…ÚàA»AYº{†ªS[¦5HÒ7ù
--,ísòDØ€èk   ÞÀîÜò@â(  ËNˆë›4ô½•/¦o‡€Û7
ê•ÆêòðÜy
'Án½µ á˜ݦ  ndeo…[ì¶Ê,¥R³Ä=À±—–ß;£™´ñSâ*g§”ïaið‘Jå~™ÓÞß³Õ¢»8x埒²52>AÊb&-÷\7´éÄù€T˜,w;3{ï˜k…à¹ÄqÀ«œ{
€\
ˆ¾[´¨јr &Úé„Ívˆ±8†¿]|¬ņ4I×pÞS1ÈÖz‰#Ìv‡G!YNògñ:màTz¢Ý1ô©^O=~ë|5Bã™ç•¼µõ•bÆ@úÕS¬ÈŒ#¬zünrŸ
û”
Z²•ï›èðV"ÁHÚý©wÝ €7¼Ìu1hÑa3Éä û f$o¿É ™Ú›ÝçnpÒ3äÌ3†Í§,Äï]$‰/pê†«À¼
¸e9­Æê_C]žƒ·ý·frÁN«,E=›Çq
-‰öŒ:aÏ¿±í&£Í:-}
84‘ÿ eƒQÑeëSsuiA
³g㟥ú£?ÿ ʼn*”“÷aühe:ÊWa@ÒÞk±eØ]
F Ô—r.åä˜@ö¥ªZoÐýYL·¥S²G/‡ñ
<~*ZÆ´è>JlòàÛƽÿ 窘ìGN¢:I®KšJp/`íIÁÀõ#Ä-€ö­šµŒoF4|ÆQØÆ@Ì|£Ô…¢À{9˜è½Üó›€ôYÒÎYsið;ís¤€à²ˆ‚4qÉVŒI$  ‰"°   æµ8cXGjœˏ¡Aâý•ËÜ¢ûïe·çLx']á"oÅÎê3¯Ç—¹”ó0nå‚âg{Œñ>
S´˜îè°g238‚ãköÝfÚd´6Ò€;ò÷±¢™¼›º¢Æ'¥Ðx'e¬ç
]bÈÆV¢ó‹kýBO
ðÊâ$Ÿ!×T
3Mýמ
žìٍàÌü‘8÷€àæØ8æ©6‰©L´«…oãpð„~Çk‰!ñ;‹”ÛžÍ àž±z Ÿôû øŸÝužÏ;ÿ #|u6™Þ¬ÚˆÐõA4¶â|ôl|Ê2ŽÇ¤ÝÅÇY.<#Aí.k§hóF‚”Y;
M½Ö4hŸ4&›­¿tès´%FìL¥£Ãk‰ÇT¤haÁ¤ÚxfÉ`ÑìË›>i 3t‚:,–+^÷´–{Û–Nxi"x‘Ûg
î¨>¥Õ܁ùZH,2Û“:8xÊ¢Çí9.É-Ìâã-=çjwµS˜dütžçwýGòú®®ûº_ˆýx$–¡ãøO
EÚÛÏ÷R„×w+3£Á£öUMyR²¹âŒ°š›¸Ñãò9§Ó_Dl+Ùßc›úšGÅÌc†Ž!Ko=¶.‘Îÿ c²(2®V mª.ÿ ¹B›¹å ù„öŸSV>™ü¯$y:G¢Z×àøúdî¹û­·ýÇ´:•c LÍõi_‹ö+ÎæGÊè>OŠ•äž´§Þ{X}¨1ÚTc›»Qþ•êô°t¿OP?eæ~É{5]•ÙR£r5†nZ\ã@
&îJõ ¾àC°þV>fé¥/ü5ñÊIº_é5;e­h<@
Ä&æÃëE%;X,ÒãÆÞ`Oò¦kŸm#˜!ÀyÄ¢|
óLšò¥Ä`
¶R=|ÈCâh5ò3DˆïF†ðÒ#ÅìÛœ?¸yhBãœí
ZxßÎÄhºRK„`Þödvײ™ÀÈÑÒgŒuYw³%†ƒÓzõ ÖÏp‚dH®¦A´ù§»ÓÇMæ~)ˆð‡û:ù&Ä •vGD´À 
n
Ý
‡¼Ö8Fö   óáà£~Ë¥x`oK|Ä?fxiØü%pìR>éò+Û±éÎ>núlFŤ'tq8LZÏvÃ?„¡ß±È⽆¯³íü@x|PöUäèØã¡ð‚ŒAìÏ"vÍwóŸÍ{ ý0.z    È•Ö{,N¡£¡ŸKÕÙž>Ýœþ ÍÀ<n^Àïe€Þgn¹”ÜiQê
9Ú±‡„è]ËA¿‚MJìiÓxŒn-ÄS6!ÓæÑû*jÎWøìšÇ뙦gj~+?\,Ö7ÁÕÊ”G™q6TF)óCç<ÓšÂUé†gW=àà“hóR³ÊQì<!÷ÇpR1¯u„De,è­vvâDß~žHå‰ú£Kìní¢ÐçÅÄÅ¥Ü÷
±ÃìÇžûƒz\þÞ¨-•‹
€

¸+¶n¿^
?†[ÖWóÒX¸,0Ø:l?‰Âý«ÿ ·Dc+fÔ[ƒ›ûªšx«kæž1KI…<#'nž¶\±íÎ8¤ìK@’@J¥v)º[Ž±Æå´¼
½Ý¡ç¯ÐO¥ø®è•Óȱ߿wša©“œt‡4îyªœ&+1ÏØ:‚æƒ=/ꎔ`hm
“=©‹]°g}ì€DgUƒ8¤qCˆãáÅ,‡Ô¬ñ10HÑDÂbáÂÿ Œ»v·:uòB6»áp‰>°<×EA!Å‚D™IúOÍ
¡>ôG}Â`ÍßkÜL™Ž  Þð™
{IøF²
¹òQ3&!ÃÂÞz.d&Ï-sH¸,Ôõ˜ŽP€
77ˆÝ¼ÊëÜw   =cÕ
Ú,ØÐ5ÎYÐ)ì´öœgŒ[¤
ßv㙑8心>h]§µháYš£²ºÑ.{Ï7Sð•?´~×SÃKýJÛ˜
™Íäiúu<µX¶1õ^kâçIÑ£sZ4h>j*ÔšD:4­¿_ ÷¸
Õxæÿ ¸?Mù _•­ÊÐ ä ÷ý ÑwL
œ­ïnTkÛUÍN©ë:¦fV ¶ÜÔÜMªÅâA½–¿R×TXš-%iTÊT•‡Ù‚JôϐZxWÑè‰f‰òG º
×Õû2aZ7OU3[“×AT–ÞŒ…-‘¤”Ì 
ì&(ˆ¿­•ƒkï’:ðY¦W‘Å)“†‘˜³Åtcø˜ñTÂwÚÇ4
|üLÇªí–v-
qˆèU
qPE.†â‘˜µ Æ,ÐÅs]8¾„oúÑ i>ÜxxÈó)ƒ ´æÁâØ$À‰vžŸf$Ž|ãw;ÀÁIJ»b`
{¦Ó¤Ú$©YÀ‘n@Óïž«9J¼êG   m¤
ܯ¹ÌW4€ÐÒÅÛ‡#褕Ÿn-?í|с¥÷Ú¹¬'´ÞÜ9ÓK`hê£SÄSà?7—Wí_´…óB›»:=Ãïq`<8ñÓŒÑlú2d¬ê³£hÖ[l|$vÝro~'R®‰§°ñmY ͧäP
|PUª¹·:3Œ[Û{Xÿ ºâ@‚W–Äé u‚ ¯´*=íή.pûÒdt @
G‰¬ s¸    ëÉücr ÞæѨÊ@>¤¢Ö±.Þ'¯°ÌME[YéïĵÂCå½
Ué©Áû'Ê9%eÔðNU”ë‘ÌsD3/®+UI˜9h.WC”
빓$#:pz:YÓ ¿xž* ³$Í +$kñAŠ‹†¢
Uê>¸)_š¬÷©ßAÂÔb9ÇU ¯¾
á•9¯ÏÏ÷O÷¼¼Fähal1‰3Ì[Ïr•´UCksNÐ]R‘¸¥H+§Šé†c©vÖÞ0iÓ76s†î!§=ß
¼~Ô'°Ãmäoäš³ªøi1úÉ)³yV8CLÄØÁ‘WYïi€H6ÖÑiámø^ÈY´°Ñ7¥Û*—Ñ©L«Qƒï—Ùrÿ ›£Ð*š¸ˆL©ˆ$ˆ ÷¾D§9È®«qbqC)–ˆïv´çñsÑVT­Ø, <àïºÀO«Jý·õ 
àfPìð  .wFšir´þ’2_Y
*Æ€x\«
ì€9š@ Ž|F⇥ˆkZ@hÖÄ0t¿-<“‹qµ¾*ZL¤Ú)&BJpÓF5=$„at*Zš$’ÑtdûÝRI1    2Ž‰$€$I$#‰SÞ’H
ë¬ï;Á$¡t$’`<(ñÇt)$‡Ð.Êf¢X’Kt=Éé$‚ˆªè¢oÝëòI%Rgcª÷ŠyI%¡‰ÿ !ñ)´õ $¤ Ô’IIGÿÙa

�3�g}�@s
dd
lZdd
l
Z
dd
lZdd
lZdd
lZdd
lZdd
lZddlmZ
e�	d�
Z
dd
lZddlmZ
ddl
m
Z

zddlmZmZ
Wney�


ejZZYn0eeee
j�d�
��
Zd
add	�ZGd
d�dej�ZGdd
�d
ej�ZGdd�dej�Zdd�Ze dk�
re�!�
d
S)�N)
�support�_tkinter)
�Tcl)
�TclError)�INT_MAX�PY_SSIZE_T_MAX�
.cCs�tdur�t
�}|�d
d�}
t�d|
�}|��\}}}}t|�
t|�
t|�
}}}dddd�|}|dkrz||||dfan||d||fatS)	N�info�
patchlevelz(\d+)\.(\d+)([ab.])(\d+)�alpha�beta�final)�
a�
brr
)�_tk_patchlevelr�call�re�	fullmatch�groups�int)�tclr
�
m�major�minor�releaselevel�serial�r�,/opt/python39/lib/python3.9/test/test_tcl.py�get_tk_patchlevels








rc@seZ
dZd
d�ZdS)�TkinterTestc

CsF|�t
tjd
�
|�t
tji�
|�t
tjd�
|�t
tjdh
�
dS)NT�string�set)�assertRaises�	TypeErrorrZ_flatten�
�selfrrr�testFlattenLen+s
zTkinterTest.testFlattenLenN)�__name__�
__module__�__qualname__r&rrrrr)src@sv
eZ
dZd
d�Zdd�Zdd�Zdd�Zd	d
�Zdd�Zd
d�Z	dd�Z
dd�Zdd�Zdd�Z
dd�Zdd�Zdd�Zdd�Zdd �Zd!d"�Zd#d$�Zd%d&�Zd'd(�Zd)d*�Zd+d,�Zd-d.�Zd/d0�Zd1d2�Zd3d4�Zd5d6�Ze�e j!d7kd8�d9d:��
Z"d;d<�Z#d=d>�Z$d?d@�Z%dAdB�Z&e�e'dCkdD�dEdF��
Z(dGdH�Z)dIdJ�Z*dKdL�Z+dMdN�Z,dOdP�Z-dQdR�Z.dSdT�Z/dUdV�Z0dWS)X�TclTestc

Cst�|_
|j
j��|_dS�
N)r�interp�tk�wantobjectsr$rrr�setUp8s

z
TclTest.setUpc
Cs&|j}
|
�
d
�

|�|
�
d�
d�
dS)N�set a 1�set a�
1)r,�eval�assertEqual�r%rrrr�testEval<s



zTclTest.testEvalc
Cs|j}
|�
|
�d
�
d�
dS)Nzset a "a\0b"�ab)r,r4r3r5rrr�test_eval_null_in_resultAs

z TclTest.test_eval_null_in_resultc
Cs|j}
|�
|
�d
�
d�
dS)Nzset a "<\ud83d\udcbb>"�<💻>)r,�assertInr3r5rrr�test_eval_surrogates_in_resultEs

z&TclTest.test_eval_surrogates_in_resultc
Cs|j}
|�
t|
jd
�
dS)Nr1�r,r"rr3r5rrr�testEvalExceptionIs

zTclTest.testEvalExceptionc
Cs|j}
|�
t|
jd
�
dS)Nz
this is wrongr<r5rrr�testEvalException2Ms

zTclTest.testEvalException2c
Cs,|j}
|
�
d
dd�
|�|
�
d
d�d�
dS)Nr!rr2)r,rr4r5rrr�testCallQs


zTclTest.testCallc
Cs|j}
|�
t|
jd
d�
dS)Nr!r�r,r"rrr5rrr�testCallExceptionVs

zTclTest.testCallExceptionc
Cs|j}
|�
t|
jd
dd�
dS)N�this�isZwrongr@r5rrr�testCallException2Zs

zTclTest.testCallException2c
Cs(|j}
|
�
d
d�
|�|
�d�
d�
dS)Nrr2r1�r,�setvarr4r3r5rrr�
testSetVar^s


zTclTest.testSetVarc
Cs(|j}
|
�
d
d�
|�|
�d�
d�
dS)N�a(1)r2zset a(1)rEr5rrr�testSetVarArraycs


zTclTest.testSetVarArrayc
Cs&|j}
|
�
d
�

|�|
�d�
d�
dS)Nr0rr2�r,r3r4�getvarr5rrr�
testGetVarhs



zTclTest.testGetVarc
Cs&|j}
|
�
d
�

|�|
�d�
d�
dS)Nz
set a(1) 1rHr2rJr5rrr�testGetVarArrayms



zTclTest.testGetVarArrayc
Cs|j}
|�
t|
jd
�
dS�Nr�r,r"rrKr5rrr�testGetVarExceptionrs

zTclTest.testGetVarExceptionc
Cs|j}
|�
t|
jd
�
dS)NrHrOr5rrr�testGetVarArrayExceptionvs

z TclTest.testGetVarArrayExceptionc
CsD|j}
|
�
d
d�
|�|
�d�
d�
|
�d
�

|�|
�d�
d�
dS)Nr�
z
info exists ar2�
0�r,rFr4r3�unsetvarr5rrr�testUnsetVarzs






zTclTest.testUnsetVarc
Cst|j}
|
�
d
d�
|
�
dd�
|�|
�d�
d�
|�|
�d�
d�
|
�d
�

|�|
�d�
d�
|�|
�d�
d�
dS)	NrHrRza(2)�zinfo exists a(1)r2zinfo exists a(2)rSrTr5rrr�testUnsetVarArray�s








zTclTest.testUnsetVarArrayc
Cs|j}
|�
t|
jd
�
dSrN)r,r"rrUr5rrr�testUnsetVarException�s

zTclTest.testUnsetVarExceptionc
CsPd
}
tdkrLt
�}|dks2d|k
r.dkrLn
n|
dddd	dd	f7}
|
S)
N)	r
rR�����i���i�ll����
l����l�������)r\�r
r
)r\r]r\)r\r^ll����
rW��)�tcl_versionr)r%Zintegers�
vrrr�get_integers�s


 

zTclTest.get_integersc
	Cs0
|jj
}
|��D]l}|�|
�d
|�
|�
tdkrH|�|
�d|�
|�
|�|
�d|�dd��
|�
|�|
�d|�
|�
qtdkr�|�t|
jt	dd�
�
|�|
�d	�
d	�
|�t
|
j�
|�t
|
jd
d�
|�t
|
jd�
|�t
|
jd
�
|�t|
jd�
|�t
ttf|
jd�
|�tttf|
jd�
dS)Nz %d r[z %#o �
o�z %#x rWr_�*Z42�10s42�E@rz42u42���)
r,r-rbr4�getintr`�replacer"r�strr#�
ValueError�UnicodeEncodeError)r%r�
irrr�test_getint�s*
















�
�zTclTest.test_getintc
Cs�|jj
}
|�|
�d
�
d�
|�|
�d�
d�
|�|
�d�
d�
|�|
�d�
d�
|�t|
j�
|�t|
jdd�
|�t|
jd�
|�t|
jd	�
|�tttf|
jd
�
|�tttf|
jd�
dS)Nz 42 rgz 42.5 g@E@rez42.5rfs42.5rz42.5u42.5���)	r,r-r4�	getdoubler"r#rrkrlr5rrr�test_getdouble�s










�
�zTclTest.test_getdoublec
Cs�|jj
}
|�|
�d
�
d�
|�|
�d�
d�
|�|
�d�
d�
|�|
�d�
d�
|�t|
j�
|�t|
jd
d�
|�t|
jd�
|�t|
jd�
|�t|
jd	�
|�tttf|
jd
�
|�tttf|
jd�
dS)N�onTr2rer
Fson��?rzonuon���)	r,r-ZassertIs�
getbooleanr"r#rrkrlr5rrr�test_getboolean�s 











�
�zTclTest.test_getbooleanc
Cs�|j}
t
j}|�t
j|�
t|d
��}|�d�

Wd�
n1sD0


Y
|
�|�

|�|
�	d�
d�
|�|
�	d�
d�
|�|
�	d�
d�
dS)	N�
wzKset a 1
            set b 2
            set c [ expr $a + $b ]
            r1r2�set b�
2zset c�
3�
r,r�TESTFN_ASCII�
addCleanup�unlink�open�write�evalfiler4r3�r%r�filename�
frrr�testEvalFile�s




(



zTclTest.testEvalFilec
Cs�|j}
t
j}|�t
j|�
t|d
��}|�d�

Wd�
n1sD0


Y
|
�|�

|�|
�	d�
d�
|�|
�	d�
d�
dS)Nruz>
            set a "ab"
            set b "a\0b"
            r1r7rvryr�rrr�test_evalfile_null_in_result�s




(


z$TclTest.test_evalfile_null_in_resultc
Cs�|j}
|
�
d
d�}|�|
j
d
d|�
|
�
d
dd�
tj}|�tj|�
t|d��}|�d�

Wd�
n1sp0


Y
|
�|�

|�	|
�
d�
d�
|�	|
�
d�
d�
dS)	N�encoding�systemzutf-8�wbsM
            set a "<������>"
            set b "<\ud83d\udcbb>"
            r1r9rv)r,rr{rrzr|r}r~rr4r3)r%rr�r�r�rrr�"test_evalfile_surrogates_in_result�s






(


z*TclTest.test_evalfile_surrogates_in_resultc

CsR|j}
d
}zt
�|�

Wn$ty<
}
zWYd}~n
d}~00|�t|
j|�
dS)NZ
doesnotexists)r,�os�remove�	Exceptionr"rr)r%rr��
errr�testEvalFileException�s






zTclTest.testEvalFileExceptionc
Cs|j}
|�
t|
jd
�
dS)Nzpackage require DNEr<r5rrr�testPackageRequireException
s

z#TclTest.testPackageRequireException�win32zRequires Windowsc
Cs�tj
�tj�
}
|
d
dkr$t�d�
�
dtjd|
d|
dd�f}tj
�|�
sZt�d�
�
t	�
��*}|�d	�

t�
|d
dg�
}Wd�
n1s�0


Y
|�d|�
dS)
NrR�
:z$Absolute path should have drive partz\\%s\%s$\%sZCOMPUTERNAMEr
�zCannot connect to UNC PathZTCL_LIBRARY�-czimport tkinter; print(tkinter)stkinter)r��path�abspath�sys�
executable�unittestZSkipTest�environ�existsrZEnvironmentVarGuardZunset�
subprocess�check_outputr:)r%�fullnameZunc_name�env�stdoutrrr�testLoadWithUNC
s







�






�"zTclTest.testLoadWithUNCc
sJ
�j�
�
�
d
dd�
�
�
d
dd�
��
fdd�}
��t�
j�
��t�
jdd	�
��t�
jd
�
��t�
jd�
|
dd
�
|
dd�
|
dd�
|
dd�
|
dd�
|
dd
�
|
dd
�
|
dd�
|
dd�
|
dd�
|
dd�
|
dd �
|
d!d�
|
d"d#�
|
d$d#�
|
d%d&�
|
d'd(�
|
d)d(�
|
d*d+�
td,k�
rF|
d-td.�
�
dS)/Nr!rr�rr^cs&�
�|�
}��
||
�
��|t�
dSr+)�
exprstringr4�assertIsInstancerj��expr�expected�resultr5rr�check"
s



z&TclTest.test_exprstring.<locals>.check�8.2�+6�8.2 + 6�spamrdrS�8.2 + 6z14.2�3.1 + $az6.1�2 + "$a.$b"z5.6�4*[llength "6 2"]�
8�{word one} < "word $a"�4*2 < 7�hypot($a, 4)z5.0�5 / 4r2�5 / 4.0z1.25�$5 / ( [string length "abcd"] + 0.0 )�20.0/5.0z4.0�"0x03" > "2"�[string length "a½€"]rx�[string length "a\xbd\u20ac"]�"abc"�abcu"a½€"ua½€z
"a\xbd\u20ac"z"a\0b"r7r[�2**64�)r,rr"r#r�rr`rj�r%r�rr5r�test_exprstring
s:















































zTclTest.test_exprstringc
s2
�j�
�
�
d
dd�
�
�
d
dd�
��
fdd�}
��t�
j�
��t�
jdd	�
��t�
jd
�
��t�
jd�
|
dd
�
|
dd�
|
dd�
|
dd�
|
dd�
|
dd
�
|
dd
�
|
dd�
|
dd�
|
dd�
|
dd�
|
dd �
|
d!d�
|
d"d#�
|
d$d#�
��t�
jd%�
td&k�
r.|
d'td(�
�
dS))Nr!rr�rr^cs&�
�|�
}��
||
�
��|t�
dSr+)�
exprdoubler4r��floatr�r5rrr�E
s



z&TclTest.test_exprdouble.<locals>.checkr�r�r�r�rd�r�gffffff,@r�gffffff@r�gffffff@r�g @r�r�r�g@r�rrr�g�?r�r�g@r�r�g@r�r�r[r�r�)r,rr"r#r�rr`r�r�rr5r�test_exprdoubleA
s4








































zTclTest.test_exprdoublec
s4
�j�
�
�
d
dd�
�
�
d
dd�
��
fdd�}
��t�
j�
��t�
jdd	�
��t�
jd
�
��t�
jd�
|
dd
�
|
dd�
|
dd�
|
dd�
|
dd�
|
dd
�
|
dd
�
|
dd�
|
dd�
|
dd�
|
dd�
|
dd�
|
dd�
|
dd�
|
d d�
��t�
jd!�
td"k�
r0��t�
jd#�
dS)$Nr!rr�rr^cs&�
�|�
}��
||
�
��|t�
dSr+)�exprlongr4r�rr�r5rrr�e
s



z$TclTest.test_exprlong.<locals>.checkr�r�r�r�rdr
r��r�r�r]r�r\r�r�r�r�rRr�r�r��r�r�r�r�r[r�)r,rr"r#r�rr`r�rr5r�
test_exprlonga
s4








































zTclTest.test_exprlongc
s�
�j�
�
�
d
dd�
�
�
d
dd�
��
fdd�}
��t�
j�
��t�
jdd	�
��t�
jd
�
��t�
jd�
|
dd
�
dD]*}|
|d
�
|
d|d
�
|
d|d
�
q~dD]*}|
|d�
|
d|d�
|
d|d�
q�|
dd�
|
dd�
|
dd�
|
dd�
|
dd
�
|
dd
�
|
dd�
|
dd�
|
dd�
|
dd�
|
dd�
|
dd�
|
dd�
|
d d�
��t�
jd!�
td"k�
r�|
d#d�
dS)$Nr!rr�rr^cs2�
�|�
}��
||
�
��|t�
��|t�
dSr+)�exprbooleanr4r�rZassertNotIsInstance�boolr�r5rrr��
s




z'TclTest.test_exprboolean.<locals>.checkr�r�r�r�rdF)rS�false�no�offz"%s"z{%s})r2�true�yesrqTr�r�r�r�r�r�r�r�r�r�r�r�r�r�r�r[r�)r,rr"r#r�rr`)r%r��valuerr5r�test_exprboolean�
sD


















































zTclTest.test_exprbooleanr[zrequires Tcl version >= 8.5c
sh�j�
��
fd
d�}
|
dd�
|
dd�
|
dd�
|
dd�
|
d	d�
|
d
d�
|
dd�
|
dd�
dS)
NcsV�
�d
|�}�
�
�r.��||
�
��|t�
n$��||tt|
�
�
f�
��|t�
dS)Nr�)rr.r4r�rr:rjr�r5rrr��
s




z$TclTest.test_booleans.<locals>.checkr�Tr�rqr�Fr�r�z1 < 2z1 > 2)
r,r�rr5r�
test_booleans�
s














zTclTest.test_booleansc
Cs�|j}
|�
�D]P}|
�d
t|�
�}|jrB|�||�
|�|t�
q|�|t|�
�
|�|t�
qt�dkr�|�	t
|
jd
tdd�
�
dS)Nr�r[rWr_)r,rbrrjr.r4r�rrr"r)r%rrmr�rrr�test_expr_bignum�
s









zTclTest.test_expr_bignumc
s��f
d
d�}
��|
d�
�j
r dnd�
��|
d�
�j
r:dnd�
��|
d�
d�
��|
d�
d�
��|
d	�
d	�
��|
d
�
d
�
��|
d�
d�
��|
d�
d�
��|
d
�
d
�
tjdkrڈ�|
d�
d�
��|
d�
d�
��|
d�
�j
r�dnd
�
��|
d�
�j
�
r
dnd�
��|
d�
�j
�
r&dnd�
���D]&}��|
|�
�j
�
rN|nt|�
�
�
q4tdk�
r���|
dd�
tdd�
�
ddddtjjtjj	tjjtjj	fD]4}�j
�
rȈ�|
|�
|�
n��t
|
|�
�
|�
�
q��j
�r6|
t
d�
�
}��||�
��|
t
d �
�
t
d �
�
��|
t
d �
�
t
d �
�
n<��t
|
t
d �
�
�
t
d �
�
��t
|
t
d �
�
�
t
d �
�
��|
d!�
�j
�r�d!nd"�
��|
d#d$d%gg�
�j
�r�d&nd'�
dS)(Nc

s�j�
d
d|�S)Nr!�
_)r,r�
r�r$rr�	passValue�
s
z.TclTest.test_passing_values.<locals>.passValueTr2FrSr �	string€�
string💻�string�	string½�
string€ustring💻r��<���������>�<€>�<������������������>r9�string�str��ing�
strÀ€ingsstr�ingustr½ingr[rWr_r�rr���UUUUUU�?�nan�inf�rRrw�
�333333@z1 2 3.4rr�
c�r)rr��a {b c})r4r.r��platformrbrjr`�
float_info�min�maxr�ZassertNotEqual)r%r�rmr�rr$r�test_passing_values�
sh










�



�

�

�

�

�
$





�






 

�
�zTclTest.test_passing_valuesc
s�
d��f
d
d�}
�
j�
d|
�
�
��
jjjd�
d1�
jd�
��
fdd�}�
f
dd�}|d	d
�
|dd�
|d
�

|d�

|d�

|d�

tjdkr�|dd�
|dd�
|d�

|dd
�
|dd�
|dd�
|dd�
|d�

|d�

|d�

|dd�
|d d!�
|d"d#�
�
��D]}||t	|�
�
�
qt
d$k�
rJ|d%d&t	d%d&�
�
d'D]}||t|�
�
�
qNd(tjj
tjjtjj
tjjfD]}|||d�
�
q�|td)�
|d�
|td)�
|d�
|d*d�
|d+d,�
|d-d%g
d.d/gd0ggd,�
dS)2Nc


s|�|Sr+r)
�arg)
r�rr�testfunc�
s
z+TclTest.test_user_command.<locals>.testfuncr�)
�eqc
sN|
dur|}
d��
j�
d
|�}�
��t�
|�|
�
�
�|t�
|||
�
dS)Nr�)r,rr�rj)r�r�r��
r�r�r%rrr�s







z(TclTest.test_user_command.<locals>.checkcs �jt
|�
|
t|
�
d
d�
dS)Ng�����|�=)
Zdelta)ZassertAlmostEqualr��abs)�actualr�r$rr�float_eqs


�z+TclTest.test_user_command.<locals>.float_eqTr2FrSr ustring½r�r�r�r�r�r�r9rdsstrings	string€ustring€sstring��r�r�r�r�r�r�sstr��ing€ustrÀ€ing€r[rWr_)r�rrr�r�r�r)rR)
rW)r�r��5 6rz1 2 {3 4} {5 6} {}rRr�r�r�)
N)r,�
createcommandr{r-�
deletecommandr4r�r�rbrjr`�reprr�r�r�r�)r%r�r�r�rmr�rr�r�test_user_command�
sR












































�





zTclTest.test_user_commandc
	Cs,
|jj
j}
|jj
j}|�t|
�
|�t|
d
d�
|�t|
d�
dddddd	d
ddd
ddddddddddgdfd
ddggd
ddgff|dddd�|jr�dndfg}t�}td kr�|jr�|d!kr�d"}nd#}||d$d%d&d'd(d�|fg
7}d)|jt|f}|D]"\}}|�	|
|�
|d*||f�
q�|�t
|
d+�
dS),NrrrW)rw)
rw)rdr)�{}�
rd)�""r��z
a
 b	
 c
 �rrr��s
a
 b	
 c
 r
�ua €�r�€)ua 💻�ru💻�sa €r
)sa 💻r
)sa ������r
�s	a��b c��d)r7zcd)r��r�b c)�a b\ cr

)r

r

�za 2)rrw��rrWr
�za 3.4)r�3.4��rr�r
�rrrr��listrRrwr�r��r2rwr
r[�r\r]r]�Z12r
u€r
��r
�€r��dict�creater
r
r
z4want objects? %s, Tcl version: %s, Tk patchlevel: %sz
arg=%a, %s�
{)r,r-�	splitlistrr"r#r.rr`r4r)	r%r
r�	testcasesZ
tk_patchlevelr�Zdbg_infor��resrrr�test_splitlist7sd































��




��

�


�zTclTest.test_splitlistc
Csp
|jj
j}
|jj
j}t���H
t�d
dt�
|�t	|
�
|�t	|
dd�
|�t	|
d�
Wd�
n1sj0


Y
dddd	d
ddd
ddddddddddddddgdfddgdfdddggdf|d d!d"d#�|j
r�d$nd%fg}td&k�
r|j
r�t�d'kr�d(}nd)}||d*d+d,d-d.d#�|fg
7}|D]J\}}|�
t�
�$
|j|
|�
||d/�
Wd�
n1�
s^0


Y
�
q dS)0N�ignorez\bsplit\b.*\bsplitlist\brrrW)rwrw)rdrd)r�rd)r
rd)r
r
r

r
r
r
)sa��br7r	
)s
{a��b c��dz{ab cd)r�r�)r
r�))rsb cr�)r

r�r

r
r
r
)�r)rWr�r$
r
rr
r�r�r
rRrwr�r�r
r[r
r
r
r
r
r
r
r
)
�msg)r,r-�splitr�warnings�catch_warnings�filterwarnings�DeprecationWarningr"r#r.r`rZassertWarnsr4)r%r&
rr 
r�r�r!
rrr�
test_splitjsf







�

,




























��




��

zTclTest.test_splitc

CsB
tj
}
|jj}d
}|�|
||d�dddd��
|�|
||�dddd��
d}|�|
||d�d	dd
d��
|�|
||�d	dd
d��
|�t|
|d�
|�t|
|d�
|�d
dd	dddd�}|�|
||�|jr�d	ndddd��
t	dk�
r>|�dddd	dddd�}|j�
rt
�dk�
r dddd�}nd	ddd�}|�|
||�|�
dS)Nz#-a {1 2 3} -something foo status {}Fz1 2 3�foord)�-a�
-something�status)rZ	somethingr/
)r-
�rRrWr�r.
r,
r/
r�r0
r�z-a b -c )r-
rr�r
r-
r.
r/
rr[r
r
r
)�tkinterZ
_splitdictr,r-r4r"�RuntimeErrorrr.r`r)r%Z	splitdictrr�r�rrr�test_splitdict�sD




�

�


�

�

�

��


�
zTclTest.test_splitdictc
s�tj
��
jj��f
d
d����
�fdd�}
|
d�

|
d�

|
d�

|
d�

|
d	�

|
d
�

|
d�

|
d�

|
d
�

|
d�

|
d�

|
d�

|
d�

|
d�

|
d�

|
d�

|
d�

|
d�

|
d�

|
d�

|
d�

|
d�

|
d�

|
d�

dS)Nc

s��d
|d�S)NZlindexr
)
r)
�
s�
rrr�unpack�s
z!TclTest.test_join.<locals>.unpackc

s��
���|g
�
�
|�
�
���|d
g�
�
|�
�
����|g
g
�
�
�
|�
�
����|d
gg
�
�
�
|�
�
����|g
d
g�
�
�
|�
�
����|d
gd
g�
�
�
|�
dS)Nr
)
r4r�)�joinr%r6
rrr��s





z TclTest.test_join.<locals>.checkrdr�zsp amzsp	amzsp
amz 	
z{spam}z{sp am}z"spam"z"sp am"z{"spam"}z"{spam}"zsp\amz"sp\am"z	"{}" "{}"z"\z"{z"}z
\z
{z
}z\
z{
z}
)r1
Z_joinr,r-r�r)r7
r%rr6
r�	test_join�s8

























zTclTest.test_joinc

Cs|�t
tj�
dSr+)r"r#rZTcl_Objr$rrr�test_new_tcl_obj�s
zTclTest.test_new_tcl_objN)1r'r(r)r/r6r8r;r=r>r?rArDrGrIrLrMrPrQrVrXrYrbrnrprtr�r�r�r�r�r��
skipUnlessr�r�r�r�r�r�r�r`r�r�r�r�r"
r+
r3
r8
r9
rrrrr*6sV

	

#  )


2:35#%r*c@s�eZ
dZd
d�Zeje�ee	kd�ej
edddd�dd	��
�
�
Zeje�ee	kd�ej
edd
dd�dd��
�
�
Zeje�ee	kd�ej
edd
dd�dd��
�
�
Z
dS)�
BigmemTclTestc

Cst�|_
dSr+)rr,r$rrrr/�s
zBigmemTclTest.setUpzneeds UINT_MAX < SIZE_MAXrRr]F)�sizeZmemuse�dry_runcCs$d
|
}|�t
|jjdd|d�
dS)N�
 r �indexr
)r"�
OverflowErrorr,r)r%r<
r�rrr�test_huge_string_call�s
z#BigmemTclTest.test_huge_string_callrWcCsT
|jj
}d
d|
}|�t|j|�
|�t|j|�
|�t|j|�
|�t|j|�
|�t|j|�
|�t|j	|�
|�t|j
|�
|�t|j|dd�
|�t|jd|d�
|�t|j|�
|�t|jd|�
|�t|j
|�
|�t|j
|�
|�t|j|�
|�t|j|�
|�t|j|�
|�t|j|�
|�t|j|t�
|�t|j|�
dS)Nr2r>
�
xr)r,r-r"r@
rhrorsr3r�recordZadderrorinforFrUr�r�r�r
r&
r�r�r��r%r<
r-r�rrr�test_huge_string_builtins�s*



















z'BigmemTclTest.test_huge_string_builtinsr^cCsJ|jj
}d
d|
}|�t|j|�
|�t|j|�
|�t|jd|�
dS)Nr2r>
rB
)r,r-r"r@
rrUrD
rrr�test_huge_string_builtins2s




z(BigmemTclTest.test_huge_string_builtins2N)r'r(r)r/rZcpython_onlyr�r:
rrZ
bigmemtestrA
rE
rF
rrrrr;
�s








r;
c
Cs"tj
rt�}td
|�dd��
dS)Nzpatchlevel =r	r
)r�verboser�printrr5
rrr�setUpModules


rI
�__main__)"r��localerr�r�r�r'
�testr�
import_modulerr1
rrZ	_testcapirr�ImportError�maxsize�tuple�maprZTCL_VERSIONr&
r`rrZTestCaserr*r;
rI
r'�mainrrrr�<module>
s:














92