1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409 |
- smalltalk.addClass('TabManager', smalltalk.Widget, ['selectedTab', 'tabs', 'opened', 'ul', 'input'], 'IDE');
- smalltalk.addMethod(
- '_tabs',
- smalltalk.method({
- selector: 'tabs',
- fn: function (){
- var self=this;
- return (($receiver = self['@tabs']) == nil || $receiver == undefined) ? (function(){return self['@tabs']=smalltalk.send((smalltalk.Array || Array), "_new", []);})() : $receiver;
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_labelFor_',
- smalltalk.method({
- selector: 'labelFor:',
- fn: function (aWidget){
- var self=this;
- var label=nil;
- var maxSize=nil;
- maxSize=(15);
- label=smalltalk.send(smalltalk.send(aWidget, "_label", []), "_copyFrom_to_", [(0), smalltalk.send(smalltalk.send(smalltalk.send(aWidget, "_label", []), "_size", []), "_min_", [maxSize])]);
- (($receiver = (($receiver = smalltalk.send(smalltalk.send(aWidget, "_label", []), "_size", [])).klass === smalltalk.Number) ? $receiver >maxSize : smalltalk.send($receiver, "__gt", [maxSize])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return label=smalltalk.send(label, "__comma", ["..."]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return label=smalltalk.send(label, "__comma", ["..."]);})]);
- return label;
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_updateBodyMargin',
- smalltalk.method({
- selector: 'updateBodyMargin',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_setBodyMargin_", [smalltalk.send(smalltalk.send(unescape("%23jtalk"), "_asJQuery", []), "_height", [])]);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_updatePosition',
- smalltalk.method({
- selector: 'updatePosition',
- fn: function (){
- var self=this;
- jQuery('#jtalk').css('top', '').css('bottom', '0px');
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_removeBodyMargin',
- smalltalk.method({
- selector: 'removeBodyMargin',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_setBodyMargin_", [(0)]);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_setBodyMargin_',
- smalltalk.method({
- selector: 'setBodyMargin:',
- fn: function (anInteger){
- var self=this;
- smalltalk.send(smalltalk.send(".jtalkBody", "_asJQuery", []), "_cssAt_put_", [unescape("margin-bottom"), smalltalk.send(smalltalk.send(anInteger, "_asString", []), "__comma", ["px"])]);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_onResize_',
- smalltalk.method({
- selector: 'onResize:',
- fn: function (aBlock){
- var self=this;
- jQuery('#jtalk').resizable({
- handles: 'n',
- resize: aBlock,
- minHeight: 230
- });
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_onWindowResize_',
- smalltalk.method({
- selector: 'onWindowResize:',
- fn: function (aBlock){
- var self=this;
- jQuery(window).resize(aBlock);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_open',
- smalltalk.method({
- selector: 'open',
- fn: function (){
- var self=this;
- (($receiver = self['@opened']).klass === smalltalk.Boolean) ? (! $receiver ? (function(){smalltalk.send(smalltalk.send("body", "_asJQuery", []), "_addClass_", ["jtalkBody"]);smalltalk.send(smalltalk.send(unescape("%23jtalk"), "_asJQuery", []), "_show", []);smalltalk.send(smalltalk.send(self['@ul'], "_asJQuery", []), "_show", []);smalltalk.send(self, "_updateBodyMargin", []);smalltalk.send(self['@selectedTab'], "_show", []);return self['@opened']=true;})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){smalltalk.send(smalltalk.send("body", "_asJQuery", []), "_addClass_", ["jtalkBody"]);smalltalk.send(smalltalk.send(unescape("%23jtalk"), "_asJQuery", []), "_show", []);smalltalk.send(smalltalk.send(self['@ul'], "_asJQuery", []), "_show", []);smalltalk.send(self, "_updateBodyMargin", []);smalltalk.send(self['@selectedTab'], "_show", []);return self['@opened']=true;})]);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_close',
- smalltalk.method({
- selector: 'close',
- fn: function (){
- var self=this;
- (($receiver = self['@opened']).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(smalltalk.send(unescape("%23jtalk"), "_asJQuery", []), "_hide", []);smalltalk.send(smalltalk.send(self['@ul'], "_asJQuery", []), "_hide", []);smalltalk.send(self['@selectedTab'], "_hide", []);smalltalk.send(self, "_removeBodyMargin", []);smalltalk.send(smalltalk.send("body", "_asJQuery", []), "_removeClass_", ["jtalkBody"]);return self['@opened']=false;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(smalltalk.send(unescape("%23jtalk"), "_asJQuery", []), "_hide", []);smalltalk.send(smalltalk.send(self['@ul'], "_asJQuery", []), "_hide", []);smalltalk.send(self['@selectedTab'], "_hide", []);smalltalk.send(self, "_removeBodyMargin", []);smalltalk.send(smalltalk.send("body", "_asJQuery", []), "_removeClass_", ["jtalkBody"]);return self['@opened']=false;})]);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_newBrowserTab',
- smalltalk.method({
- selector: 'newBrowserTab',
- fn: function (){
- var self=this;
- smalltalk.send((smalltalk.Browser || Browser), "_open", []);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_selectTab_',
- smalltalk.method({
- selector: 'selectTab:',
- fn: function (aWidget){
- var self=this;
- smalltalk.send(self, "_open", []);
- self['@selectedTab']=aWidget;
- smalltalk.send(smalltalk.send(self, "_tabs", []), "_do_", [(function(each){return smalltalk.send(each, "_hide", []);})]);
- smalltalk.send(aWidget, "_show", []);
- smalltalk.send(self, "_update", []);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_closeTab_',
- smalltalk.method({
- selector: 'closeTab:',
- fn: function (aWidget){
- var self=this;
- smalltalk.send(self, "_removeTab_", [aWidget]);
- smalltalk.send(self, "_selectTab_", [smalltalk.send(smalltalk.send(self, "_tabs", []), "_last", [])]);
- smalltalk.send(aWidget, "_remove", []);
- smalltalk.send(self, "_update", []);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_search_',
- smalltalk.method({
- selector: 'search:',
- fn: function (aString){
- var self=this;
- var searchedClass=nil;
- searchedClass=smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_at_", [aString]);
- (($receiver = smalltalk.send(searchedClass, "_isClass", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send((smalltalk.Browser || Browser), "_openOn_", [searchedClass]);})() : (function(){return smalltalk.send((smalltalk.ReferencesBrowser || ReferencesBrowser), "_search_", [aString]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send((smalltalk.Browser || Browser), "_openOn_", [searchedClass]);}), (function(){return smalltalk.send((smalltalk.ReferencesBrowser || ReferencesBrowser), "_search_", [aString]);})]);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_addTab_',
- smalltalk.method({
- selector: 'addTab:',
- fn: function (aWidget){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_tabs", []), "_add_", [aWidget]);
- smalltalk.send(smalltalk.send(unescape("%23jtalk"), "_asJQuery", []), "_append_", [aWidget]);
- smalltalk.send(aWidget, "_hide", []);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_removeTab_',
- smalltalk.method({
- selector: 'removeTab:',
- fn: function (aWidget){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_tabs", []), "_remove_", [aWidget]);
- smalltalk.send(self, "_update", []);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_initialize',
- smalltalk.method({
- selector: 'initialize',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_initialize", [], smalltalk.Widget);
- self['@opened']=true;
- (function($rec){smalltalk.send($rec, "_append_", [(function(html){return smalltalk.send(smalltalk.send(html, "_div", []), "_id_", ["jtalk"]);})]);return smalltalk.send($rec, "_addClass_", ["jtalkBody"]);})(smalltalk.send("body", "_asJQuery", []));
- smalltalk.send(smalltalk.send(unescape("%23jtalk"), "_asJQuery", []), "_append_", [self]);
- (function($rec){smalltalk.send($rec, "_addTab_", [smalltalk.send((smalltalk.Transcript || Transcript), "_current", [])]);smalltalk.send($rec, "_addTab_", [smalltalk.send((smalltalk.Workspace || Workspace), "_new", [])]);return smalltalk.send($rec, "_addTab_", [smalltalk.send((smalltalk.TestRunner || TestRunner), "_new", [])]);})(self);
- smalltalk.send(self, "_selectTab_", [smalltalk.send(smalltalk.send(self, "_tabs", []), "_last", [])]);
- (function($rec){smalltalk.send($rec, "_onResize_", [(function(){return (function($rec){smalltalk.send($rec, "_updateBodyMargin", []);return smalltalk.send($rec, "_updatePosition", []);})(self);})]);return smalltalk.send($rec, "_onWindowResize_", [(function(){return smalltalk.send(self, "_updatePosition", []);})]);})(self);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_renderOn_',
- smalltalk.method({
- selector: 'renderOn:',
- fn: function (html){
- var self=this;
- smalltalk.send(smalltalk.send(html, "_div", []), "_id_", ["logo"]);
- smalltalk.send(self, "_renderToolbarOn_", [html]);
- self['@ul']=(function($rec){smalltalk.send($rec, "_id_", ["jtalkTabs"]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(html, "_ul", []));
- smalltalk.send(self, "_renderTabs", []);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_renderTabFor_on_',
- smalltalk.method({
- selector: 'renderTabFor:on:',
- fn: function (aWidget, html){
- var self=this;
- var li=nil;
- li=smalltalk.send(html, "_li", []);
- (($receiver = smalltalk.send(self['@selectedTab'], "__eq", [aWidget])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);
- (function($rec){smalltalk.send($rec, "_with_", [(function(){smalltalk.send(smalltalk.send(html, "_span", []), "_class_", ["ltab"]);(function($rec){smalltalk.send($rec, "_class_", ["mtab"]);return smalltalk.send($rec, "_with_", [(function(){(($receiver = smalltalk.send(aWidget, "_canBeClosed", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function($rec){smalltalk.send($rec, "_class_", ["close"]);smalltalk.send($rec, "_with_", ["x"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_closeTab_", [aWidget]);})]);})(smalltalk.send(html, "_span", []));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return (function($rec){smalltalk.send($rec, "_class_", ["close"]);smalltalk.send($rec, "_with_", ["x"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_closeTab_", [aWidget]);})]);})(smalltalk.send(html, "_span", []));})]);return smalltalk.send(smalltalk.send(html, "_span", []), "_with_", [smalltalk.send(self, "_labelFor_", [aWidget])]);})]);})(smalltalk.send(html, "_span", []));return smalltalk.send(smalltalk.send(html, "_span", []), "_class_", ["rtab"]);})]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectTab_", [aWidget]);})]);})(li);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_renderTabs',
- smalltalk.method({
- selector: 'renderTabs',
- fn: function (){
- var self=this;
- smalltalk.send(self['@ul'], "_contents_", [(function(html){smalltalk.send(smalltalk.send(self, "_tabs", []), "_do_", [(function(each){return smalltalk.send(self, "_renderTabFor_on_", [each, html]);})]);return (function($rec){smalltalk.send($rec, "_class_", ["newtab"]);smalltalk.send($rec, "_with_", [(function(){smalltalk.send(smalltalk.send(html, "_span", []), "_class_", ["ltab"]);(function($rec){smalltalk.send($rec, "_class_", ["mtab"]);return smalltalk.send($rec, "_with_", [unescape("%20+%20")]);})(smalltalk.send(html, "_span", []));return smalltalk.send(smalltalk.send(html, "_span", []), "_class_", ["rtab"]);})]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_newBrowserTab", []);})]);})(smalltalk.send(html, "_li", []));})]);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_renderToolbarOn_',
- smalltalk.method({
- selector: 'renderToolbarOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_id_", ["jt_toolbar"]);return smalltalk.send($rec, "_with_", [(function(){self['@input']=(function($rec){smalltalk.send($rec, "_class_", ["implementors"]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(html, "_input", []));smalltalk.send(self['@input'], "_onKeyPress_", [(function(event){return (($receiver = smalltalk.send(smalltalk.send(event, "_keyCode", []), "__eq", [(13)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_search_", [smalltalk.send(smalltalk.send(self['@input'], "_asJQuery", []), "_val", [])]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(self, "_search_", [smalltalk.send(smalltalk.send(self['@input'], "_asJQuery", []), "_val", [])]);})]);})]);return (function($rec){smalltalk.send($rec, "_id_", ["jt_close"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_close", []);})]);})(smalltalk.send(html, "_div", []));})]);})(smalltalk.send(html, "_div", []));
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.addMethod(
- '_update',
- smalltalk.method({
- selector: 'update',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_renderTabs", []);
- return self;}
- }),
- smalltalk.TabManager);
- smalltalk.TabManager.klass.iVarNames = ['current'];
- smalltalk.addMethod(
- '_current',
- smalltalk.method({
- selector: 'current',
- fn: function (){
- var self=this;
- return (($receiver = self['@current']) == nil || $receiver == undefined) ? (function(){return self['@current']=smalltalk.send(self, "_new", [], smalltalk.Widget.klass);})() : $receiver;
- return self;}
- }),
- smalltalk.TabManager.klass);
- smalltalk.addMethod(
- '_new',
- smalltalk.method({
- selector: 'new',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_shouldNotImplement", []);
- return self;}
- }),
- smalltalk.TabManager.klass);
- smalltalk.addClass('TabWidget', smalltalk.Widget, ['div'], 'IDE');
- smalltalk.addMethod(
- '_label',
- smalltalk.method({
- selector: 'label',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_subclassResponsibility", []);
- return self;}
- }),
- smalltalk.TabWidget);
- smalltalk.addMethod(
- '_open',
- smalltalk.method({
- selector: 'open',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send((smalltalk.TabManager || TabManager), "_current", []), "_addTab_", [self]);
- smalltalk.send(smalltalk.send((smalltalk.TabManager || TabManager), "_current", []), "_selectTab_", [self]);
- return self;}
- }),
- smalltalk.TabWidget);
- smalltalk.addMethod(
- '_show',
- smalltalk.method({
- selector: 'show',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self['@div'], "_asJQuery", []), "_show", []);
- return self;}
- }),
- smalltalk.TabWidget);
- smalltalk.addMethod(
- '_hide',
- smalltalk.method({
- selector: 'hide',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self['@div'], "_asJQuery", []), "_hide", []);
- return self;}
- }),
- smalltalk.TabWidget);
- smalltalk.addMethod(
- '_remove',
- smalltalk.method({
- selector: 'remove',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self['@div'], "_asJQuery", []), "_remove", []);
- return self;}
- }),
- smalltalk.TabWidget);
- smalltalk.addMethod(
- '_close',
- smalltalk.method({
- selector: 'close',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send((smalltalk.TabManager || TabManager), "_current", []), "_closeTab_", [self]);
- return self;}
- }),
- smalltalk.TabWidget);
- smalltalk.addMethod(
- '_renderOn_',
- smalltalk.method({
- selector: 'renderOn:',
- fn: function (html){
- var self=this;
- self['@div']=(function($rec){smalltalk.send($rec, "_class_", ["jtalkTool"]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(html, "_div", []));
- smalltalk.send(self, "_renderTab", []);
- return self;}
- }),
- smalltalk.TabWidget);
- smalltalk.addMethod(
- '_renderBoxOn_',
- smalltalk.method({
- selector: 'renderBoxOn:',
- fn: function (html){
- var self=this;
- return self;}
- }),
- smalltalk.TabWidget);
- smalltalk.addMethod(
- '_renderButtonsOn_',
- smalltalk.method({
- selector: 'renderButtonsOn:',
- fn: function (html){
- var self=this;
- return self;}
- }),
- smalltalk.TabWidget);
- smalltalk.addMethod(
- '_update',
- smalltalk.method({
- selector: 'update',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_renderTab", []);
- return self;}
- }),
- smalltalk.TabWidget);
- smalltalk.addMethod(
- '_renderTab',
- smalltalk.method({
- selector: 'renderTab',
- fn: function (){
- var self=this;
- smalltalk.send(self['@div'], "_contents_", [(function(html){(function($rec){smalltalk.send($rec, "_class_", ["jt_box"]);return smalltalk.send($rec, "_with_", [(function(){return smalltalk.send(self, "_renderBoxOn_", [html]);})]);})(smalltalk.send(html, "_div", []));return (function($rec){smalltalk.send($rec, "_class_", ["jt_buttons"]);return smalltalk.send($rec, "_with_", [(function(){return smalltalk.send(self, "_renderButtonsOn_", [html]);})]);})(smalltalk.send(html, "_div", []));})]);
- return self;}
- }),
- smalltalk.TabWidget);
- smalltalk.addMethod(
- '_canBeClosed',
- smalltalk.method({
- selector: 'canBeClosed',
- fn: function (){
- var self=this;
- return false;
- return self;}
- }),
- smalltalk.TabWidget);
- smalltalk.addMethod(
- '_open',
- smalltalk.method({
- selector: 'open',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_new", []), "_open", []);
- return self;}
- }),
- smalltalk.TabWidget.klass);
- smalltalk.addClass('Workspace', smalltalk.TabWidget, ['sourceArea'], 'IDE');
- smalltalk.addMethod(
- '_label',
- smalltalk.method({
- selector: 'label',
- fn: function (){
- var self=this;
- return "Workspace";
- return self;}
- }),
- smalltalk.Workspace);
- smalltalk.addMethod(
- '_clearWorkspace',
- smalltalk.method({
- selector: 'clearWorkspace',
- fn: function (){
- var self=this;
- smalltalk.send(self['@sourceArea'], "_clear", []);
- return self;}
- }),
- smalltalk.Workspace);
- smalltalk.addMethod(
- '_doIt',
- smalltalk.method({
- selector: 'doIt',
- fn: function (){
- var self=this;
- smalltalk.send(self['@sourceArea'], "_doIt", []);
- return self;}
- }),
- smalltalk.Workspace);
- smalltalk.addMethod(
- '_printIt',
- smalltalk.method({
- selector: 'printIt',
- fn: function (){
- var self=this;
- smalltalk.send(self['@sourceArea'], "_printIt", []);
- return self;}
- }),
- smalltalk.Workspace);
- smalltalk.addMethod(
- '_inspectIt',
- smalltalk.method({
- selector: 'inspectIt',
- fn: function (){
- var self=this;
- smalltalk.send(self['@sourceArea'], "_inspectIt", []);
- return self;}
- }),
- smalltalk.Workspace);
- smalltalk.addMethod(
- '_fileIn',
- smalltalk.method({
- selector: 'fileIn',
- fn: function (){
- var self=this;
- smalltalk.send(self['@sourceArea'], "_fileIn", []);
- return self;}
- }),
- smalltalk.Workspace);
- smalltalk.addMethod(
- '_renderBoxOn_',
- smalltalk.method({
- selector: 'renderBoxOn:',
- fn: function (html){
- var self=this;
- self['@sourceArea']=smalltalk.send((smalltalk.SourceArea || SourceArea), "_new", []);
- smalltalk.send(self['@sourceArea'], "_renderOn_", [html]);
- return self;}
- }),
- smalltalk.Workspace);
- smalltalk.addMethod(
- '_renderButtonsOn_',
- smalltalk.method({
- selector: 'renderButtonsOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_with_", ["DoIt"]);smalltalk.send($rec, "_title_", [unescape("ctrl+d")]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_doIt", []);})]);})(smalltalk.send(html, "_button", []));
- (function($rec){smalltalk.send($rec, "_with_", ["PrintIt"]);smalltalk.send($rec, "_title_", [unescape("ctrl+p")]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_printIt", []);})]);})(smalltalk.send(html, "_button", []));
- (function($rec){smalltalk.send($rec, "_with_", ["InspectIt"]);smalltalk.send($rec, "_title_", [unescape("ctrl+i")]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_inspectIt", []);})]);})(smalltalk.send(html, "_button", []));
- (function($rec){smalltalk.send($rec, "_with_", ["FileIn"]);smalltalk.send($rec, "_title_", [unescape("ctrl+f")]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_fileIn", []);})]);})(smalltalk.send(html, "_button", []));
- (function($rec){smalltalk.send($rec, "_with_", ["Clear workspace"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_clearWorkspace", []);})]);})(smalltalk.send(html, "_button", []));
- return self;}
- }),
- smalltalk.Workspace);
- smalltalk.addClass('Transcript', smalltalk.TabWidget, ['textarea'], 'IDE');
- smalltalk.addMethod(
- '_label',
- smalltalk.method({
- selector: 'label',
- fn: function (){
- var self=this;
- return "Transcript";
- return self;}
- }),
- smalltalk.Transcript);
- smalltalk.addMethod(
- '_show_',
- smalltalk.method({
- selector: 'show:',
- fn: function (anObject){
- var self=this;
- smalltalk.send(smalltalk.send(self['@textarea'], "_asJQuery", []), "_val_", [smalltalk.send(smalltalk.send(smalltalk.send(self['@textarea'], "_asJQuery", []), "_val", []), "__comma", [smalltalk.send(anObject, "_asString", [])])]);
- return self;}
- }),
- smalltalk.Transcript);
- smalltalk.addMethod(
- '_cr',
- smalltalk.method({
- selector: 'cr',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self['@textarea'], "_asJQuery", []), "_val_", [smalltalk.send(smalltalk.send(smalltalk.send(self['@textarea'], "_asJQuery", []), "_val", []), "__comma", [smalltalk.send((smalltalk.String || String), "_cr", [])])]);
- return self;}
- }),
- smalltalk.Transcript);
- smalltalk.addMethod(
- '_clear',
- smalltalk.method({
- selector: 'clear',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self['@textarea'], "_asJQuery", []), "_val_", [""]);
- return self;}
- }),
- smalltalk.Transcript);
- smalltalk.addMethod(
- '_renderBoxOn_',
- smalltalk.method({
- selector: 'renderBoxOn:',
- fn: function (html){
- var self=this;
- self['@textarea']=smalltalk.send(html, "_textarea", []);
- smalltalk.send(smalltalk.send(self['@textarea'], "_asJQuery", []), "_call_", ["tabby"]);
- (function($rec){smalltalk.send($rec, "_class_", ["jt_transcript"]);return smalltalk.send($rec, "_at_put_", ["spellcheck", "false"]);})(self['@textarea']);
- return self;}
- }),
- smalltalk.Transcript);
- smalltalk.addMethod(
- '_renderButtonsOn_',
- smalltalk.method({
- selector: 'renderButtonsOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_with_", ["Clear transcript"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_clear", []);})]);})(smalltalk.send(html, "_button", []));
- return self;}
- }),
- smalltalk.Transcript);
- smalltalk.Transcript.klass.iVarNames = ['current'];
- smalltalk.addMethod(
- '_open',
- smalltalk.method({
- selector: 'open',
- fn: function (){
- var self=this;
- (function($rec){smalltalk.send($rec, "_open", []);return smalltalk.send($rec, "_selectTab_", [smalltalk.send(self, "_current", [])]);})(smalltalk.send((smalltalk.TabManager || TabManager), "_current", []));
- return self;}
- }),
- smalltalk.Transcript.klass);
- smalltalk.addMethod(
- '_new',
- smalltalk.method({
- selector: 'new',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_shouldNotImplement", []);
- return self;}
- }),
- smalltalk.Transcript.klass);
- smalltalk.addMethod(
- '_current',
- smalltalk.method({
- selector: 'current',
- fn: function (){
- var self=this;
- return (($receiver = self['@current']) == nil || $receiver == undefined) ? (function(){return self['@current']=smalltalk.send(self, "_new", [], smalltalk.TabWidget.klass);})() : $receiver;
- return self;}
- }),
- smalltalk.Transcript.klass);
- smalltalk.addMethod(
- '_show_',
- smalltalk.method({
- selector: 'show:',
- fn: function (anObject){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_current", []), "_show_", [anObject]);
- return self;}
- }),
- smalltalk.Transcript.klass);
- smalltalk.addMethod(
- '_cr',
- smalltalk.method({
- selector: 'cr',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_current", []), "_show_", [smalltalk.send((smalltalk.String || String), "_cr", [])]);
- return self;}
- }),
- smalltalk.Transcript.klass);
- smalltalk.addMethod(
- '_clear',
- smalltalk.method({
- selector: 'clear',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_current", []), "_clear", []);
- return self;}
- }),
- smalltalk.Transcript.klass);
- smalltalk.addClass('Browser', smalltalk.TabWidget, ['selectedPackage', 'selectedClass', 'selectedProtocol', 'selectedMethod', 'commitButton', 'packagesList', 'classesList', 'protocolsList', 'methodsList', 'sourceArea', 'tabsList', 'selectedTab', 'saveButton', 'classButtons', 'methodButtons', 'unsavedChanges', 'renameButton', 'deleteButton'], 'IDE');
- smalltalk.addMethod(
- '_label',
- smalltalk.method({
- selector: 'label',
- fn: function (){
- var self=this;
- return (($receiver = self['@selectedClass']) == nil || $receiver == undefined) ? (function(){return unescape("Browser%20%28nil%29");})() : (function(){return smalltalk.send("Browser: ", "__comma", [smalltalk.send(self['@selectedClass'], "_name", [])]);})();
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_packages',
- smalltalk.method({
- selector: 'packages',
- fn: function (){
- var self=this;
- var packages=nil;
- packages=smalltalk.send((smalltalk.Array || Array), "_new", []);
- smalltalk.send(smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_classes", []), "_do_", [(function(each){return (($receiver = smalltalk.send(packages, "_includes_", [smalltalk.send(each, "_category", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(packages, "_add_", [smalltalk.send(each, "_category", [])]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(packages, "_add_", [smalltalk.send(each, "_category", [])]);})]);})]);
- return smalltalk.send(packages, "_sort", []);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_classes',
- smalltalk.method({
- selector: 'classes',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_classes", []), "_select_", [(function(each){return smalltalk.send(smalltalk.send(each, "_category", []), "__eq", [self['@selectedPackage']]);})]), "_sort_", [(function(a, b){return (($receiver = smalltalk.send(a, "_name", [])).klass === smalltalk.Number) ? $receiver <smalltalk.send(b, "_name", []) : smalltalk.send($receiver, "__lt", [smalltalk.send(b, "_name", [])]);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_protocols',
- smalltalk.method({
- selector: 'protocols',
- fn: function (){
- var self=this;
- try{var klass=nil;
- (($receiver = self['@selectedClass']) != nil && $receiver != undefined) ? (function(){(($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["comment"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '_protocols', fn: function(){return []}})})();})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return (function(){throw({name: 'stReturn', selector: '_protocols', fn: function(){return []}})})();})]);klass=(($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["instance"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return self['@selectedClass'];})() : (function(){return smalltalk.send(self['@selectedClass'], "_class", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return self['@selectedClass'];}), (function(){return smalltalk.send(self['@selectedClass'], "_class", []);})]);(($receiver = smalltalk.send(smalltalk.send(klass, "_methodDictionary", []), "_isEmpty", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '_protocols', fn: function(){return smalltalk.send((smalltalk.Array || Array), "_with_", ["not yet classified"])}})})();})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return (function(){throw({name: 'stReturn', selector: '_protocols', fn: function(){return smalltalk.send((smalltalk.Array || Array), "_with_", ["not yet classified"])}})})();})]);return (function(){throw({name: 'stReturn', selector: '_protocols', fn: function(){return smalltalk.send(klass, "_protocols", [])}})})();})() : nil;
- (function(){throw({name: 'stReturn', selector: '_protocols', fn: function(){return smalltalk.send((smalltalk.Array || Array), "_new", [])}})})();
- return self;
- } catch(e) {if(e.name === 'stReturn' && e.selector === '_protocols'){return e.fn()} throw(e)}}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_methods',
- smalltalk.method({
- selector: 'methods',
- fn: function (){
- var self=this;
- try{var klass=nil;
- (($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["comment"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '_methods', fn: function(){return []}})})();})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return (function(){throw({name: 'stReturn', selector: '_methods', fn: function(){return []}})})();})]);
- (($receiver = self['@selectedClass']) != nil && $receiver != undefined) ? (function(){return klass=(($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["instance"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return self['@selectedClass'];})() : (function(){return smalltalk.send(self['@selectedClass'], "_class", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return self['@selectedClass'];}), (function(){return smalltalk.send(self['@selectedClass'], "_class", []);})]);})() : nil;
- (function(){throw({name: 'stReturn', selector: '_methods', fn: function(){return smalltalk.send((($receiver = self['@selectedProtocol']) == nil || $receiver == undefined) ? (function(){return (($receiver = klass) == nil || $receiver == undefined) ? (function(){return [];})() : (function(){return smalltalk.send(smalltalk.send(klass, "_methodDictionary", []), "_values", []);})();})() : (function(){return smalltalk.send(smalltalk.send(smalltalk.send(klass, "_methodDictionary", []), "_values", []), "_select_", [(function(each){return smalltalk.send(smalltalk.send(each, "_category", []), "__eq", [self['@selectedProtocol']]);})]);})(), "_sort_", [(function(a, b){return (($receiver = smalltalk.send(a, "_selector", [])).klass === smalltalk.Number) ? $receiver <smalltalk.send(b, "_selector", []) : smalltalk.send($receiver, "__lt", [smalltalk.send(b, "_selector", [])]);})])}})})();
- return self;
- } catch(e) {if(e.name === 'stReturn' && e.selector === '_methods'){return e.fn()} throw(e)}}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_source',
- smalltalk.method({
- selector: 'source',
- fn: function (){
- var self=this;
- try{(($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["comment"])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '_source', fn: function(){return (($receiver = smalltalk.send(smalltalk.send(self['@selectedProtocol'], "_notNil", []), "_or_", [(function(){return smalltalk.send(self['@selectedMethod'], "_notNil", []);})])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_declarationSource", []);})() : (function(){return smalltalk.send(self, "_methodSource", []);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(self, "_declarationSource", []);}), (function(){return smalltalk.send(self, "_methodSource", []);})])}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '_source', fn: function(){return (($receiver = smalltalk.send(smalltalk.send(self['@selectedProtocol'], "_notNil", []), "_or_", [(function(){return smalltalk.send(self['@selectedMethod'], "_notNil", []);})])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_declarationSource", []);})() : (function(){return smalltalk.send(self, "_methodSource", []);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(self, "_declarationSource", []);}), (function(){return smalltalk.send(self, "_methodSource", []);})])}})})();})]);
- (function(){throw({name: 'stReturn', selector: '_source', fn: function(){return (($receiver = self['@selectedClass']) == nil || $receiver == undefined) ? (function(){return "";})() : (function(){return smalltalk.send(self, "_classCommentSource", []);})()}})})();
- return self;
- } catch(e) {if(e.name === 'stReturn' && e.selector === '_source'){return e.fn()} throw(e)}}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_methodSource',
- smalltalk.method({
- selector: 'methodSource',
- fn: function (){
- var self=this;
- return (($receiver = self['@selectedMethod']) == nil || $receiver == undefined) ? (function(){return smalltalk.send(self, "_dummyMethodSource", []);})() : (function(){return smalltalk.send(self['@selectedMethod'], "_source", []);})();
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_dummyMethodSource',
- smalltalk.method({
- selector: 'dummyMethodSource',
- fn: function (){
- var self=this;
- return unescape("messageSelectorAndArgumentNames%0A%09%22comment%20stating%20purpose%20of%20message%22%0A%0A%09%7C%20temporary%20variable%20names%20%7C%0A%09statements");
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_declarationSource',
- smalltalk.method({
- selector: 'declarationSource',
- fn: function (){
- var self=this;
- return (($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["instance"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_classDeclarationSource", []);})() : (function(){return smalltalk.send(self, "_metaclassDeclarationSource", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self, "_classDeclarationSource", []);}), (function(){return smalltalk.send(self, "_metaclassDeclarationSource", []);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_classDeclarationSource',
- smalltalk.method({
- selector: 'classDeclarationSource',
- fn: function (){
- var self=this;
- var stream=nil;
- stream=smalltalk.send("", "_writeStream", []);
- (($receiver = self['@selectedClass']) != nil && $receiver != undefined) ? (function(){(function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(self['@selectedClass'], "_superclass", []), "_asString", [])]);smalltalk.send($rec, "_nextPutAll_", [unescape("%20subclass%3A%20%23")]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self['@selectedClass'], "_name", [])]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send((smalltalk.String || String), "_lf", []), "__comma", [smalltalk.send((smalltalk.String || String), "_tab", [])])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("instanceVariableNames%3A%20%27")]);})(stream);smalltalk.send(smalltalk.send(self['@selectedClass'], "_instanceVariableNames", []), "_do_separatedBy_", [(function(each){return smalltalk.send(stream, "_nextPutAll_", [each]);}), (function(){return smalltalk.send(stream, "_nextPutAll_", [" "]);})]);return (function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%27"), "__comma", [smalltalk.send((smalltalk.String || String), "_lf", [])]), "__comma", [smalltalk.send((smalltalk.String || String), "_tab", [])])]);smalltalk.send($rec, "_nextPutAll_", [unescape("package%3A%20%27")]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self['@selectedClass'], "_category", [])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%27")]);})(stream);})() : nil;
- return smalltalk.send(stream, "_contents", []);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_metaclassDeclarationSource',
- smalltalk.method({
- selector: 'metaclassDeclarationSource',
- fn: function (){
- var self=this;
- var stream=nil;
- stream=smalltalk.send("", "_writeStream", []);
- (($receiver = self['@selectedClass']) != nil && $receiver != undefined) ? (function(){(function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self['@selectedClass'], "_asString", [])]);smalltalk.send($rec, "_nextPutAll_", [" class "]);return smalltalk.send($rec, "_nextPutAll_", [unescape("instanceVariableNames%3A%20%27")]);})(stream);smalltalk.send(smalltalk.send(smalltalk.send(self['@selectedClass'], "_class", []), "_instanceVariableNames", []), "_do_separatedBy_", [(function(each){return smalltalk.send(stream, "_nextPutAll_", [each]);}), (function(){return smalltalk.send(stream, "_nextPutAll_", [" "]);})]);return smalltalk.send(stream, "_nextPutAll_", [unescape("%27")]);})() : nil;
- return smalltalk.send(stream, "_contents", []);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_classCommentSource',
- smalltalk.method({
- selector: 'classCommentSource',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@selectedClass'], "_comment", []);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_selectedClass',
- smalltalk.method({
- selector: 'selectedClass',
- fn: function (){
- var self=this;
- return self['@selectedClass'];
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_disableSaveButton',
- smalltalk.method({
- selector: 'disableSaveButton',
- fn: function (){
- var self=this;
- (($receiver = self['@saveButton']) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self['@saveButton'], "_at_put_", ["disabled", true]);})() : nil;
- self['@unsavedChanges']=false;
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_hideClassButtons',
- smalltalk.method({
- selector: 'hideClassButtons',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self['@classButtons'], "_asJQuery", []), "_hide", []);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_showClassButtons',
- smalltalk.method({
- selector: 'showClassButtons',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self['@classButtons'], "_asJQuery", []), "_show", []);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_hideMethodButtons',
- smalltalk.method({
- selector: 'hideMethodButtons',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self['@methodButtons'], "_asJQuery", []), "_hide", []);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_showMethodButtons',
- smalltalk.method({
- selector: 'showMethodButtons',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self['@methodButtons'], "_asJQuery", []), "_show", []);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_compile',
- smalltalk.method({
- selector: 'compile',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_disableSaveButton", []);
- (($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["comment"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (($receiver = self['@selectedClass']) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_compileClassComment", []);})() : nil;})() : (function(){return (($receiver = smalltalk.send(smalltalk.send(self['@selectedProtocol'], "_notNil", []), "_or_", [(function(){return smalltalk.send(self['@selectedMethod'], "_notNil", []);})])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_compileDefinition", []);})() : (function(){return smalltalk.send(self, "_compileMethodDefinition", []);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(self, "_compileDefinition", []);}), (function(){return smalltalk.send(self, "_compileMethodDefinition", []);})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return (($receiver = self['@selectedClass']) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_compileClassComment", []);})() : nil;}), (function(){return (($receiver = smalltalk.send(smalltalk.send(self['@selectedProtocol'], "_notNil", []), "_or_", [(function(){return smalltalk.send(self['@selectedMethod'], "_notNil", []);})])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_compileDefinition", []);})() : (function(){return smalltalk.send(self, "_compileMethodDefinition", []);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(self, "_compileDefinition", []);}), (function(){return smalltalk.send(self, "_compileMethodDefinition", []);})]);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_compileClassComment',
- smalltalk.method({
- selector: 'compileClassComment',
- fn: function (){
- var self=this;
- smalltalk.send(self['@selectedClass'], "_comment_", [smalltalk.send(self['@sourceArea'], "_val", [])]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_compileMethodDefinition',
- smalltalk.method({
- selector: 'compileMethodDefinition',
- fn: function (){
- var self=this;
- (($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["instance"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_compileMethodDefinitionFor_", [self['@selectedClass']]);})() : (function(){return smalltalk.send(self, "_compileMethodDefinitionFor_", [smalltalk.send(self['@selectedClass'], "_class", [])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self, "_compileMethodDefinitionFor_", [self['@selectedClass']]);}), (function(){return smalltalk.send(self, "_compileMethodDefinitionFor_", [smalltalk.send(self['@selectedClass'], "_class", [])]);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_compileMethodDefinitionFor_',
- smalltalk.method({
- selector: 'compileMethodDefinitionFor:',
- fn: function (aClass){
- var self=this;
- try{var compiler=nil;
- var method=nil;
- var source=nil;
- var node=nil;
- source=smalltalk.send(self['@sourceArea'], "_val", []);
- (($receiver = self['@selectedProtocol']) == nil || $receiver == undefined) ? (function(){return self['@selectedProtocol']=smalltalk.send(self['@selectedMethod'], "_category", []);})() : $receiver;
- compiler=smalltalk.send((smalltalk.Compiler || Compiler), "_new", []);
- smalltalk.send(compiler, "_source_", [source]);
- node=smalltalk.send(compiler, "_parse_", [source]);
- (($receiver = smalltalk.send(node, "_isParseFailure", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '_compileMethodDefinitionFor_', fn: function(){return smalltalk.send(self, "_alert_", [smalltalk.send(smalltalk.send(smalltalk.send("PARSE ERROR: ", "__comma", [smalltalk.send(node, "_reason", [])]), "__comma", [unescape("%2C%20position%3A%20")]), "__comma", [smalltalk.send(smalltalk.send(node, "_position", []), "_asString", [])])])}})})();})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return (function(){throw({name: 'stReturn', selector: '_compileMethodDefinitionFor_', fn: function(){return smalltalk.send(self, "_alert_", [smalltalk.send(smalltalk.send(smalltalk.send("PARSE ERROR: ", "__comma", [smalltalk.send(node, "_reason", [])]), "__comma", [unescape("%2C%20position%3A%20")]), "__comma", [smalltalk.send(smalltalk.send(node, "_position", []), "_asString", [])])])}})})();})]);
- smalltalk.send(compiler, "_currentClass_", [aClass]);
- method=smalltalk.send(compiler, "_eval_", [smalltalk.send(compiler, "_compileNode_", [node])]);
- smalltalk.send(method, "_category_", [self['@selectedProtocol']]);
- smalltalk.send(smalltalk.send(compiler, "_unknownVariables", []), "_do_", [(function(each){return (($receiver = smalltalk.send(self, "_confirm_", [smalltalk.send(smalltalk.send(unescape("Declare%20%27"), "__comma", [each]), "__comma", [unescape("%27%20as%20instance%20variable%3F")])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_addInstanceVariableNamed_toClass_", [each, aClass]);return (function(){throw({name: 'stReturn', selector: '_compileMethodDefinitionFor_', fn: function(){return smalltalk.send(self, "_compileMethodDefinitionFor_", [aClass])}})})();})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_addInstanceVariableNamed_toClass_", [each, aClass]);return (function(){throw({name: 'stReturn', selector: '_compileMethodDefinitionFor_', fn: function(){return smalltalk.send(self, "_compileMethodDefinitionFor_", [aClass])}})})();})]);})]);
- smalltalk.send(aClass, "_addCompiledMethod_", [method]);
- smalltalk.send(compiler, "_setupClass_", [aClass]);
- smalltalk.send(self, "_updateMethodsList", []);
- smalltalk.send(self, "_selectMethod_", [method]);
- return self;
- } catch(e) {if(e.name === 'stReturn' && e.selector === '_compileMethodDefinitionFor_'){return e.fn()} throw(e)}}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_compileDefinition',
- smalltalk.method({
- selector: 'compileDefinition',
- fn: function (){
- var self=this;
- var newClass=nil;
- newClass=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_loadExpression_", [smalltalk.send(self['@sourceArea'], "_val", [])]);
- (function($rec){smalltalk.send($rec, "_resetClassesList", []);smalltalk.send($rec, "_updateCategoriesList", []);return smalltalk.send($rec, "_updateClassesList", []);})(self);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_cancelChanges',
- smalltalk.method({
- selector: 'cancelChanges',
- fn: function (){
- var self=this;
- return (($receiver = self['@unsavedChanges']).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_confirm_", [unescape("Cancel%20changes%3F")]);})() : (function(){return true;})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self, "_confirm_", [unescape("Cancel%20changes%3F")]);}), (function(){return true;})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_removeClass',
- smalltalk.method({
- selector: 'removeClass',
- fn: function (){
- var self=this;
- (($receiver = smalltalk.send(self, "_confirm_", [smalltalk.send(smalltalk.send("Do you really want to remove ", "__comma", [smalltalk.send(self['@selectedClass'], "_name", [])]), "__comma", [unescape("%3F")])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_removeClass_", [self['@selectedClass']]);smalltalk.send(self, "_resetClassesList", []);return smalltalk.send(self, "_selectClass_", [nil]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_removeClass_", [self['@selectedClass']]);smalltalk.send(self, "_resetClassesList", []);return smalltalk.send(self, "_selectClass_", [nil]);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_removeMethod',
- smalltalk.method({
- selector: 'removeMethod',
- fn: function (){
- var self=this;
- (($receiver = smalltalk.send(self, "_cancelChanges", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (($receiver = smalltalk.send(self, "_confirm_", [smalltalk.send(smalltalk.send(unescape("Do%20you%20really%20want%20to%20remove%20%23"), "__comma", [smalltalk.send(self['@selectedMethod'], "_selector", [])]), "__comma", [unescape("%3F")])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){(($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["instance"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@selectedClass'], "_removeCompiledMethod_", [self['@selectedMethod']]);})() : (function(){return smalltalk.send(smalltalk.send(self['@selectedClass'], "_class", []), "_removeCompiledMethod_", [self['@selectedMethod']]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@selectedClass'], "_removeCompiledMethod_", [self['@selectedMethod']]);}), (function(){return smalltalk.send(smalltalk.send(self['@selectedClass'], "_class", []), "_removeCompiledMethod_", [self['@selectedMethod']]);})]);return smalltalk.send(self, "_selectMethod_", [nil]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){(($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["instance"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@selectedClass'], "_removeCompiledMethod_", [self['@selectedMethod']]);})() : (function(){return smalltalk.send(smalltalk.send(self['@selectedClass'], "_class", []), "_removeCompiledMethod_", [self['@selectedMethod']]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@selectedClass'], "_removeCompiledMethod_", [self['@selectedMethod']]);}), (function(){return smalltalk.send(smalltalk.send(self['@selectedClass'], "_class", []), "_removeCompiledMethod_", [self['@selectedMethod']]);})]);return smalltalk.send(self, "_selectMethod_", [nil]);})]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return (($receiver = smalltalk.send(self, "_confirm_", [smalltalk.send(smalltalk.send(unescape("Do%20you%20really%20want%20to%20remove%20%23"), "__comma", [smalltalk.send(self['@selectedMethod'], "_selector", [])]), "__comma", [unescape("%3F")])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){(($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["instance"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@selectedClass'], "_removeCompiledMethod_", [self['@selectedMethod']]);})() : (function(){return smalltalk.send(smalltalk.send(self['@selectedClass'], "_class", []), "_removeCompiledMethod_", [self['@selectedMethod']]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@selectedClass'], "_removeCompiledMethod_", [self['@selectedMethod']]);}), (function(){return smalltalk.send(smalltalk.send(self['@selectedClass'], "_class", []), "_removeCompiledMethod_", [self['@selectedMethod']]);})]);return smalltalk.send(self, "_selectMethod_", [nil]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){(($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["instance"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@selectedClass'], "_removeCompiledMethod_", [self['@selectedMethod']]);})() : (function(){return smalltalk.send(smalltalk.send(self['@selectedClass'], "_class", []), "_removeCompiledMethod_", [self['@selectedMethod']]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@selectedClass'], "_removeCompiledMethod_", [self['@selectedMethod']]);}), (function(){return smalltalk.send(smalltalk.send(self['@selectedClass'], "_class", []), "_removeCompiledMethod_", [self['@selectedMethod']]);})]);return smalltalk.send(self, "_selectMethod_", [nil]);})]);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_setMethodProtocol_',
- smalltalk.method({
- selector: 'setMethodProtocol:',
- fn: function (aString){
- var self=this;
- (($receiver = smalltalk.send(self, "_cancelChanges", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (($receiver = smalltalk.send(smalltalk.send(self, "_protocols", []), "_includes_", [aString])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_addNewProtocol", []);})() : (function(){smalltalk.send(self['@selectedMethod'], "_category_", [aString]);self['@selectedProtocol']=aString;self['@selectedMethod']=self['@selectedMethod'];return (function($rec){smalltalk.send($rec, "_updateProtocolsList", []);smalltalk.send($rec, "_updateMethodsList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(self, "_addNewProtocol", []);}), (function(){smalltalk.send(self['@selectedMethod'], "_category_", [aString]);self['@selectedProtocol']=aString;self['@selectedMethod']=self['@selectedMethod'];return (function($rec){smalltalk.send($rec, "_updateProtocolsList", []);smalltalk.send($rec, "_updateMethodsList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return (($receiver = smalltalk.send(smalltalk.send(self, "_protocols", []), "_includes_", [aString])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_addNewProtocol", []);})() : (function(){smalltalk.send(self['@selectedMethod'], "_category_", [aString]);self['@selectedProtocol']=aString;self['@selectedMethod']=self['@selectedMethod'];return (function($rec){smalltalk.send($rec, "_updateProtocolsList", []);smalltalk.send($rec, "_updateMethodsList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(self, "_addNewProtocol", []);}), (function(){smalltalk.send(self['@selectedMethod'], "_category_", [aString]);self['@selectedProtocol']=aString;self['@selectedMethod']=self['@selectedMethod'];return (function($rec){smalltalk.send($rec, "_updateProtocolsList", []);smalltalk.send($rec, "_updateMethodsList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})]);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_addNewProtocol',
- smalltalk.method({
- selector: 'addNewProtocol',
- fn: function (){
- var self=this;
- var newProtocol=nil;
- newProtocol=smalltalk.send(self, "_prompt_", ["New method protocol"]);
- (($receiver = smalltalk.send(smalltalk.send(newProtocol, "_notNil", []), "_and_", [(function(){return smalltalk.send(newProtocol, "_notEmpty", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@selectedMethod'], "_category_", [newProtocol]);return smalltalk.send(self, "_setMethodProtocol_", [newProtocol]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@selectedMethod'], "_category_", [newProtocol]);return smalltalk.send(self, "_setMethodProtocol_", [newProtocol]);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_selectCategory_',
- smalltalk.method({
- selector: 'selectCategory:',
- fn: function (aCategory){
- var self=this;
- (($receiver = smalltalk.send(self, "_cancelChanges", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){self['@selectedPackage']=aCategory;self['@selectedClass']=self['@selectedProtocol']=self['@selectedMethod']=nil;smalltalk.send(self, "_resetClassesList", []);return (function($rec){smalltalk.send($rec, "_updateCategoriesList", []);smalltalk.send($rec, "_updateClassesList", []);smalltalk.send($rec, "_updateProtocolsList", []);smalltalk.send($rec, "_updateMethodsList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){self['@selectedPackage']=aCategory;self['@selectedClass']=self['@selectedProtocol']=self['@selectedMethod']=nil;smalltalk.send(self, "_resetClassesList", []);return (function($rec){smalltalk.send($rec, "_updateCategoriesList", []);smalltalk.send($rec, "_updateClassesList", []);smalltalk.send($rec, "_updateProtocolsList", []);smalltalk.send($rec, "_updateMethodsList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_selectClass_',
- smalltalk.method({
- selector: 'selectClass:',
- fn: function (aClass){
- var self=this;
- (($receiver = smalltalk.send(self, "_cancelChanges", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){self['@selectedClass']=aClass;self['@selectedProtocol']=self['@selectedMethod']=nil;return (function($rec){smalltalk.send($rec, "_updateClassesList", []);smalltalk.send($rec, "_updateProtocolsList", []);smalltalk.send($rec, "_updateMethodsList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){self['@selectedClass']=aClass;self['@selectedProtocol']=self['@selectedMethod']=nil;return (function($rec){smalltalk.send($rec, "_updateClassesList", []);smalltalk.send($rec, "_updateProtocolsList", []);smalltalk.send($rec, "_updateMethodsList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_selectProtocol_',
- smalltalk.method({
- selector: 'selectProtocol:',
- fn: function (aString){
- var self=this;
- (($receiver = smalltalk.send(self, "_cancelChanges", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){self['@selectedProtocol']=aString;self['@selectedMethod']=nil;return (function($rec){smalltalk.send($rec, "_updateProtocolsList", []);smalltalk.send($rec, "_updateMethodsList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){self['@selectedProtocol']=aString;self['@selectedMethod']=nil;return (function($rec){smalltalk.send($rec, "_updateProtocolsList", []);smalltalk.send($rec, "_updateMethodsList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_selectMethod_',
- smalltalk.method({
- selector: 'selectMethod:',
- fn: function (aMethod){
- var self=this;
- (($receiver = smalltalk.send(self, "_cancelChanges", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){self['@selectedMethod']=aMethod;return (function($rec){smalltalk.send($rec, "_updateProtocolsList", []);smalltalk.send($rec, "_updateMethodsList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){self['@selectedMethod']=aMethod;return (function($rec){smalltalk.send($rec, "_updateProtocolsList", []);smalltalk.send($rec, "_updateMethodsList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_selectTab_',
- smalltalk.method({
- selector: 'selectTab:',
- fn: function (aString){
- var self=this;
- (($receiver = smalltalk.send(self, "_cancelChanges", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){self['@selectedTab']=aString;smalltalk.send(self, "_selectProtocol_", [nil]);return smalltalk.send(self, "_updateTabsList", []);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){self['@selectedTab']=aString;smalltalk.send(self, "_selectProtocol_", [nil]);return smalltalk.send(self, "_updateTabsList", []);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_renameClass',
- smalltalk.method({
- selector: 'renameClass',
- fn: function (){
- var self=this;
- var newName=nil;
- newName=smalltalk.send(self, "_prompt_", [smalltalk.send("Rename class ", "__comma", [smalltalk.send(self['@selectedClass'], "_name", [])])]);
- (($receiver = smalltalk.send(newName, "_notEmpty", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@selectedClass'], "_rename_", [newName]);return (function($rec){smalltalk.send($rec, "_updateClassesList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@selectedClass'], "_rename_", [newName]);return (function($rec){smalltalk.send($rec, "_updateClassesList", []);return smalltalk.send($rec, "_updateSourceAndButtons", []);})(self);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_addInstanceVariableNamed_toClass_',
- smalltalk.method({
- selector: 'addInstanceVariableNamed:toClass:',
- fn: function (aString, aClass){
- var self=this;
- smalltalk.send(smalltalk.send((smalltalk.ClassBuilder || ClassBuilder), "_new", []), "_addSubclassOf_named_instanceVariableNames_package_", [smalltalk.send(aClass, "_superclass", []), smalltalk.send(aClass, "_name", []), (function($rec){smalltalk.send($rec, "_add_", [aString]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(smalltalk.send(aClass, "_instanceVariableNames", []), "_copy", [])), smalltalk.send(smalltalk.send(aClass, "_package", []), "_name", [])]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_searchReferencesOf_',
- smalltalk.method({
- selector: 'searchReferencesOf:',
- fn: function (aString){
- var self=this;
- smalltalk.send((smalltalk.ReferencesBrowser || ReferencesBrowser), "_search_", [aString]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_searchClassReferences',
- smalltalk.method({
- selector: 'searchClassReferences',
- fn: function (){
- var self=this;
- smalltalk.send((smalltalk.ReferencesBrowser || ReferencesBrowser), "_search_", [smalltalk.send(self['@selectedClass'], "_name", [])]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_search_',
- smalltalk.method({
- selector: 'search:',
- fn: function (aString){
- var self=this;
- (($receiver = smalltalk.send(self, "_cancelChanges", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){var searchedClass=nil;
- searchedClass=smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_at_", [aString]);return (($receiver = smalltalk.send(searchedClass, "_isClass", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send(self, "_class", []), "_openOn_", [searchedClass]);})() : (function(){return smalltalk.send(self, "_searchReferencesOf_", [aString]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send(self, "_class", []), "_openOn_", [searchedClass]);}), (function(){return smalltalk.send(self, "_searchReferencesOf_", [aString]);})]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){var searchedClass=nil;
- searchedClass=smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_at_", [aString]);return (($receiver = smalltalk.send(searchedClass, "_isClass", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send(self, "_class", []), "_openOn_", [searchedClass]);})() : (function(){return smalltalk.send(self, "_searchReferencesOf_", [aString]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send(self, "_class", []), "_openOn_", [searchedClass]);}), (function(){return smalltalk.send(self, "_searchReferencesOf_", [aString]);})]);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_handleSourceAreaKeyDown_',
- smalltalk.method({
- selector: 'handleSourceAreaKeyDown:',
- fn: function (anEvent){
- var self=this;
- if(anEvent.ctrlKey) {
- if(anEvent.keyCode === 83) { //ctrl+s
- self._compile();
- anEvent.preventDefault();
- return false;
- }
- }
- ;
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_commitPackage',
- smalltalk.method({
- selector: 'commitPackage',
- fn: function (){
- var self=this;
- (($receiver = self['@selectedPackage']) != nil && $receiver != undefined) ? (function(){(function($rec){smalltalk.send($rec, "_at_put_", ["type", "PUT"]);smalltalk.send($rec, "_at_put_", ["data", smalltalk.send(smalltalk.send((smalltalk.Exporter || Exporter), "_new", []), "_exportPackage_", [self['@selectedPackage']])]);smalltalk.send($rec, "_at_put_", ["error", (function(){return smalltalk.send(self, "_alert_", [unescape("Commit%20failed%21")]);})]);return smalltalk.send($rec, "_send", []);})(smalltalk.send((smalltalk.Ajax || Ajax), "_url_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "_commitPathJs", []), "__comma", [unescape("/")]), "__comma", [self['@selectedPackage']]), "__comma", [".js"])]));(function($rec){smalltalk.send($rec, "_at_put_", ["type", "PUT"]);smalltalk.send($rec, "_at_put_", ["data", smalltalk.send(smalltalk.send((smalltalk.StrippedExporter || StrippedExporter), "_new", []), "_exportPackage_", [self['@selectedPackage']])]);smalltalk.send($rec, "_at_put_", ["error", (function(){return smalltalk.send(self, "_alert_", [unescape("Commit%20failed%21")]);})]);return smalltalk.send($rec, "_send", []);})(smalltalk.send((smalltalk.Ajax || Ajax), "_url_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "_commitPathJs", []), "__comma", [unescape("/")]), "__comma", [self['@selectedPackage']]), "__comma", [".deploy.js"])]));return (function($rec){smalltalk.send($rec, "_at_put_", ["type", "PUT"]);smalltalk.send($rec, "_at_put_", ["data", smalltalk.send(smalltalk.send((smalltalk.ChunkExporter || ChunkExporter), "_new", []), "_exportPackage_", [self['@selectedPackage']])]);smalltalk.send($rec, "_at_put_", ["error", (function(){return smalltalk.send(self, "_alert_", [unescape("Commit%20failed%21")]);})]);return smalltalk.send($rec, "_send", []);})(smalltalk.send((smalltalk.Ajax || Ajax), "_url_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "_commitPathSt", []), "__comma", [unescape("/")]), "__comma", [self['@selectedPackage']]), "__comma", [".st"])]));})() : nil;
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_renamePackage',
- smalltalk.method({
- selector: 'renamePackage',
- fn: function (){
- var self=this;
- var newName=nil;
- newName=smalltalk.send(self, "_prompt_", [smalltalk.send("Rename package ", "__comma", [self['@selectedPackage']])]);
- (($receiver = smalltalk.send(newName, "_notEmpty", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_renamePackage_to_", [self['@selectedPackage'], newName]);return smalltalk.send(self, "_updateCategoriesList", []);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_renamePackage_to_", [self['@selectedPackage'], newName]);return smalltalk.send(self, "_updateCategoriesList", []);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_removePackage',
- smalltalk.method({
- selector: 'removePackage',
- fn: function (){
- var self=this;
- (($receiver = smalltalk.send(self, "_confirm_", [smalltalk.send(smalltalk.send("Do you really want to remove the whole package ", "__comma", [self['@selectedPackage']]), "__comma", [unescape("%20with%20all%20its%20classes%3F")])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_removePackage_", [self['@selectedPackage']]);return smalltalk.send(self, "_updateCategoriesList", []);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_removePackage_", [self['@selectedPackage']]);return smalltalk.send(self, "_updateCategoriesList", []);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_initialize',
- smalltalk.method({
- selector: 'initialize',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_initialize", [], smalltalk.TabWidget);
- self['@selectedTab']="instance";
- self['@unsavedChanges']=false;
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_renderBoxOn_',
- smalltalk.method({
- selector: 'renderBoxOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_renderTopPanelOn_", [html]);smalltalk.send($rec, "_renderTabsOn_", [html]);return smalltalk.send($rec, "_renderBottomPanelOn_", [html]);})(self);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_renderTopPanelOn_',
- smalltalk.method({
- selector: 'renderTopPanelOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_class_", ["top"]);return smalltalk.send($rec, "_with_", [(function(){self['@packagesList']=smalltalk.send(smalltalk.send(html, "_ul", []), "_class_", ["jt_column browser packages"]);self['@commitButton']=(function($rec){smalltalk.send($rec, "_class_", ["jt_commit"]);smalltalk.send($rec, "_title_", ["Commit classes in this package to disk"]);smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_commitPackage", []);})]);return smalltalk.send($rec, "_with_", ["Commit package"]);})(smalltalk.send(html, "_button", []));self['@renameButton']=(function($rec){smalltalk.send($rec, "_class_", ["jt_rename"]);smalltalk.send($rec, "_title_", ["Rename this package"]);smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_renamePackage", []);})]);return smalltalk.send($rec, "_with_", ["Rename package"]);})(smalltalk.send(html, "_button", []));self['@deleteButton']=(function($rec){smalltalk.send($rec, "_class_", ["jt_delete"]);smalltalk.send($rec, "_title_", ["Remove this package from the system"]);smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_removePackage", []);})]);return smalltalk.send($rec, "_with_", ["Remove package"]);})(smalltalk.send(html, "_button", []));self['@classesList']=smalltalk.send((smalltalk.ClassesList || ClassesList), "_on_", [self]);smalltalk.send(self['@classesList'], "_renderOn_", [html]);self['@protocolsList']=smalltalk.send(smalltalk.send(html, "_ul", []), "_class_", ["jt_column browser protocols"]);self['@methodsList']=smalltalk.send(smalltalk.send(html, "_ul", []), "_class_", ["jt_column browser methods"]);(function($rec){smalltalk.send($rec, "_updateCategoriesList", []);smalltalk.send($rec, "_updateClassesList", []);smalltalk.send($rec, "_updateProtocolsList", []);return smalltalk.send($rec, "_updateMethodsList", []);})(self);return smalltalk.send(smalltalk.send(html, "_div", []), "_class_", ["jt_clear"]);})]);})(smalltalk.send(html, "_div", []));
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_renderTabsOn_',
- smalltalk.method({
- selector: 'renderTabsOn:',
- fn: function (html){
- var self=this;
- self['@tabsList']=smalltalk.send(smalltalk.send(html, "_ul", []), "_class_", ["jt_tabs jt_browser"]);
- smalltalk.send(self, "_updateTabsList", []);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_renderBottomPanelOn_',
- smalltalk.method({
- selector: 'renderBottomPanelOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_class_", ["jt_sourceCode"]);return smalltalk.send($rec, "_with_", [(function(){self['@sourceArea']=smalltalk.send((smalltalk.SourceArea || SourceArea), "_new", []);smalltalk.send(self['@sourceArea'], "_renderOn_", [html]);smalltalk.send(self['@sourceArea'], "_onKeyDown_", [(function(e){return smalltalk.send(self, "_handleSourceAreaKeyDown_", [e]);})]);return smalltalk.send(self['@sourceArea'], "_onKeyUp_", [(function(){return smalltalk.send(self, "_updateStatus", []);})]);})]);})(smalltalk.send(html, "_div", []));
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_renderButtonsOn_',
- smalltalk.method({
- selector: 'renderButtonsOn:',
- fn: function (html){
- var self=this;
- self['@saveButton']=smalltalk.send(html, "_button", []);
- (function($rec){smalltalk.send($rec, "_with_", ["Save"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_compile", []);})]);})(self['@saveButton']);
- self['@methodButtons']=smalltalk.send(html, "_span", []);
- self['@classButtons']=smalltalk.send(html, "_span", []);
- (function($rec){smalltalk.send($rec, "_class_", ["right"]);return smalltalk.send($rec, "_with_", [(function(){(function($rec){smalltalk.send($rec, "_with_", ["DoIt"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self['@sourceArea'], "_doIt", []);})]);})(smalltalk.send(html, "_button", []));(function($rec){smalltalk.send($rec, "_with_", ["PrintIt"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self['@sourceArea'], "_printIt", []);})]);})(smalltalk.send(html, "_button", []));return (function($rec){smalltalk.send($rec, "_with_", ["InspectIt"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self['@sourceArea'], "_inspectIt", []);})]);})(smalltalk.send(html, "_button", []));})]);})(smalltalk.send(html, "_div", []));
- smalltalk.send(self, "_updateSourceAndButtons", []);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_canBeClosed',
- smalltalk.method({
- selector: 'canBeClosed',
- fn: function (){
- var self=this;
- return true;
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_updateCategoriesList',
- smalltalk.method({
- selector: 'updateCategoriesList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@packagesList'], "_contents_", [(function(html){return smalltalk.send(smalltalk.send(self, "_packages", []), "_do_", [(function(each){var li=nil;
- var label=nil;
- (($receiver = smalltalk.send(each, "_isEmpty", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return label="Unclassified";})() : (function(){return label=each;})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return label="Unclassified";}), (function(){return label=each;})]);li=smalltalk.send(html, "_li", []);(($receiver = smalltalk.send(self['@selectedPackage'], "__eq", [each])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);return (function($rec){smalltalk.send($rec, "_with_", [label]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectCategory_", [each]);})]);})(li);})]);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_updateClassesList',
- smalltalk.method({
- selector: 'updateClassesList',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send((smalltalk.TabManager || TabManager), "_current", []), "_update", []);
- smalltalk.send(self['@classesList'], "_updateNodes", []);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_updateProtocolsList',
- smalltalk.method({
- selector: 'updateProtocolsList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@protocolsList'], "_contents_", [(function(html){return smalltalk.send(smalltalk.send(self, "_protocols", []), "_do_", [(function(each){var li=nil;
- li=smalltalk.send(html, "_li", []);(($receiver = smalltalk.send(self['@selectedProtocol'], "__eq", [each])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);return (function($rec){smalltalk.send($rec, "_with_", [each]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectProtocol_", [each]);})]);})(li);})]);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_updateMethodsList',
- smalltalk.method({
- selector: 'updateMethodsList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@methodsList'], "_contents_", [(function(html){return smalltalk.send(smalltalk.send(self, "_methods", []), "_do_", [(function(each){var li=nil;
- li=smalltalk.send(html, "_li", []);(($receiver = smalltalk.send(self['@selectedMethod'], "__eq", [each])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);return (function($rec){smalltalk.send($rec, "_with_", [smalltalk.send(each, "_selector", [])]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectMethod_", [each]);})]);})(li);})]);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_updateTabsList',
- smalltalk.method({
- selector: 'updateTabsList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@tabsList'], "_contents_", [(function(html){var li=nil;
- li=smalltalk.send(html, "_li", []);(($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["instance"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);(function($rec){smalltalk.send($rec, "_with_", [(function(){smalltalk.send(smalltalk.send(html, "_span", []), "_class_", ["ltab"]);(function($rec){smalltalk.send($rec, "_class_", ["mtab"]);return smalltalk.send($rec, "_with_", ["Instance"]);})(smalltalk.send(html, "_span", []));return smalltalk.send(smalltalk.send(html, "_span", []), "_class_", ["rtab"]);})]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectTab_", ["instance"]);})]);})(li);li=smalltalk.send(html, "_li", []);(($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["class"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);(function($rec){smalltalk.send($rec, "_with_", [(function(){smalltalk.send(smalltalk.send(html, "_span", []), "_class_", ["ltab"]);(function($rec){smalltalk.send($rec, "_class_", ["mtab"]);return smalltalk.send($rec, "_with_", ["Class"]);})(smalltalk.send(html, "_span", []));return smalltalk.send(smalltalk.send(html, "_span", []), "_class_", ["rtab"]);})]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectTab_", ["class"]);})]);})(li);li=smalltalk.send(html, "_li", []);(($receiver = smalltalk.send(self['@selectedTab'], "__eq", ["comment"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);return (function($rec){smalltalk.send($rec, "_with_", [(function(){smalltalk.send(smalltalk.send(html, "_span", []), "_class_", ["ltab"]);(function($rec){smalltalk.send($rec, "_class_", ["mtab"]);return smalltalk.send($rec, "_with_", ["Comment"]);})(smalltalk.send(html, "_span", []));return smalltalk.send(smalltalk.send(html, "_span", []), "_class_", ["rtab"]);})]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectTab_", ["comment"]);})]);})(li);})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_updateSourceAndButtons',
- smalltalk.method({
- selector: 'updateSourceAndButtons',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_disableSaveButton", []);
- smalltalk.send(self['@classButtons'], "_contents_", [(function(html){(function($rec){smalltalk.send($rec, "_with_", ["Rename class"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_renameClass", []);})]);})(smalltalk.send(html, "_button", []));(function($rec){smalltalk.send($rec, "_with_", ["Remove class"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_removeClass", []);})]);})(smalltalk.send(html, "_button", []));return (function($rec){smalltalk.send($rec, "_with_", ["References"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_searchClassReferences", []);})]);})(smalltalk.send(html, "_button", []));})]);
- smalltalk.send(self['@methodButtons'], "_contents_", [(function(html){(function($rec){smalltalk.send($rec, "_with_", ["Remove method"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_removeMethod", []);})]);})(smalltalk.send(html, "_button", []));(function($rec){smalltalk.send($rec, "_onChange_", [(function(e, select){return smalltalk.send(self, "_setMethodProtocol_", [smalltalk.send(select, "_val", [])]);})]);return smalltalk.send($rec, "_with_", [(function(){(function($rec){smalltalk.send($rec, "_with_", ["Method protocol"]);return smalltalk.send($rec, "_at_put_", ["disabled", "disabled"]);})(smalltalk.send(html, "_option", []));(function($rec){smalltalk.send($rec, "_class_", ["important"]);return smalltalk.send($rec, "_with_", ["New..."]);})(smalltalk.send(html, "_option", []));return smalltalk.send(smalltalk.send(self, "_protocols", []), "_do_", [(function(each){return smalltalk.send(smalltalk.send(html, "_option", []), "_with_", [each]);})]);})]);})(smalltalk.send(html, "_select", []));return (($receiver = smalltalk.send(self['@selectedMethod'], "_isNil", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function($rec){smalltalk.send($rec, "_onChange_", [(function(e, select){return smalltalk.send(self, "_searchReferencesOf_", [smalltalk.send(select, "_val", [])]);})]);return smalltalk.send($rec, "_with_", [(function(){(function($rec){smalltalk.send($rec, "_with_", ["References"]);return smalltalk.send($rec, "_at_put_", ["disabled", "disabled"]);})(smalltalk.send(html, "_option", []));(function($rec){smalltalk.send($rec, "_class_", ["important"]);return smalltalk.send($rec, "_with_", [smalltalk.send(self['@selectedMethod'], "_selector", [])]);})(smalltalk.send(html, "_option", []));return smalltalk.send(smalltalk.send(smalltalk.send(self['@selectedMethod'], "_messageSends", []), "_sorted", []), "_do_", [(function(each){return smalltalk.send(smalltalk.send(html, "_option", []), "_with_", [each]);})]);})]);})(smalltalk.send(html, "_select", []));})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function($rec){smalltalk.send($rec, "_onChange_", [(function(e, select){return smalltalk.send(self, "_searchReferencesOf_", [smalltalk.send(select, "_val", [])]);})]);return smalltalk.send($rec, "_with_", [(function(){(function($rec){smalltalk.send($rec, "_with_", ["References"]);return smalltalk.send($rec, "_at_put_", ["disabled", "disabled"]);})(smalltalk.send(html, "_option", []));(function($rec){smalltalk.send($rec, "_class_", ["important"]);return smalltalk.send($rec, "_with_", [smalltalk.send(self['@selectedMethod'], "_selector", [])]);})(smalltalk.send(html, "_option", []));return smalltalk.send(smalltalk.send(smalltalk.send(self['@selectedMethod'], "_messageSends", []), "_sorted", []), "_do_", [(function(each){return smalltalk.send(smalltalk.send(html, "_option", []), "_with_", [each]);})]);})]);})(smalltalk.send(html, "_select", []));})]);})]);
- (($receiver = smalltalk.send(self['@selectedMethod'], "_isNil", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_hideMethodButtons", []);return (($receiver = smalltalk.send(smalltalk.send(self['@selectedClass'], "_isNil", []), "_or_", [(function(){return smalltalk.send(self['@selectedProtocol'], "_notNil", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_hideClassButtons", []);})() : (function(){return smalltalk.send(self, "_showClassButtons", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self, "_hideClassButtons", []);}), (function(){return smalltalk.send(self, "_showClassButtons", []);})]);})() : (function(){smalltalk.send(self, "_hideClassButtons", []);return smalltalk.send(self, "_showMethodButtons", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){smalltalk.send(self, "_hideMethodButtons", []);return (($receiver = smalltalk.send(smalltalk.send(self['@selectedClass'], "_isNil", []), "_or_", [(function(){return smalltalk.send(self['@selectedProtocol'], "_notNil", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_hideClassButtons", []);})() : (function(){return smalltalk.send(self, "_showClassButtons", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self, "_hideClassButtons", []);}), (function(){return smalltalk.send(self, "_showClassButtons", []);})]);}), (function(){smalltalk.send(self, "_hideClassButtons", []);return smalltalk.send(self, "_showMethodButtons", []);})]);
- smalltalk.send(self['@sourceArea'], "_val_", [smalltalk.send(self, "_source", [])]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_updateStatus',
- smalltalk.method({
- selector: 'updateStatus',
- fn: function (){
- var self=this;
- (($receiver = smalltalk.send(smalltalk.send(self['@sourceArea'], "_val", []), "__eq", [smalltalk.send(self, "_source", [])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){(($receiver = self['@saveButton']) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self['@saveButton'], "_at_put_", ["disabled", true]);})() : nil;return self['@unsavedChanges']=false;})() : (function(){(($receiver = self['@saveButton']) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self['@saveButton'], "_removeAt_", ["disabled"]);})() : nil;return self['@unsavedChanges']=true;})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){(($receiver = self['@saveButton']) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self['@saveButton'], "_at_put_", ["disabled", true]);})() : nil;return self['@unsavedChanges']=false;}), (function(){(($receiver = self['@saveButton']) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self['@saveButton'], "_removeAt_", ["disabled"]);})() : nil;return self['@unsavedChanges']=true;})]);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_resetClassesList',
- smalltalk.method({
- selector: 'resetClassesList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@classesList'], "_resetNodes", []);
- return self;}
- }),
- smalltalk.Browser);
- smalltalk.addMethod(
- '_commitPathJs',
- smalltalk.method({
- selector: 'commitPathJs',
- fn: function (){
- var self=this;
- return "js";
- return self;}
- }),
- smalltalk.Browser.klass);
- smalltalk.addMethod(
- '_commitPathSt',
- smalltalk.method({
- selector: 'commitPathSt',
- fn: function (){
- var self=this;
- return "st";
- return self;}
- }),
- smalltalk.Browser.klass);
- smalltalk.addMethod(
- '_openOn_',
- smalltalk.method({
- selector: 'openOn:',
- fn: function (aClass){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_open", []);smalltalk.send($rec, "_selectCategory_", [smalltalk.send(aClass, "_category", [])]);return smalltalk.send($rec, "_selectClass_", [aClass]);})(smalltalk.send(self, "_new", []));
- return self;}
- }),
- smalltalk.Browser.klass);
- smalltalk.addMethod(
- '_open',
- smalltalk.method({
- selector: 'open',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_new", []), "_open", []);
- return self;}
- }),
- smalltalk.Browser.klass);
- smalltalk.addClass('Inspector', smalltalk.TabWidget, ['label', 'variables', 'object', 'selectedVariable', 'variablesList', 'valueTextarea', 'diveButton', 'sourceArea'], 'IDE');
- smalltalk.addMethod(
- '_label',
- smalltalk.method({
- selector: 'label',
- fn: function (){
- var self=this;
- return (($receiver = self['@label']) == nil || $receiver == undefined) ? (function(){return unescape("Inspector%20%28nil%29");})() : $receiver;
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_variables',
- smalltalk.method({
- selector: 'variables',
- fn: function (){
- var self=this;
- return self['@variables'];
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_setVariables_',
- smalltalk.method({
- selector: 'setVariables:',
- fn: function (aCollection){
- var self=this;
- self['@variables']=aCollection;
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_setLabel_',
- smalltalk.method({
- selector: 'setLabel:',
- fn: function (aString){
- var self=this;
- self['@label']=aString;
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_selectedVariable',
- smalltalk.method({
- selector: 'selectedVariable',
- fn: function (){
- var self=this;
- return self['@selectedVariable'];
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_selectedVariable_',
- smalltalk.method({
- selector: 'selectedVariable:',
- fn: function (aString){
- var self=this;
- self['@selectedVariable']=aString;
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_sourceArea',
- smalltalk.method({
- selector: 'sourceArea',
- fn: function (){
- var self=this;
- return self['@sourceArea'];
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_inspect_',
- smalltalk.method({
- selector: 'inspect:',
- fn: function (anObject){
- var self=this;
- self['@object']=anObject;
- self['@variables']=[];
- smalltalk.send(self['@object'], "_inspectOn_", [self]);
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_dive',
- smalltalk.method({
- selector: 'dive',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(smalltalk.send(self, "_variables", []), "_at_", [smalltalk.send(self, "_selectedVariable", [])]), "_inspect", []);
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_refresh',
- smalltalk.method({
- selector: 'refresh',
- fn: function (){
- var self=this;
- (function($rec){smalltalk.send($rec, "_inspect_", [self['@object']]);smalltalk.send($rec, "_updateVariablesList", []);return smalltalk.send($rec, "_updateValueTextarea", []);})(self);
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_renderBoxOn_',
- smalltalk.method({
- selector: 'renderBoxOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_renderTopPanelOn_", [html]);return smalltalk.send($rec, "_renderBottomPanelOn_", [html]);})(self);
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_renderTopPanelOn_',
- smalltalk.method({
- selector: 'renderTopPanelOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_class_", ["top"]);return smalltalk.send($rec, "_with_", [(function(){self['@variablesList']=smalltalk.send(smalltalk.send(html, "_ul", []), "_class_", ["jt_column variables"]);self['@valueTextarea']=(function($rec){smalltalk.send($rec, "_class_", ["jt_column value"]);return smalltalk.send($rec, "_at_put_", ["readonly", "readonly"]);})(smalltalk.send(html, "_textarea", []));(function($rec){smalltalk.send($rec, "_class_", ["jt_tabs inspector"]);return smalltalk.send($rec, "_with_", [(function(){(function($rec){smalltalk.send($rec, "_class_", ["jt_button inspector refresh"]);smalltalk.send($rec, "_with_", ["Refresh"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_refresh", []);})]);})(smalltalk.send(html, "_button", []));return self['@diveButton']=(function($rec){smalltalk.send($rec, "_class_", ["jt_button inspector dive"]);smalltalk.send($rec, "_with_", ["Dive"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_dive", []);})]);})(smalltalk.send(html, "_button", []));})]);})(smalltalk.send(html, "_div", []));return smalltalk.send(smalltalk.send(html, "_div", []), "_class_", ["jt_clear"]);})]);})(smalltalk.send(html, "_div", []));
- (function($rec){smalltalk.send($rec, "_updateVariablesList", []);return smalltalk.send($rec, "_updateValueTextarea", []);})(self);
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_renderBottomPanelOn_',
- smalltalk.method({
- selector: 'renderBottomPanelOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_class_", ["jt_sourceCode"]);return smalltalk.send($rec, "_with_", [(function(){self['@sourceArea']=(function($rec){smalltalk.send($rec, "_receiver_", [self['@object']]);smalltalk.send($rec, "_onDoIt_", [(function(){return smalltalk.send(self, "_refresh", []);})]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.SourceArea || SourceArea), "_new", []));return smalltalk.send(self['@sourceArea'], "_renderOn_", [html]);})]);})(smalltalk.send(html, "_div", []));
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_renderButtonsOn_',
- smalltalk.method({
- selector: 'renderButtonsOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_with_", ["DoIt"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(smalltalk.send(self, "_sourceArea", []), "_doIt", []);})]);})(smalltalk.send(html, "_button", []));
- (function($rec){smalltalk.send($rec, "_with_", ["PrintIt"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(smalltalk.send(self, "_sourceArea", []), "_printIt", []);})]);})(smalltalk.send(html, "_button", []));
- (function($rec){smalltalk.send($rec, "_with_", ["InspectIt"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(smalltalk.send(self, "_sourceArea", []), "_inspectIt", []);})]);})(smalltalk.send(html, "_button", []));
- smalltalk.send(self, "_updateButtons", []);
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_canBeClosed',
- smalltalk.method({
- selector: 'canBeClosed',
- fn: function (){
- var self=this;
- return true;
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_updateVariablesList',
- smalltalk.method({
- selector: 'updateVariablesList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@variablesList'], "_contents_", [(function(html){return smalltalk.send(smalltalk.send(smalltalk.send(self, "_variables", []), "_keys", []), "_do_", [(function(each){var li=nil;
- li=smalltalk.send(html, "_li", []);(function($rec){smalltalk.send($rec, "_with_", [each]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectVariable_", [each]);})]);})(li);return (($receiver = smalltalk.send(smalltalk.send(self, "_selectedVariable", []), "__eq", [each])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);})]);})]);
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_selectVariable_',
- smalltalk.method({
- selector: 'selectVariable:',
- fn: function (aString){
- var self=this;
- smalltalk.send(self, "_selectedVariable_", [aString]);
- (function($rec){smalltalk.send($rec, "_updateVariablesList", []);smalltalk.send($rec, "_updateValueTextarea", []);return smalltalk.send($rec, "_updateButtons", []);})(self);
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_updateValueTextarea',
- smalltalk.method({
- selector: 'updateValueTextarea',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self['@valueTextarea'], "_asJQuery", []), "_val_", [(($receiver = smalltalk.send(smalltalk.send(self, "_selectedVariable", []), "_isNil", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return "";})() : (function(){return smalltalk.send(smalltalk.send(smalltalk.send(self, "_variables", []), "_at_", [smalltalk.send(self, "_selectedVariable", [])]), "_printString", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return "";}), (function(){return smalltalk.send(smalltalk.send(smalltalk.send(self, "_variables", []), "_at_", [smalltalk.send(self, "_selectedVariable", [])]), "_printString", []);})])]);
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_updateButtons',
- smalltalk.method({
- selector: 'updateButtons',
- fn: function (){
- var self=this;
- (($receiver = smalltalk.send(smalltalk.send(smalltalk.send(self, "_selectedVariable", []), "_notNil", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(smalltalk.send(self, "_variables", []), "_at_", [smalltalk.send(self, "_selectedVariable", [])]), "_notNil", []);})])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self['@diveButton'], "_at_put_", ["disabled", true]);})() : (function(){return smalltalk.send(self['@diveButton'], "_removeAt_", ["disabled"]);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(self['@diveButton'], "_at_put_", ["disabled", true]);}), (function(){return smalltalk.send(self['@diveButton'], "_removeAt_", ["disabled"]);})]);
- return self;}
- }),
- smalltalk.Inspector);
- smalltalk.addMethod(
- '_on_',
- smalltalk.method({
- selector: 'on:',
- fn: function (anObject){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_inspect_", [anObject]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", []));
- return self;}
- }),
- smalltalk.Inspector.klass);
- smalltalk.addClass('ReferencesBrowser', smalltalk.TabWidget, ['implementors', 'senders', 'implementorsList', 'input', 'timer', 'selector', 'sendersList', 'referencedClasses', 'referencedClassesList'], 'IDE');
- smalltalk.addMethod(
- '_implementors',
- smalltalk.method({
- selector: 'implementors',
- fn: function (){
- var self=this;
- return (($receiver = self['@implementors']) == nil || $receiver == undefined) ? (function(){return self['@implementors']=smalltalk.send((smalltalk.Array || Array), "_new", []);})() : $receiver;
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_label',
- smalltalk.method({
- selector: 'label',
- fn: function (){
- var self=this;
- return unescape("%5BReferences%5D");
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_selector',
- smalltalk.method({
- selector: 'selector',
- fn: function (){
- var self=this;
- return self['@selector'];
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_senders',
- smalltalk.method({
- selector: 'senders',
- fn: function (){
- var self=this;
- return (($receiver = self['@senders']) == nil || $receiver == undefined) ? (function(){return self['@senders']=smalltalk.send((smalltalk.Array || Array), "_new", []);})() : $receiver;
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_classesAndMetaclasses',
- smalltalk.method({
- selector: 'classesAndMetaclasses',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_classes", []), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_classes", []), "_collect_", [(function(each){return smalltalk.send(each, "_class", []);})])]);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_referencedClasses',
- smalltalk.method({
- selector: 'referencedClasses',
- fn: function (){
- var self=this;
- return (($receiver = self['@referencedClasses']) == nil || $receiver == undefined) ? (function(){return self['@referencedClasses']=smalltalk.send((smalltalk.Array || Array), "_new", []);})() : $receiver;
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_openBrowserOn_',
- smalltalk.method({
- selector: 'openBrowserOn:',
- fn: function (aMethod){
- var self=this;
- var browser=nil;
- browser=smalltalk.send((smalltalk.Browser || Browser), "_openOn_", [(($receiver = smalltalk.send(smalltalk.send(aMethod, "_methodClass", []), "_isMetaclass", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send(aMethod, "_methodClass", []), "_instanceClass", []);})() : (function(){return smalltalk.send(aMethod, "_methodClass", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send(aMethod, "_methodClass", []), "_instanceClass", []);}), (function(){return smalltalk.send(aMethod, "_methodClass", []);})])]);
- (($receiver = smalltalk.send(smalltalk.send(aMethod, "_methodClass", []), "_isMetaclass", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(browser, "_selectTab_", ["class"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(browser, "_selectTab_", ["class"]);})]);
- (function($rec){smalltalk.send($rec, "_selectProtocol_", [smalltalk.send(aMethod, "_category", [])]);return smalltalk.send($rec, "_selectMethod_", [aMethod]);})(browser);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_searchReferencesFor_',
- smalltalk.method({
- selector: 'searchReferencesFor:',
- fn: function (aString){
- var self=this;
- self['@selector']=aString;
- self['@implementors']=smalltalk.send((smalltalk.Array || Array), "_new", []);
- self['@senders']=smalltalk.send((smalltalk.Array || Array), "_new", []);
- self['@referencedClasses']=smalltalk.send((smalltalk.Array || Array), "_new", []);
- (($receiver = smalltalk.send(self['@selector'], "_match_", [unescape("%5E%5BA-Z%5D")])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_searchSelectorReferencesFor_", [self['@selector']]);})() : (function(){return smalltalk.send(self, "_searchReferencedClassesFor_", [self['@selector']]);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(self, "_searchSelectorReferencesFor_", [self['@selector']]);}), (function(){return smalltalk.send(self, "_searchReferencedClassesFor_", [self['@selector']]);})]);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_search_',
- smalltalk.method({
- selector: 'search:',
- fn: function (aString){
- var self=this;
- (function($rec){smalltalk.send($rec, "_searchReferencesFor_", [aString]);smalltalk.send($rec, "_updateImplementorsList", []);smalltalk.send($rec, "_updateSendersList", []);return smalltalk.send($rec, "_updateReferencedClassesList", []);})(self);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_searchReferencedClassesFor_',
- smalltalk.method({
- selector: 'searchReferencedClassesFor:',
- fn: function (aString){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_classesAndMetaclasses", []), "_do_", [(function(each){return smalltalk.send(smalltalk.send(smalltalk.send(each, "_methodDictionary", []), "_values", []), "_do_", [(function(value){return (($receiver = smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(value, "_referencedClasses", []), "_select_", [(function(each){return smalltalk.send(each, "_notNil", []);})]), "_collect_", [(function(each){return smalltalk.send(each, "_name", []);})]), "_includes_", [self['@selector']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send(self, "_referencedClasses", []), "_add_", [value]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(smalltalk.send(self, "_referencedClasses", []), "_add_", [value]);})]);})]);})]);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_searchSelectorReferencesFor_',
- smalltalk.method({
- selector: 'searchSelectorReferencesFor:',
- fn: function (aString){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_classesAndMetaclasses", []), "_do_", [(function(each){smalltalk.send(smalltalk.send(each, "_methodDictionary", []), "_keysAndValuesDo_", [(function(key, value){return (($receiver = smalltalk.send(key, "__eq", [self['@selector']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send(self, "_implementors", []), "_add_", [value]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(smalltalk.send(self, "_implementors", []), "_add_", [value]);})]);})]);return smalltalk.send(smalltalk.send(each, "_methodDictionary", []), "_keysAndValuesDo_", [(function(key, value){return (($receiver = smalltalk.send(smalltalk.send(value, "_messageSends", []), "_includes_", [self['@selector']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send(self, "_senders", []), "_add_", [value]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(smalltalk.send(self, "_senders", []), "_add_", [value]);})]);})]);})]);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_initialize',
- smalltalk.method({
- selector: 'initialize',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_initialize", [], smalltalk.TabWidget);
- self['@selector']="";
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_setInputEvents',
- smalltalk.method({
- selector: 'setInputEvents',
- fn: function (){
- var self=this;
- (function($rec){smalltalk.send($rec, "_onKeyUp_", [(function(){return self['@timer']=smalltalk.send((function(){return smalltalk.send(self, "_search_", [smalltalk.send(smalltalk.send(self['@input'], "_asJQuery", []), "_val", [])]);}), "_valueWithTimeout_", [(100)]);})]);return smalltalk.send($rec, "_onKeyDown_", [(function(){return (($receiver = self['@timer']) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self['@timer'], "_clearTimeout", []);})() : nil;})]);})(self['@input']);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_renderBoxOn_',
- smalltalk.method({
- selector: 'renderBoxOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_renderInputOn_", [html]);smalltalk.send($rec, "_renderImplementorsOn_", [html]);smalltalk.send($rec, "_renderSendersOn_", [html]);return smalltalk.send($rec, "_renderReferencedClassesOn_", [html]);})(self);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_renderInputOn_',
- smalltalk.method({
- selector: 'renderInputOn:',
- fn: function (html){
- var self=this;
- self['@input']=(function($rec){smalltalk.send($rec, "_class_", ["implementors"]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(html, "_input", []));
- smalltalk.send(smalltalk.send(self['@input'], "_asJQuery", []), "_val_", [self['@selector']]);
- smalltalk.send(self, "_setInputEvents", []);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_renderImplementorsOn_',
- smalltalk.method({
- selector: 'renderImplementorsOn:',
- fn: function (html){
- var self=this;
- self['@implementorsList']=smalltalk.send(smalltalk.send(html, "_ul", []), "_class_", ["jt_column implementors"]);
- smalltalk.send(self, "_updateImplementorsList", []);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_renderSendersOn_',
- smalltalk.method({
- selector: 'renderSendersOn:',
- fn: function (html){
- var self=this;
- self['@sendersList']=smalltalk.send(smalltalk.send(html, "_ul", []), "_class_", ["jt_column senders"]);
- smalltalk.send(self, "_updateSendersList", []);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_renderReferencedClassesOn_',
- smalltalk.method({
- selector: 'renderReferencedClassesOn:',
- fn: function (html){
- var self=this;
- self['@referencedClassesList']=smalltalk.send(smalltalk.send(html, "_ul", []), "_class_", ["jt_column referenced_classes"]);
- smalltalk.send(self, "_updateReferencedClassesList", []);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_canBeClosed',
- smalltalk.method({
- selector: 'canBeClosed',
- fn: function (){
- var self=this;
- return true;
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_updateImplementorsList',
- smalltalk.method({
- selector: 'updateImplementorsList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@implementorsList'], "_contents_", [(function(html){(function($rec){smalltalk.send($rec, "_class_", ["column_label"]);smalltalk.send($rec, "_with_", [smalltalk.send(smalltalk.send(unescape("Implementors%20%28"), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send(self, "_implementors", []), "_size", []), "_asString", [])]), "__comma", [unescape("%29")])]);return smalltalk.send($rec, "_style_", [unescape("font-weight%3A%20bold")]);})(smalltalk.send(html, "_li", []));return smalltalk.send(smalltalk.send(self, "_implementors", []), "_do_", [(function(each){var li=nil;
- li=smalltalk.send(html, "_li", []);return (function($rec){smalltalk.send($rec, "_with_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(each, "_methodClass", []), "_asString", []), "__comma", [unescape("%20%3E%3E%20")]), "__comma", [smalltalk.send(self, "_selector", [])])]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_openBrowserOn_", [each]);})]);})(li);})]);})]);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_updateSendersList',
- smalltalk.method({
- selector: 'updateSendersList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@sendersList'], "_contents_", [(function(html){(function($rec){smalltalk.send($rec, "_class_", ["column_label"]);smalltalk.send($rec, "_with_", [smalltalk.send(smalltalk.send(unescape("Senders%20%28"), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send(self, "_senders", []), "_size", []), "_asString", [])]), "__comma", [unescape("%29")])]);return smalltalk.send($rec, "_style_", [unescape("font-weight%3A%20bold")]);})(smalltalk.send(html, "_li", []));return smalltalk.send(smalltalk.send(self, "_senders", []), "_do_", [(function(each){return (function($rec){smalltalk.send($rec, "_with_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(each, "_methodClass", []), "_asString", []), "__comma", [unescape("%20%3E%3E%20")]), "__comma", [smalltalk.send(each, "_selector", [])])]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_openBrowserOn_", [each]);})]);})(smalltalk.send(html, "_li", []));})]);})]);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_updateReferencedClassesList',
- smalltalk.method({
- selector: 'updateReferencedClassesList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@referencedClassesList'], "_contents_", [(function(html){(function($rec){smalltalk.send($rec, "_class_", ["column_label"]);smalltalk.send($rec, "_with_", [smalltalk.send(smalltalk.send(unescape("Class%20references%20%28"), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send(self, "_referencedClasses", []), "_size", []), "_asString", [])]), "__comma", [unescape("%29")])]);return smalltalk.send($rec, "_style_", [unescape("font-weight%3A%20bold")]);})(smalltalk.send(html, "_li", []));return smalltalk.send(smalltalk.send(self, "_referencedClasses", []), "_do_", [(function(each){return (function($rec){smalltalk.send($rec, "_with_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(each, "_methodClass", []), "_asString", []), "__comma", [unescape("%20%3E%3E%20")]), "__comma", [smalltalk.send(each, "_selector", [])])]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_openBrowserOn_", [each]);})]);})(smalltalk.send(html, "_li", []));})]);})]);
- return self;}
- }),
- smalltalk.ReferencesBrowser);
- smalltalk.addMethod(
- '_search_',
- smalltalk.method({
- selector: 'search:',
- fn: function (aString){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_searchReferencesFor_", [aString]);return smalltalk.send($rec, "_open", []);})(smalltalk.send(self, "_new", []));
- return self;}
- }),
- smalltalk.ReferencesBrowser.klass);
- smalltalk.addClass('SourceArea', smalltalk.Widget, ['editor', 'div', 'receiver', 'onDoIt'], 'IDE');
- smalltalk.addMethod(
- '_val',
- smalltalk.method({
- selector: 'val',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@editor'], "_getValue", []);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_val_',
- smalltalk.method({
- selector: 'val:',
- fn: function (aString){
- var self=this;
- smalltalk.send(self['@editor'], "_setValue_", [aString]);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_currentLine',
- smalltalk.method({
- selector: 'currentLine',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@editor'], "_getLine_", [smalltalk.send(smalltalk.send(self['@editor'], "_getCursor", []), "_line", [])]);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_selection',
- smalltalk.method({
- selector: 'selection',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@editor'], "_getSelection", []);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_selectionEnd',
- smalltalk.method({
- selector: 'selectionEnd',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send((typeof textarea == 'undefined' ? nil : textarea), "_element", []), "_selectionEnd", []);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_selectionStart',
- smalltalk.method({
- selector: 'selectionStart',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send((typeof textarea == 'undefined' ? nil : textarea), "_element", []), "_selectionStart", []);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_selectionStart_',
- smalltalk.method({
- selector: 'selectionStart:',
- fn: function (anInteger){
- var self=this;
- smalltalk.send(smalltalk.send((typeof textarea == 'undefined' ? nil : textarea), "_element", []), "_selectionStart_", [anInteger]);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_selectionEnd_',
- smalltalk.method({
- selector: 'selectionEnd:',
- fn: function (anInteger){
- var self=this;
- smalltalk.send(smalltalk.send((typeof textarea == 'undefined' ? nil : textarea), "_element", []), "_selectionEnd_", [anInteger]);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_setEditorOn_',
- smalltalk.method({
- selector: 'setEditorOn:',
- fn: function (aTextarea){
- var self=this;
- self['@editor'] = CodeMirror.fromTextArea(aTextarea, {
- theme: 'jtalk',
- lineNumbers: true,
- enterMode: 'classic',
- matchBrackets: true,
- electricChars: false,
- });
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_editor',
- smalltalk.method({
- selector: 'editor',
- fn: function (){
- var self=this;
- return self['@editor'];
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_receiver',
- smalltalk.method({
- selector: 'receiver',
- fn: function (){
- var self=this;
- return (($receiver = self['@receiver']) == nil || $receiver == undefined) ? (function(){return smalltalk.send((smalltalk.DoIt || DoIt), "_new", []);})() : $receiver;
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_receiver_',
- smalltalk.method({
- selector: 'receiver:',
- fn: function (anObject){
- var self=this;
- self['@receiver']=anObject;
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_onDoIt_',
- smalltalk.method({
- selector: 'onDoIt:',
- fn: function (aBlock){
- var self=this;
- self['@onDoIt']=aBlock;
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_onDoIt',
- smalltalk.method({
- selector: 'onDoIt',
- fn: function (){
- var self=this;
- return self['@onDoIt'];
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_currentLineOrSelection',
- smalltalk.method({
- selector: 'currentLineOrSelection',
- fn: function (){
- var self=this;
- return (($receiver = smalltalk.send(self['@editor'], "_somethingSelected", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_currentLine", []);})() : (function(){return smalltalk.send(self, "_selection", []);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(self, "_currentLine", []);}), (function(){return smalltalk.send(self, "_selection", []);})]);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_clear',
- smalltalk.method({
- selector: 'clear',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_val_", [""]);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_doIt',
- smalltalk.method({
- selector: 'doIt',
- fn: function (){
- var self=this;
- var result=nil;
- result=smalltalk.send(self, "_eval_", [smalltalk.send(self, "_currentLineOrSelection", [])]);
- (($receiver = smalltalk.send(self, "_onDoIt", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(smalltalk.send(self, "_onDoIt", []), "_value", []);})() : nil;
- return result;
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_eval_',
- smalltalk.method({
- selector: 'eval:',
- fn: function (aString){
- var self=this;
- try{var compiler=nil;
- compiler=smalltalk.send((smalltalk.Compiler || Compiler), "_new", []);
- smalltalk.send((function(){return smalltalk.send(compiler, "_parseExpression_", [aString]);}), "_on_do_", [(smalltalk.Error || Error), (function(ex){return (function(){throw({name: 'stReturn', selector: '_eval_', fn: function(){return smalltalk.send(self, "_alert_", [smalltalk.send(ex, "_messageText", [])])}})})();})]);
- (function(){throw({name: 'stReturn', selector: '_eval_', fn: function(){return smalltalk.send(smalltalk.send(smalltalk.send(compiler, "_load_forClass_", [smalltalk.send(smalltalk.send(unescape("doIt%20%5E%5B"), "__comma", [aString]), "__comma", [unescape("%5D%20value")]), (smalltalk.DoIt || DoIt)]), "_fn", []), "_applyTo_arguments_", [smalltalk.send(self, "_receiver", []), []])}})})();
- return self;
- } catch(e) {if(e.name === 'stReturn' && e.selector === '_eval_'){return e.fn()} throw(e)}}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_handleKeyDown_',
- smalltalk.method({
- selector: 'handleKeyDown:',
- fn: function (anEvent){
- var self=this;
- if(anEvent.ctrlKey) {
- if(anEvent.keyCode === 80) { //ctrl+p
- self._printIt();
- anEvent.preventDefault();
- return false;
- }
- if(anEvent.keyCode === 68) { //ctrl+d
- self._doIt();
- anEvent.preventDefault();
- return false;
- }
- if(anEvent.keyCode === 73) { //ctrl+i
- self._inspectIt();
- anEvent.preventDefault();
- return false;
- }
- };
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_inspectIt',
- smalltalk.method({
- selector: 'inspectIt',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_doIt", []), "_inspect", []);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_print_',
- smalltalk.method({
- selector: 'print:',
- fn: function (aString){
- var self=this;
- var start=nil;
- var stop=nil;
- start=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []);
- stop=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []);
- smalltalk.send(start, "_at_put_", ["line", smalltalk.send(smalltalk.send(self['@editor'], "_getCursor_", [false]), "_line", [])]);
- smalltalk.send(start, "_at_put_", ["ch", smalltalk.send(smalltalk.send(self['@editor'], "_getCursor_", [false]), "_ch", [])]);
- smalltalk.send(stop, "_at_put_", ["line", smalltalk.send(start, "_at_", ["line"])]);
- smalltalk.send(stop, "_at_put_", ["ch", (($receiver = (($receiver = smalltalk.send(start, "_at_", ["ch"])).klass === smalltalk.Number) ? $receiver +smalltalk.send(aString, "_size", []) : smalltalk.send($receiver, "__plus", [smalltalk.send(aString, "_size", [])])).klass === smalltalk.Number) ? $receiver +(2) : smalltalk.send($receiver, "__plus", [(2)])]);
- smalltalk.send(self['@editor'], "_replaceSelection_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self['@editor'], "_getSelection", []), "__comma", [" "]), "__comma", [aString]), "__comma", [" "])]);
- smalltalk.send(self['@editor'], "_setCursor_", [smalltalk.send(self['@editor'], "_getCursor_", [true])]);
- smalltalk.send(self['@editor'], "_setSelection_end_", [stop, start]);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_printIt',
- smalltalk.method({
- selector: 'printIt',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_print_", [smalltalk.send(smalltalk.send(self, "_doIt", []), "_printString", [])]);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_fileIn',
- smalltalk.method({
- selector: 'fileIn',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send((smalltalk.Importer || Importer), "_new", []), "_import_", [smalltalk.send(smalltalk.send(self, "_currentLineOrSelection", []), "_readStream", [])]);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_onKeyUp_',
- smalltalk.method({
- selector: 'onKeyUp:',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(self['@div'], "_onKeyUp_", [aBlock]);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_onKeyDown_',
- smalltalk.method({
- selector: 'onKeyDown:',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(self['@div'], "_onKeyDown_", [aBlock]);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addMethod(
- '_renderOn_',
- smalltalk.method({
- selector: 'renderOn:',
- fn: function (html){
- var self=this;
- var textarea=nil;
- self['@div']=smalltalk.send(smalltalk.send(html, "_div", []), "_class_", ["source"]);
- smalltalk.send(self['@div'], "_with_", [(function(){return textarea=smalltalk.send(html, "_textarea", []);})]);
- smalltalk.send(self, "_setEditorOn_", [smalltalk.send(textarea, "_element", [])]);
- smalltalk.send(self['@div'], "_onKeyDown_", [(function(e){return smalltalk.send(self, "_handleKeyDown_", [e]);})]);
- return self;}
- }),
- smalltalk.SourceArea);
- smalltalk.addClass('ClassesList', smalltalk.Widget, ['browser', 'ul', 'nodes'], 'IDE');
- smalltalk.addMethod(
- '_category',
- smalltalk.method({
- selector: 'category',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_browser", []), "_selectedPackage", []);
- return self;}
- }),
- smalltalk.ClassesList);
- smalltalk.addMethod(
- '_nodes',
- smalltalk.method({
- selector: 'nodes',
- fn: function (){
- var self=this;
- (($receiver = self['@nodes']) == nil || $receiver == undefined) ? (function(){return self['@nodes']=smalltalk.send(self, "_getNodes", []);})() : $receiver;
- return self['@nodes'];
- return self;}
- }),
- smalltalk.ClassesList);
- smalltalk.addMethod(
- '_browser',
- smalltalk.method({
- selector: 'browser',
- fn: function (){
- var self=this;
- return self['@browser'];
- return self;}
- }),
- smalltalk.ClassesList);
- smalltalk.addMethod(
- '_browser_',
- smalltalk.method({
- selector: 'browser:',
- fn: function (aBrowser){
- var self=this;
- self['@browser']=aBrowser;
- return self;}
- }),
- smalltalk.ClassesList);
- smalltalk.addMethod(
- '_getNodes',
- smalltalk.method({
- selector: 'getNodes',
- fn: function (){
- var self=this;
- var classes=nil;
- var children=nil;
- var others=nil;
- classes=smalltalk.send(smalltalk.send(self, "_browser", []), "_classes", []);
- children=[];
- others=[];
- smalltalk.send(classes, "_do_", [(function(each){return (($receiver = smalltalk.send(classes, "_includes_", [smalltalk.send(each, "_superclass", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(children, "_add_", [each]);})() : (function(){return smalltalk.send(others, "_add_", [each]);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(children, "_add_", [each]);}), (function(){return smalltalk.send(others, "_add_", [each]);})]);})]);
- return smalltalk.send(children, "_collect_", [(function(each){return smalltalk.send((smalltalk.ClassesListNode || ClassesListNode), "_on_browser_classes_level_", [each, smalltalk.send(self, "_browser", []), others, (0)]);})]);
- return self;}
- }),
- smalltalk.ClassesList);
- smalltalk.addMethod(
- '_resetNodes',
- smalltalk.method({
- selector: 'resetNodes',
- fn: function (){
- var self=this;
- self['@nodes']=nil;
- return self;}
- }),
- smalltalk.ClassesList);
- smalltalk.addMethod(
- '_renderOn_',
- smalltalk.method({
- selector: 'renderOn:',
- fn: function (html){
- var self=this;
- self['@ul']=(function($rec){smalltalk.send($rec, "_class_", ["jt_column browser classes"]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(html, "_ul", []));
- smalltalk.send(self, "_updateNodes", []);
- return self;}
- }),
- smalltalk.ClassesList);
- smalltalk.addMethod(
- '_updateNodes',
- smalltalk.method({
- selector: 'updateNodes',
- fn: function (){
- var self=this;
- smalltalk.send(self['@ul'], "_contents_", [(function(html){return smalltalk.send(smalltalk.send(self, "_nodes", []), "_do_", [(function(each){return smalltalk.send(each, "_renderOn_", [html]);})]);})]);
- return self;}
- }),
- smalltalk.ClassesList);
- smalltalk.addMethod(
- '_on_',
- smalltalk.method({
- selector: 'on:',
- fn: function (aBrowser){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_browser_", [aBrowser]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", []));
- return self;}
- }),
- smalltalk.ClassesList.klass);
- smalltalk.addClass('ClassesListNode', smalltalk.Widget, ['browser', 'theClass', 'level', 'nodes'], 'IDE');
- smalltalk.addMethod(
- '_renderOn_',
- smalltalk.method({
- selector: 'renderOn:',
- fn: function (html){
- var self=this;
- var li=nil;
- var cssClass=nil;
- cssClass="";
- li=smalltalk.send(smalltalk.send(html, "_li", []), "_onClick_", [(function(){return smalltalk.send(smalltalk.send(self, "_browser", []), "_selectClass_", [smalltalk.send(self, "_theClass", [])]);})]);
- smalltalk.send(smalltalk.send(li, "_asJQuery", []), "_contents_", [smalltalk.send(self, "_label", [])]);
- (($receiver = smalltalk.send(smalltalk.send(smalltalk.send(self, "_browser", []), "_selectedClass", []), "__eq", [smalltalk.send(self, "_theClass", [])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return cssClass=smalltalk.send(cssClass, "__comma", [" selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return cssClass=smalltalk.send(cssClass, "__comma", [" selected"]);})]);
- (($receiver = smalltalk.send(smalltalk.send(smalltalk.send(self, "_theClass", []), "_comment", []), "_isEmpty", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return cssClass=smalltalk.send(cssClass, "__comma", [" commented"]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return cssClass=smalltalk.send(cssClass, "__comma", [" commented"]);})]);
- smalltalk.send(li, "_class_", [cssClass]);
- smalltalk.send(smalltalk.send(self, "_nodes", []), "_do_", [(function(each){return smalltalk.send(each, "_renderOn_", [html]);})]);
- return self;}
- }),
- smalltalk.ClassesListNode);
- smalltalk.addMethod(
- '_nodes',
- smalltalk.method({
- selector: 'nodes',
- fn: function (){
- var self=this;
- return self['@nodes'];
- return self;}
- }),
- smalltalk.ClassesListNode);
- smalltalk.addMethod(
- '_theClass',
- smalltalk.method({
- selector: 'theClass',
- fn: function (){
- var self=this;
- return self['@theClass'];
- return self;}
- }),
- smalltalk.ClassesListNode);
- smalltalk.addMethod(
- '_theClass_',
- smalltalk.method({
- selector: 'theClass:',
- fn: function (aClass){
- var self=this;
- self['@theClass']=aClass;
- return self;}
- }),
- smalltalk.ClassesListNode);
- smalltalk.addMethod(
- '_browser',
- smalltalk.method({
- selector: 'browser',
- fn: function (){
- var self=this;
- return self['@browser'];
- return self;}
- }),
- smalltalk.ClassesListNode);
- smalltalk.addMethod(
- '_browser_',
- smalltalk.method({
- selector: 'browser:',
- fn: function (aBrowser){
- var self=this;
- self['@browser']=aBrowser;
- return self;}
- }),
- smalltalk.ClassesListNode);
- smalltalk.addMethod(
- '_level',
- smalltalk.method({
- selector: 'level',
- fn: function (){
- var self=this;
- return self['@level'];
- return self;}
- }),
- smalltalk.ClassesListNode);
- smalltalk.addMethod(
- '_level_',
- smalltalk.method({
- selector: 'level:',
- fn: function (anInteger){
- var self=this;
- self['@level']=anInteger;
- return self;}
- }),
- smalltalk.ClassesListNode);
- smalltalk.addMethod(
- '_label',
- smalltalk.method({
- selector: 'label',
- fn: function (){
- var self=this;
- var str=nil;
- str=smalltalk.send(smalltalk.send((smalltalk.String || String), "_new", []), "_writeStream", []);
- smalltalk.send(smalltalk.send(self, "_level", []), "_timesRepeat_", [(function(){return smalltalk.send(str, "_nextPutAll_", [unescape("%26nbsp%3B%26nbsp%3B%26nbsp%3B%26nbsp%3B")]);})]);
- smalltalk.send(str, "_nextPutAll_", [smalltalk.send(smalltalk.send(self, "_theClass", []), "_name", [])]);
- return smalltalk.send(str, "_contents", []);
- return self;}
- }),
- smalltalk.ClassesListNode);
- smalltalk.addMethod(
- '_getNodesFrom_',
- smalltalk.method({
- selector: 'getNodesFrom:',
- fn: function (aCollection){
- var self=this;
- var children=nil;
- var others=nil;
- children=[];
- others=[];
- smalltalk.send(aCollection, "_do_", [(function(each){return (($receiver = smalltalk.send(smalltalk.send(each, "_superclass", []), "__eq", [smalltalk.send(self, "_theClass", [])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(children, "_add_", [each]);})() : (function(){return smalltalk.send(others, "_add_", [each]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(children, "_add_", [each]);}), (function(){return smalltalk.send(others, "_add_", [each]);})]);})]);
- self['@nodes']=smalltalk.send(children, "_collect_", [(function(each){return smalltalk.send((smalltalk.ClassesListNode || ClassesListNode), "_on_browser_classes_level_", [each, smalltalk.send(self, "_browser", []), others, (($receiver = smalltalk.send(self, "_level", [])).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])]);})]);
- return self;}
- }),
- smalltalk.ClassesListNode);
- smalltalk.addMethod(
- '_on_browser_classes_level_',
- smalltalk.method({
- selector: 'on:browser:classes:level:',
- fn: function (aClass, aBrowser, aCollection, anInteger){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_theClass_", [aClass]);smalltalk.send($rec, "_browser_", [aBrowser]);smalltalk.send($rec, "_level_", [anInteger]);smalltalk.send($rec, "_getNodesFrom_", [aCollection]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", []));
- return self;}
- }),
- smalltalk.ClassesListNode.klass);
- smalltalk.addClass('Debugger', smalltalk.TabWidget, ['error', 'selectedContext', 'sourceArea', 'ul', 'ul2', 'inspector', 'saveButton', 'unsavedChanges', 'selectedVariable', 'selectedVariableName', 'inspectButton'], 'IDE');
- smalltalk.addMethod(
- '_error',
- smalltalk.method({
- selector: 'error',
- fn: function (){
- var self=this;
- return self['@error'];
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_error_',
- smalltalk.method({
- selector: 'error:',
- fn: function (anError){
- var self=this;
- self['@error']=anError;
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_label',
- smalltalk.method({
- selector: 'label',
- fn: function (){
- var self=this;
- return unescape("%5BDebugger%5D");
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_source',
- smalltalk.method({
- selector: 'source',
- fn: function (){
- var self=this;
- return (($receiver = smalltalk.send(self, "_method", [])) == nil || $receiver == undefined) ? (function(){return unescape("Method%20doesn%27t%20exist%21");})() : (function(){return smalltalk.send(smalltalk.send(self, "_method", []), "_source", []);})();
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_method',
- smalltalk.method({
- selector: 'method',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(smalltalk.send(self['@selectedContext'], "_receiver", []), "_class", []), "_methodAt_", [smalltalk.send(self['@selectedContext'], "_selector", [])]);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_arguments',
- smalltalk.method({
- selector: 'arguments',
- fn: function (){
- var self=this;
- return (($receiver = smalltalk.send(self, "_method", [])) == nil || $receiver == undefined) ? (function(){return smalltalk.send(smalltalk.send(self['@selectedContext'], "_temps", []), "_collect_", [(function(each){return nil;})]);})() : (function(){return smalltalk.send(smalltalk.send(self, "_method", []), "_arguments", []);})();
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_receiver',
- smalltalk.method({
- selector: 'receiver',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@selectedContext'], "_receiver", []);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_selectContext_',
- smalltalk.method({
- selector: 'selectContext:',
- fn: function (aContext){
- var self=this;
- self['@selectedContext']=aContext;
- self['@selectedVariable']=nil;
- self['@selectedVariableName']=nil;
- (function($rec){smalltalk.send($rec, "_updateContextsList", []);smalltalk.send($rec, "_updateSourceArea", []);smalltalk.send($rec, "_updateInspector", []);smalltalk.send($rec, "_updateVariablesList", []);return smalltalk.send($rec, "_updateStatus", []);})(self);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_proceed',
- smalltalk.method({
- selector: 'proceed',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_close", []);
- smalltalk.send(smalltalk.send(self['@selectedContext'], "_receiver", []), "_perform_withArguments_", [smalltalk.send(self['@selectedContext'], "_selector", []), smalltalk.send(self['@selectedContext'], "_temps", [])]);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_save',
- smalltalk.method({
- selector: 'save',
- fn: function (){
- var self=this;
- var protocol=nil;
- protocol=smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self['@selectedContext'], "_receiver", []), "_class", []), "_methodDictionary", []), "_at_", [smalltalk.send(self['@selectedContext'], "_selector", [])]), "_category", []);
- smalltalk.send(smalltalk.send(smalltalk.send(self['@selectedContext'], "_receiver", []), "_class", []), "_compile_category_", [smalltalk.send(self['@sourceArea'], "_val", []), protocol]);
- smalltalk.send(self, "_updateStatus", []);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_selectVariable_named_',
- smalltalk.method({
- selector: 'selectVariable:named:',
- fn: function (anObject, aString){
- var self=this;
- self['@selectedVariable']=anObject;
- self['@selectedVariableName']=aString;
- smalltalk.send(self['@inspector'], "_contents_", [(function(html){return smalltalk.send(html, "_with_", [smalltalk.send(anObject, "_printString", [])]);})]);
- smalltalk.send(self, "_updateVariablesList", []);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_inspectSelectedVariable',
- smalltalk.method({
- selector: 'inspectSelectedVariable',
- fn: function (){
- var self=this;
- smalltalk.send(self['@selectedVariable'], "_inspect", []);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_initialize',
- smalltalk.method({
- selector: 'initialize',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_initialize", [], smalltalk.TabWidget);
- smalltalk.send(self['@unsavedChanges'], "__eq", [false]);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_renderTopPanelOn_',
- smalltalk.method({
- selector: 'renderTopPanelOn:',
- fn: function (html){
- var self=this;
- self['@selectedContext']=smalltalk.send(smalltalk.send(self, "_error", []), "_context", []);
- (function($rec){smalltalk.send($rec, "_class_", ["top"]);return smalltalk.send($rec, "_with_", [(function(){(function($rec){smalltalk.send($rec, "_class_", ["label"]);return smalltalk.send($rec, "_with_", [smalltalk.send(smalltalk.send(self, "_error", []), "_messageText", [])]);})(smalltalk.send(html, "_div", []));return self['@ul']=(function($rec){smalltalk.send($rec, "_class_", ["jt_column debugger contexts"]);return smalltalk.send($rec, "_with_", [(function(){return smalltalk.send(self, "_renderContext_on_", [smalltalk.send(smalltalk.send(self, "_error", []), "_context", []), html]);})]);})(smalltalk.send(html, "_ul", []));})]);})(smalltalk.send(html, "_div", []));
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_renderContext_on_',
- smalltalk.method({
- selector: 'renderContext:on:',
- fn: function (aContext, html){
- var self=this;
- var li=nil;
- li=smalltalk.send(html, "_li", []);
- (($receiver = smalltalk.send(self['@selectedContext'], "__eq", [aContext])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);
- (function($rec){smalltalk.send($rec, "_with_", [smalltalk.send(aContext, "_asString", [])]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectContext_", [aContext]);})]);})(li);
- (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_renderContext_on_", [smalltalk.send(aContext, "_home", []), html]);})() : nil;
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_renderBottomPanelOn_',
- smalltalk.method({
- selector: 'renderBottomPanelOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_class_", ["jt_sourceCode debugger"]);return smalltalk.send($rec, "_with_", [(function(){self['@sourceArea']=smalltalk.send((smalltalk.SourceArea || SourceArea), "_new", []);return smalltalk.send(self['@sourceArea'], "_renderOn_", [html]);})]);})(smalltalk.send(html, "_div", []));
- self['@ul2']=smalltalk.send(smalltalk.send(html, "_ul", []), "_class_", ["jt_column debugger variables"]);
- self['@inspector']=smalltalk.send(smalltalk.send(html, "_div", []), "_class_", ["jt_column debugger inspector"]);
- smalltalk.send(self['@sourceArea'], "_onKeyUp_", [(function(){return smalltalk.send(self, "_updateStatus", []);})]);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_renderButtonsOn_',
- smalltalk.method({
- selector: 'renderButtonsOn:',
- fn: function (html){
- var self=this;
- self['@saveButton']=(function($rec){smalltalk.send($rec, "_with_", ["Save"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_save", []);})]);})(smalltalk.send(html, "_button", []));
- (function($rec){smalltalk.send($rec, "_with_", ["DoIt"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self['@sourceArea'], "_doIt", []);})]);})(smalltalk.send(html, "_button", []));
- (function($rec){smalltalk.send($rec, "_with_", ["PrintIt"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self['@sourceArea'], "_printIt", []);})]);})(smalltalk.send(html, "_button", []));
- (function($rec){smalltalk.send($rec, "_with_", ["InspectIt"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self['@sourceArea'], "_inspectIt", []);})]);})(smalltalk.send(html, "_button", []));
- (function($rec){smalltalk.send($rec, "_with_", ["Proceed"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_proceed", []);})]);})(smalltalk.send(html, "_button", []));
- (function($rec){smalltalk.send($rec, "_with_", ["Abandon"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_close", []);})]);})(smalltalk.send(html, "_button", []));
- self['@inspectButton']=(function($rec){smalltalk.send($rec, "_class_", ["jt_button debugger inspect"]);smalltalk.send($rec, "_with_", ["Inspect"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_inspectSelectedVariable", []);})]);})(smalltalk.send(html, "_button", []));
- (function($rec){smalltalk.send($rec, "_updateSourceArea", []);smalltalk.send($rec, "_updateStatus", []);smalltalk.send($rec, "_updateVariablesList", []);return smalltalk.send($rec, "_updateInspector", []);})(self);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_renderBoxOn_',
- smalltalk.method({
- selector: 'renderBoxOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_renderTopPanelOn_", [html]);return smalltalk.send($rec, "_renderBottomPanelOn_", [html]);})(self);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_canBeClosed',
- smalltalk.method({
- selector: 'canBeClosed',
- fn: function (){
- var self=this;
- return true;
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_updateContextsList',
- smalltalk.method({
- selector: 'updateContextsList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@ul'], "_contents_", [(function(html){return smalltalk.send(self, "_renderContext_on_", [smalltalk.send(smalltalk.send(self, "_error", []), "_context", []), html]);})]);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_updateSourceArea',
- smalltalk.method({
- selector: 'updateSourceArea',
- fn: function (){
- var self=this;
- smalltalk.send(self['@sourceArea'], "_val_", [smalltalk.send(self, "_source", [])]);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_updateStatus',
- smalltalk.method({
- selector: 'updateStatus',
- fn: function (){
- var self=this;
- (($receiver = smalltalk.send(smalltalk.send(self['@sourceArea'], "_val", []), "__eq", [smalltalk.send(self, "_source", [])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){(($receiver = self['@saveButton']) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self['@saveButton'], "_at_put_", ["disabled", true]);})() : nil;return self['@unsavedChanges']=false;})() : (function(){(($receiver = self['@saveButton']) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self['@saveButton'], "_removeAt_", ["disabled"]);})() : nil;return self['@unsavedChanges']=true;})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){(($receiver = self['@saveButton']) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self['@saveButton'], "_at_put_", ["disabled", true]);})() : nil;return self['@unsavedChanges']=false;}), (function(){(($receiver = self['@saveButton']) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self['@saveButton'], "_removeAt_", ["disabled"]);})() : nil;return self['@unsavedChanges']=true;})]);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_updateInspector',
- smalltalk.method({
- selector: 'updateInspector',
- fn: function (){
- var self=this;
- smalltalk.send(self['@inspector'], "_contents_", [(function(html){return nil;})]);
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addMethod(
- '_updateVariablesList',
- smalltalk.method({
- selector: 'updateVariablesList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@ul2'], "_contents_", [(function(html){var li=nil;
- li=(function($rec){smalltalk.send($rec, "_with_", ["self"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectVariable_named_", [smalltalk.send(self, "_receiver", []), "self"]);})]);})(smalltalk.send(html, "_li", []));(($receiver = smalltalk.send(self['@selectedVariableName'], "__eq", ["self"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);smalltalk.send(smalltalk.send(self, "_arguments", []), "_withIndexDo_", [(function(each, index){var param=nil;
- param=smalltalk.send(smalltalk.send(self['@selectedContext'], "_temps", []), "_at_", [index]);li=(function($rec){smalltalk.send($rec, "_with_", [each]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectVariable_named_", [param, each]);})]);})(smalltalk.send(html, "_li", []));return (($receiver = smalltalk.send(self['@selectedVariableName'], "__eq", [each])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);})]);return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_receiver", []), "_class", []), "_allInstanceVariableNames", []), "_do_", [(function(each){var ivar=nil;
- ivar=smalltalk.send(smalltalk.send(self, "_receiver", []), "_instVarAt_", [each]);li=(function($rec){smalltalk.send($rec, "_with_", [each]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectVariable_named_", [ivar, each]);})]);})(smalltalk.send(html, "_li", []));return (($receiver = smalltalk.send(self['@selectedVariableName'], "__eq", [each])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);})]);})]);
- (($receiver = self['@selectedVariable']) == nil || $receiver == undefined) ? (function(){return smalltalk.send(self['@inspectButton'], "_at_put_", ["disabled", true]);})() : (function(){return smalltalk.send(self['@inspectButton'], "_removeAt_", ["disabled"]);})();
- return self;}
- }),
- smalltalk.Debugger);
- smalltalk.addClass('DebugErrorHandler', smalltalk.ErrorHandler, [], 'IDE');
- smalltalk.addMethod(
- '_handleError_',
- smalltalk.method({
- selector: 'handleError:',
- fn: function (anError){
- var self=this;
- smalltalk.send((function(){return (function($rec){smalltalk.send($rec, "_error_", [anError]);return smalltalk.send($rec, "_open", []);})(smalltalk.send((smalltalk.Debugger || Debugger), "_new", []));}), "_on_do_", [(smalltalk.Error || Error), (function(error){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [error]);})]);
- return self;}
- }),
- smalltalk.DebugErrorHandler);
- smalltalk.addMethod(
- '_initialize',
- smalltalk.method({
- selector: 'initialize',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_register", []);
- return self;}
- }),
- smalltalk.DebugErrorHandler.klass);
- smalltalk.addClass('ProgressBar', smalltalk.TabWidget, ['percent', 'progressDiv', 'div'], 'IDE');
- smalltalk.addMethod(
- '_percent',
- smalltalk.method({
- selector: 'percent',
- fn: function (){
- var self=this;
- return (($receiver = self['@percent']) == nil || $receiver == undefined) ? (function(){return (0);})() : $receiver;
- return self;}
- }),
- smalltalk.ProgressBar);
- smalltalk.addMethod(
- '_percent_',
- smalltalk.method({
- selector: 'percent:',
- fn: function (aNumber){
- var self=this;
- self['@percent']=aNumber;
- return self;}
- }),
- smalltalk.ProgressBar);
- smalltalk.addMethod(
- '_renderOn_',
- smalltalk.method({
- selector: 'renderOn:',
- fn: function (html){
- var self=this;
- self['@div']=(function($rec){smalltalk.send($rec, "_class_", ["progress_bar"]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(html, "_div", []));
- smalltalk.send(self, "_renderProgressBar", []);
- return self;}
- }),
- smalltalk.ProgressBar);
- smalltalk.addMethod(
- '_renderProgressBar',
- smalltalk.method({
- selector: 'renderProgressBar',
- fn: function (){
- var self=this;
- smalltalk.send(self['@div'], "_contents_", [(function(html){return (function($rec){smalltalk.send($rec, "_class_", ["progress"]);return smalltalk.send($rec, "_style_", [smalltalk.send(smalltalk.send("width:", "__comma", [smalltalk.send(smalltalk.send(self, "_percent", []), "_asString", [])]), "__comma", [unescape("%25")])]);})(smalltalk.send(html, "_div", []));})]);
- return self;}
- }),
- smalltalk.ProgressBar);
- smalltalk.addMethod(
- '_updatePercent_',
- smalltalk.method({
- selector: 'updatePercent:',
- fn: function (aNumber){
- var self=this;
- smalltalk.send(self, "_percent_", [aNumber]);
- smalltalk.send(self, "_renderProgressBar", []);
- return self;}
- }),
- smalltalk.ProgressBar);
- smalltalk.addClass('TestRunner', smalltalk.TabWidget, ['selectedCategories', 'packagesList', 'selectedClasses', 'classesList', 'selectedMethods', 'progressBar', 'methodsList', 'result', 'statusDiv'], 'IDE');
- smalltalk.addMethod(
- '_label',
- smalltalk.method({
- selector: 'label',
- fn: function (){
- var self=this;
- return "SUnit";
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_packages',
- smalltalk.method({
- selector: 'packages',
- fn: function (){
- var self=this;
- var packages=nil;
- packages=smalltalk.send((smalltalk.Array || Array), "_new", []);
- smalltalk.send(smalltalk.send(self, "_allClasses", []), "_do_", [(function(each){return (($receiver = smalltalk.send(packages, "_includes_", [smalltalk.send(each, "_category", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(packages, "_add_", [smalltalk.send(each, "_category", [])]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(packages, "_add_", [smalltalk.send(each, "_category", [])]);})]);})]);
- return smalltalk.send(packages, "_sort", []);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_classes',
- smalltalk.method({
- selector: 'classes',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(smalltalk.send(self, "_allClasses", []), "_select_", [(function(each){return smalltalk.send(smalltalk.send(self, "_selectedCategories", []), "_includes_", [smalltalk.send(each, "_category", [])]);})]), "_sort_", [(function(a, b){return (($receiver = smalltalk.send(a, "_name", [])).klass === smalltalk.Number) ? $receiver >smalltalk.send(b, "_name", []) : smalltalk.send($receiver, "__gt", [smalltalk.send(b, "_name", [])]);})]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_selectedCategories',
- smalltalk.method({
- selector: 'selectedCategories',
- fn: function (){
- var self=this;
- return (($receiver = self['@selectedCategories']) == nil || $receiver == undefined) ? (function(){return self['@selectedCategories']=smalltalk.send((smalltalk.Array || Array), "_new", []);})() : $receiver;
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_allClasses',
- smalltalk.method({
- selector: 'allClasses',
- fn: function (){
- var self=this;
- return smalltalk.send((smalltalk.TestCase || TestCase), "_allSubclasses", []);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_selectedClasses',
- smalltalk.method({
- selector: 'selectedClasses',
- fn: function (){
- var self=this;
- return (($receiver = self['@selectedClasses']) == nil || $receiver == undefined) ? (function(){return self['@selectedClasses']=smalltalk.send((smalltalk.Array || Array), "_new", []);})() : $receiver;
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_progressBar',
- smalltalk.method({
- selector: 'progressBar',
- fn: function (){
- var self=this;
- return (($receiver = self['@progressBar']) == nil || $receiver == undefined) ? (function(){return self['@progressBar']=smalltalk.send((smalltalk.ProgressBar || ProgressBar), "_new", []);})() : $receiver;
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_statusInfo',
- smalltalk.method({
- selector: 'statusInfo',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_printTotal", []), "__comma", [smalltalk.send(self, "_printPasses", [])]), "__comma", [smalltalk.send(self, "_printErrors", [])]), "__comma", [smalltalk.send(self, "_printFailures", [])]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_result',
- smalltalk.method({
- selector: 'result',
- fn: function (){
- var self=this;
- return self['@result'];
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_testCases',
- smalltalk.method({
- selector: 'testCases',
- fn: function (){
- var self=this;
- var testCases=nil;
- testCases=[];
- smalltalk.send(smalltalk.send(self, "_selectedClasses", []), "_do_", [(function(each){return smalltalk.send(testCases, "_addAll_", [smalltalk.send(each, "_buildSuite", [])]);})]);
- return testCases;
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_selectAllCategories',
- smalltalk.method({
- selector: 'selectAllCategories',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_packages", []), "_do_", [(function(each){return (($receiver = smalltalk.send(self['@selectedCategories'], "_includes_", [each])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(smalltalk.send(self, "_selectedCategories", []), "_add_", [each]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(smalltalk.send(self, "_selectedCategories", []), "_add_", [each]);})]);})]);
- (function($rec){smalltalk.send($rec, "_updateCategoriesList", []);return smalltalk.send($rec, "_updateClassesList", []);})(self);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_toggleCategory_',
- smalltalk.method({
- selector: 'toggleCategory:',
- fn: function (aCategory){
- var self=this;
- (($receiver = smalltalk.send(self, "_isSelectedCategory_", [aCategory])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self['@selectedCategories'], "_add_", [aCategory]);})() : (function(){return smalltalk.send(self['@selectedCategories'], "_remove_", [aCategory]);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(self['@selectedCategories'], "_add_", [aCategory]);}), (function(){return smalltalk.send(self['@selectedCategories'], "_remove_", [aCategory]);})]);
- (function($rec){smalltalk.send($rec, "_updateCategoriesList", []);return smalltalk.send($rec, "_updateClassesList", []);})(self);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_toggleClass_',
- smalltalk.method({
- selector: 'toggleClass:',
- fn: function (aClass){
- var self=this;
- (($receiver = smalltalk.send(self, "_isSelectedClass_", [aClass])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self['@selectedClasses'], "_add_", [aClass]);})() : (function(){return smalltalk.send(self['@selectedClasses'], "_remove_", [aClass]);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(self['@selectedClasses'], "_add_", [aClass]);}), (function(){return smalltalk.send(self['@selectedClasses'], "_remove_", [aClass]);})]);
- smalltalk.send(self, "_updateClassesList", []);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_selectAllClasses',
- smalltalk.method({
- selector: 'selectAllClasses',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_classes", []), "_do_", [(function(each){return (($receiver = smalltalk.send(self['@selectedClasses'], "_includes_", [each])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(smalltalk.send(self, "_selectedClasses", []), "_add_", [each]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(smalltalk.send(self, "_selectedClasses", []), "_add_", [each]);})]);})]);
- (function($rec){smalltalk.send($rec, "_updateCategoriesList", []);return smalltalk.send($rec, "_updateClassesList", []);})(self);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_run_',
- smalltalk.method({
- selector: 'run:',
- fn: function (aCollection){
- var self=this;
- self['@result']=smalltalk.send((smalltalk.TestResult || TestResult), "_new", []);
- (function($rec){smalltalk.send($rec, "_updateStatusDiv", []);return smalltalk.send($rec, "_updateMethodsList", []);})(self);
- smalltalk.send(smalltalk.send(self, "_progressBar", []), "_updatePercent_", [(0)]);
- smalltalk.send(self['@result'], "_total_", [smalltalk.send(aCollection, "_size", [])]);
- smalltalk.send(aCollection, "_do_", [(function(each){return smalltalk.send((function(){smalltalk.send(each, "_runCaseFor_", [self['@result']]);smalltalk.send(smalltalk.send(self, "_progressBar", []), "_updatePercent_", [(($receiver = (($receiver = smalltalk.send(self['@result'], "_runs", [])).klass === smalltalk.Number) ? $receiver /smalltalk.send(self['@result'], "_total", []) : smalltalk.send($receiver, "__slash", [smalltalk.send(self['@result'], "_total", [])])).klass === smalltalk.Number) ? $receiver *(100) : smalltalk.send($receiver, "__star", [(100)])]);smalltalk.send(self, "_updateStatusDiv", []);return smalltalk.send(self, "_updateMethodsList", []);}), "_valueWithTimeout_", [(100)]);})]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_performFailure_',
- smalltalk.method({
- selector: 'performFailure:',
- fn: function (aTestCase){
- var self=this;
- smalltalk.send(aTestCase, "_perform_", [smalltalk.send(aTestCase, "_selector", [])]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_initialize',
- smalltalk.method({
- selector: 'initialize',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_initialize", [], smalltalk.TabWidget);
- self['@result']=smalltalk.send((smalltalk.TestResult || TestResult), "_new", []);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_printErrors',
- smalltalk.method({
- selector: 'printErrors',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_result", []), "_errors", []), "_size", []), "_asString", []), "__comma", [unescape("%20errors%2C%20")]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_printFailures',
- smalltalk.method({
- selector: 'printFailures',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_result", []), "_failures", []), "_size", []), "_asString", []), "__comma", [" failures"]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_printPasses',
- smalltalk.method({
- selector: 'printPasses',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send((($receiver = (($receiver = smalltalk.send(smalltalk.send(self, "_result", []), "_total", [])).klass === smalltalk.Number) ? $receiver -smalltalk.send(smalltalk.send(smalltalk.send(self, "_result", []), "_errors", []), "_size", []) : smalltalk.send($receiver, "__minus", [smalltalk.send(smalltalk.send(smalltalk.send(self, "_result", []), "_errors", []), "_size", [])])).klass === smalltalk.Number) ? $receiver -smalltalk.send(smalltalk.send(smalltalk.send(self, "_result", []), "_failures", []), "_size", []) : smalltalk.send($receiver, "__minus", [smalltalk.send(smalltalk.send(smalltalk.send(self, "_result", []), "_failures", []), "_size", [])]), "_asString", []), "__comma", [unescape("%20passes%2C%20")]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_printTotal',
- smalltalk.method({
- selector: 'printTotal',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_result", []), "_total", []), "_asString", []), "__comma", [unescape("%20runs%2C%20")]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_renderBoxOn_',
- smalltalk.method({
- selector: 'renderBoxOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_renderCategoriesOn_", [html]);smalltalk.send($rec, "_renderClassesOn_", [html]);return smalltalk.send($rec, "_renderResultsOn_", [html]);})(self);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_renderButtonsOn_',
- smalltalk.method({
- selector: 'renderButtonsOn:',
- fn: function (html){
- var self=this;
- (function($rec){smalltalk.send($rec, "_with_", ["Run selected"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_run_", [smalltalk.send(self, "_testCases", [])]);})]);})(smalltalk.send(html, "_button", []));
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_renderCategoriesOn_',
- smalltalk.method({
- selector: 'renderCategoriesOn:',
- fn: function (html){
- var self=this;
- self['@packagesList']=smalltalk.send(smalltalk.send(html, "_ul", []), "_class_", ["jt_column sunit packages"]);
- smalltalk.send(self, "_updateCategoriesList", []);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_renderClassesOn_',
- smalltalk.method({
- selector: 'renderClassesOn:',
- fn: function (html){
- var self=this;
- self['@classesList']=smalltalk.send(smalltalk.send(html, "_ul", []), "_class_", ["jt_column sunit classes"]);
- smalltalk.send(self, "_updateClassesList", []);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_renderResultsOn_',
- smalltalk.method({
- selector: 'renderResultsOn:',
- fn: function (html){
- var self=this;
- self['@statusDiv']=smalltalk.send(html, "_div", []);
- smalltalk.send(html, "_with_", [smalltalk.send(self, "_progressBar", [])]);
- self['@methodsList']=smalltalk.send(smalltalk.send(html, "_ul", []), "_class_", ["jt_column sunit results"]);
- smalltalk.send(self, "_updateMethodsList", []);
- smalltalk.send(self, "_updateStatusDiv", []);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_renderFailuresOn_',
- smalltalk.method({
- selector: 'renderFailuresOn:',
- fn: function (html){
- var self=this;
- smalltalk.send(smalltalk.send(smalltalk.send(self, "_result", []), "_failures", []), "_do_", [(function(each){return (function($rec){smalltalk.send($rec, "_class_", ["failures"]);smalltalk.send($rec, "_with_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(each, "_class", []), "_name", []), "__comma", [unescape("%20%3E%3E%20")]), "__comma", [smalltalk.send(each, "_selector", [])])]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_performFailure_", [each]);})]);})(smalltalk.send(html, "_li", []));})]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_renderErrorsOn_',
- smalltalk.method({
- selector: 'renderErrorsOn:',
- fn: function (html){
- var self=this;
- smalltalk.send(smalltalk.send(smalltalk.send(self, "_result", []), "_errors", []), "_do_", [(function(each){return (function($rec){smalltalk.send($rec, "_class_", ["errors"]);smalltalk.send($rec, "_with_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(each, "_class", []), "_name", []), "__comma", [unescape("%20%3E%3E%20")]), "__comma", [smalltalk.send(each, "_selector", [])])]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_performFailure_", [each]);})]);})(smalltalk.send(html, "_li", []));})]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_isSelectedClass_',
- smalltalk.method({
- selector: 'isSelectedClass:',
- fn: function (aClass){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_selectedClasses", []), "_includes_", [aClass]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_isSelectedCategory_',
- smalltalk.method({
- selector: 'isSelectedCategory:',
- fn: function (aCategory){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_selectedCategories", []), "_includes_", [aCategory]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_updateCategoriesList',
- smalltalk.method({
- selector: 'updateCategoriesList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@packagesList'], "_contents_", [(function(html){(function($rec){smalltalk.send($rec, "_class_", ["all"]);smalltalk.send($rec, "_with_", ["All"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectAllCategories", []);})]);})(smalltalk.send(html, "_li", []));return smalltalk.send(smalltalk.send(self, "_packages", []), "_do_", [(function(each){var li=nil;
- li=smalltalk.send(html, "_li", []);(($receiver = smalltalk.send(smalltalk.send(self, "_selectedCategories", []), "_includes_", [each])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);return (function($rec){smalltalk.send($rec, "_with_", [each]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_toggleCategory_", [each]);})]);})(li);})]);})]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_updateClassesList',
- smalltalk.method({
- selector: 'updateClassesList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@classesList'], "_contents_", [(function(html){(($receiver = smalltalk.send(smalltalk.send(self, "_selectedCategories", []), "_isEmpty", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function($rec){smalltalk.send($rec, "_class_", ["all"]);smalltalk.send($rec, "_with_", ["All"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectAllClasses", []);})]);})(smalltalk.send(html, "_li", []));})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function($rec){smalltalk.send($rec, "_class_", ["all"]);smalltalk.send($rec, "_with_", ["All"]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_selectAllClasses", []);})]);})(smalltalk.send(html, "_li", []));})]);return smalltalk.send(smalltalk.send(self, "_classes", []), "_do_", [(function(each){var li=nil;
- li=smalltalk.send(html, "_li", []);(($receiver = smalltalk.send(smalltalk.send(self, "_selectedClasses", []), "_includes_", [each])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(li, "_class_", ["selected"]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(li, "_class_", ["selected"]);})]);return (function($rec){smalltalk.send($rec, "_with_", [smalltalk.send(each, "_name", [])]);return smalltalk.send($rec, "_onClick_", [(function(){return smalltalk.send(self, "_toggleClass_", [each]);})]);})(li);})]);})]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_updateMethodsList',
- smalltalk.method({
- selector: 'updateMethodsList',
- fn: function (){
- var self=this;
- smalltalk.send(self['@methodsList'], "_contents_", [(function(html){smalltalk.send(self, "_renderErrorsOn_", [html]);return smalltalk.send(self, "_renderFailuresOn_", [html]);})]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_updateStatusDiv',
- smalltalk.method({
- selector: 'updateStatusDiv',
- fn: function (){
- var self=this;
- smalltalk.send(self['@statusDiv'], "_class_", [smalltalk.send("sunit status ", "__comma", [smalltalk.send(self['@result'], "_status", [])])]);
- smalltalk.send(self['@statusDiv'], "_contents_", [(function(html){return smalltalk.send(smalltalk.send(html, "_span", []), "_with_", [smalltalk.send(self, "_statusInfo", [])]);})]);
- return self;}
- }),
- smalltalk.TestRunner);
- smalltalk.addMethod(
- '_inspect',
- smalltalk.method({
- selector: 'inspect',
- fn: function (){
- var self=this;
- (function($rec){smalltalk.send($rec, "_inspect_", [self]);return smalltalk.send($rec, "_open", []);})(smalltalk.send((smalltalk.Inspector || Inspector), "_new", []));
- return self;}
- }),
- smalltalk.Object);
- smalltalk.addMethod(
- '_inspectOn_',
- smalltalk.method({
- selector: 'inspectOn:',
- fn: function (anInspector){
- var self=this;
- var variables=nil;
- variables=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []);
- smalltalk.send(variables, "_at_put_", [unescape("%23self"), self]);
- smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "_allInstanceVariableNames", []), "_do_", [(function(each){return smalltalk.send(variables, "_at_put_", [each, smalltalk.send(self, "_instVarAt_", [each])]);})]);
- (function($rec){smalltalk.send($rec, "_setLabel_", [smalltalk.send(self, "_printString", [])]);return smalltalk.send($rec, "_setVariables_", [variables]);})(anInspector);
- return self;}
- }),
- smalltalk.Object);
- smalltalk.addMethod(
- '_inspectOn_',
- smalltalk.method({
- selector: 'inspectOn:',
- fn: function (anInspector){
- var self=this;
- var variables=nil;
- variables=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []);
- smalltalk.send(variables, "_at_put_", [unescape("%23self"), self]);
- smalltalk.send(variables, "_at_put_", [unescape("%23year"), smalltalk.send(self, "_year", [])]);
- smalltalk.send(variables, "_at_put_", [unescape("%23month"), smalltalk.send(self, "_month", [])]);
- smalltalk.send(variables, "_at_put_", [unescape("%23day"), smalltalk.send(self, "_day", [])]);
- smalltalk.send(variables, "_at_put_", [unescape("%23hours"), smalltalk.send(self, "_hours", [])]);
- smalltalk.send(variables, "_at_put_", [unescape("%23minutes"), smalltalk.send(self, "_minutes", [])]);
- smalltalk.send(variables, "_at_put_", [unescape("%23seconds"), smalltalk.send(self, "_seconds", [])]);
- smalltalk.send(variables, "_at_put_", [unescape("%23milliseconds"), smalltalk.send(self, "_milliseconds", [])]);
- (function($rec){smalltalk.send($rec, "_setLabel_", [smalltalk.send(self, "_printString", [])]);return smalltalk.send($rec, "_setVariables_", [variables]);})(anInspector);
- return self;}
- }),
- smalltalk.Date);
- smalltalk.addMethod(
- '_inspectOn_',
- smalltalk.method({
- selector: 'inspectOn:',
- fn: function (anInspector){
- var self=this;
- var variables=nil;
- variables=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []);
- smalltalk.send(variables, "_at_put_", [unescape("%23self"), self]);
- smalltalk.send(self, "_withIndexDo_", [(function(each, i){return smalltalk.send(variables, "_at_put_", [i, each]);})]);
- (function($rec){smalltalk.send($rec, "_setLabel_", [smalltalk.send(self, "_printString", [])]);return smalltalk.send($rec, "_setVariables_", [variables]);})(anInspector);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_inspectOn_',
- smalltalk.method({
- selector: 'inspectOn:',
- fn: function (anInspector){
- var self=this;
- var label=nil;
- smalltalk.send(self, "_inspectOn_", [anInspector], smalltalk.SequenceableCollection);
- (($receiver = (($receiver = smalltalk.send(smalltalk.send(self, "_printString", []), "_size", [])).klass === smalltalk.Number) ? $receiver >(30) : smalltalk.send($receiver, "__gt", [(30)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return label=smalltalk.send(smalltalk.send(smalltalk.send(self, "_printString", []), "_copyFrom_to_", [(1), (30)]), "__comma", [unescape("...%27")]);})() : (function(){return label=smalltalk.send(self, "_printString", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return label=smalltalk.send(smalltalk.send(smalltalk.send(self, "_printString", []), "_copyFrom_to_", [(1), (30)]), "__comma", [unescape("...%27")]);}), (function(){return label=smalltalk.send(self, "_printString", []);})]);
- smalltalk.send(anInspector, "_setLabel_", [label]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_inspectOn_',
- smalltalk.method({
- selector: 'inspectOn:',
- fn: function (anInspector){
- var self=this;
- var variables=nil;
- variables=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []);
- smalltalk.send(variables, "_at_put_", [unescape("%23self"), self]);
- smalltalk.send(variables, "_at_put_", [unescape("%23home"), smalltalk.send(self, "_home", [])]);
- smalltalk.send(variables, "_at_put_", [unescape("%23receiver"), smalltalk.send(self, "_receiver", [])]);
- smalltalk.send(variables, "_at_put_", [unescape("%23selector"), smalltalk.send(self, "_selector", [])]);
- smalltalk.send(variables, "_at_put_", [unescape("%23temps"), smalltalk.send(self, "_temps", [])]);
- smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "_instanceVariableNames", []), "_do_", [(function(each){return smalltalk.send(variables, "_at_put_", [each, smalltalk.send(self, "_instVarAt_", [each])]);})]);
- (function($rec){smalltalk.send($rec, "_setLabel_", [smalltalk.send(self, "_printString", [])]);return smalltalk.send($rec, "_setVariables_", [variables]);})(anInspector);
- return self;}
- }),
- smalltalk.MethodContext);
- smalltalk.addMethod(
- '_inspectOn_',
- smalltalk.method({
- selector: 'inspectOn:',
- fn: function (anInspector){
- var self=this;
- var variables=nil;
- variables=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []);
- smalltalk.send(variables, "_at_put_", [unescape("%23self"), self]);
- smalltalk.send(variables, "_at_put_", [unescape("%23keys"), smalltalk.send(self, "_keys", [])]);
- smalltalk.send(self, "_keysAndValuesDo_", [(function(key, value){return smalltalk.send(variables, "_at_put_", [key, value]);})]);
- (function($rec){smalltalk.send($rec, "_setLabel_", [smalltalk.send(self, "_printString", [])]);return smalltalk.send($rec, "_setVariables_", [variables]);})(anInspector);
- return self;}
- }),
- smalltalk.Dictionary);
|