1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247 |
- smalltalk.addPackage('Kernel-Collections', {});
- smalltalk.addClass('Collection', smalltalk.Object, [], 'Kernel-Collections');
- smalltalk.addMethod(
- '_size',
- smalltalk.method({
- selector: 'size',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_subclassResponsibility", []);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_readStream',
- smalltalk.method({
- selector: 'readStream',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_stream", []);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_writeStream',
- smalltalk.method({
- selector: 'writeStream',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_stream", []);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_stream',
- smalltalk.method({
- selector: 'stream',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_streamClass", []), "_on_", [self]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_streamClass',
- smalltalk.method({
- selector: 'streamClass',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_class", []), "_streamClass", []);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_add_',
- smalltalk.method({
- selector: 'add:',
- fn: function (anObject){
- var self=this;
- smalltalk.send(self, "_subclassResponsibility", []);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_addAll_',
- smalltalk.method({
- selector: 'addAll:',
- fn: function (aCollection){
- var self=this;
- smalltalk.send(aCollection, "_do_", [(function(each){return smalltalk.send(self, "_add_", [each]);})]);
- return aCollection;
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '__comma',
- smalltalk.method({
- selector: ',',
- fn: function (aCollection){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_addAll_", [aCollection]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_copy", []));
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_copyWith_',
- smalltalk.method({
- selector: 'copyWith:',
- fn: function (anObject){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_add_", [anObject]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_copy", []));
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_copyWithAll_',
- smalltalk.method({
- selector: 'copyWithAll:',
- fn: function (aCollection){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_addAll_", [aCollection]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_copy", []));
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_asArray',
- smalltalk.method({
- selector: 'asArray',
- fn: function (){
- var self=this;
- return smalltalk.send((smalltalk.Array || Array), "_withAll_", [self]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_do_',
- smalltalk.method({
- selector: 'do:',
- fn: function (aBlock){
- var self=this;
- for(var i=0;i<self.length;i++){aBlock(self[i]);};
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_collect_',
- smalltalk.method({
- selector: 'collect:',
- fn: function (aBlock){
- var self=this;
- var newCollection=nil;
- newCollection=smalltalk.send(smalltalk.send(self, "_class", []), "_new", []);
- smalltalk.send(self, "_do_", [(function(each){return smalltalk.send(newCollection, "_add_", [smalltalk.send(aBlock, "_value_", [each])]);})]);
- return newCollection;
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_detect_',
- smalltalk.method({
- selector: 'detect:',
- fn: function (aBlock){
- var self=this;
- return smalltalk.send(self, "_detect_ifNone_", [aBlock, (function(){return smalltalk.send(self, "_errorNotFound", []);})]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_detect_ifNone_',
- smalltalk.method({
- selector: 'detect:ifNone:',
- fn: function (aBlock, anotherBlock){
- var self=this;
- for(var i = 0; i < self.length; i++)
- if(aBlock(self[i]))
- return self[i];
- return anotherBlock();
- ;
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_do_separatedBy_',
- smalltalk.method({
- selector: 'do:separatedBy:',
- fn: function (aBlock, anotherBlock){
- var self=this;
- var first=nil;
- first=true;
- smalltalk.send(self, "_do_", [(function(each){((($receiver = first).klass === smalltalk.Boolean) ? ($receiver ? (function(){return first=false;})() : (function(){return smalltalk.send(anotherBlock, "_value", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return first=false;}), (function(){return smalltalk.send(anotherBlock, "_value", []);})]));return smalltalk.send(aBlock, "_value_", [each]);})]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_inject_into_',
- smalltalk.method({
- selector: 'inject:into:',
- fn: function (anObject, aBlock){
- var self=this;
- var result=nil;
- result=anObject;
- smalltalk.send(self, "_do_", [(function(each){return result=smalltalk.send(aBlock, "_value_value_", [result, each]);})]);
- return result;
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_reject_',
- smalltalk.method({
- selector: 'reject:',
- fn: function (aBlock){
- var self=this;
- return smalltalk.send(self, "_select_", [(function(each){return smalltalk.send(smalltalk.send(aBlock, "_value_", [each]), "__eq", [false]);})]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_select_',
- smalltalk.method({
- selector: 'select:',
- fn: function (aBlock){
- var self=this;
- var stream=nil;
- stream=smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "_new", []), "_writeStream", []);
- smalltalk.send(self, "_do_", [(function(each){return ((($receiver = smalltalk.send(aBlock, "_value_", [each])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(stream, "_nextPut_", [each]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(stream, "_nextPut_", [each]);})]));})]);
- return smalltalk.send(stream, "_contents", []);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_errorNotFound',
- smalltalk.method({
- selector: 'errorNotFound',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_error_", ["Object is not in the collection"]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_includes_',
- smalltalk.method({
- selector: 'includes:',
- fn: function (anObject){
- var self=this;
- var i = self.length;
- while (i--) {
- if (smalltalk.send(self[i], "__eq", [anObject])) {return true;}
- }
- return false
- ;
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_notEmpty',
- smalltalk.method({
- selector: 'notEmpty',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_isEmpty", []), "_not", []);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_isEmpty',
- smalltalk.method({
- selector: 'isEmpty',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_size", []), "__eq", [(0)]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_remove_',
- smalltalk.method({
- selector: 'remove:',
- fn: function (anObject){
- var self=this;
- return smalltalk.send(self, "_remove_ifAbsent_", [anObject, (function(){return smalltalk.send(self, "_errorNotFound", []);})]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_asSet',
- smalltalk.method({
- selector: 'asSet',
- fn: function (){
- var self=this;
- return smalltalk.send((smalltalk.Set || Set), "_withAll_", [self]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_ifNotEmpty_',
- smalltalk.method({
- selector: 'ifNotEmpty:',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_notEmpty", []), "_ifTrue_", [aBlock]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_ifEmpty_',
- smalltalk.method({
- selector: 'ifEmpty:',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_isEmpty", []), "_ifTrue_", [aBlock]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_copyWithoutAll_',
- smalltalk.method({
- selector: 'copyWithoutAll:',
- fn: function (aCollection){
- var self=this;
- return smalltalk.send(self, "_reject_", [(function(each){return smalltalk.send(aCollection, "_includes_", [each]);})]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_remove_ifAbsent_',
- smalltalk.method({
- selector: 'remove:ifAbsent:',
- fn: function (anObject, aBlock){
- var self=this;
- smalltalk.send(self, "_subclassResponsibility", []);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_asJSONString',
- smalltalk.method({
- selector: 'asJSONString',
- fn: function (){
- var self=this;
- return smalltalk.send((smalltalk.JSON || JSON), "_stringify_", [smalltalk.send(self, "_collect_", [(function(each){return smalltalk.send(each, "_asJSONString", []);})])]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_asOrderedCollection',
- smalltalk.method({
- selector: 'asOrderedCollection',
- fn: function (){
- var self=this;
- return smalltalk.send((smalltalk.OrderedCollection || OrderedCollection), "_withAll_", [self]);
- return self;}
- }),
- smalltalk.Collection);
- smalltalk.addMethod(
- '_streamClass',
- smalltalk.method({
- selector: 'streamClass',
- fn: function (){
- var self=this;
- return (smalltalk.Stream || Stream);
- return self;}
- }),
- smalltalk.Collection.klass);
- smalltalk.addMethod(
- '_with_',
- smalltalk.method({
- selector: 'with:',
- fn: function (anObject){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_add_", [anObject]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", []));
- return self;}
- }),
- smalltalk.Collection.klass);
- smalltalk.addMethod(
- '_with_with_',
- smalltalk.method({
- selector: 'with:with:',
- fn: function (anObject, anotherObject){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_add_", [anObject]);smalltalk.send($rec, "_add_", [anotherObject]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", []));
- return self;}
- }),
- smalltalk.Collection.klass);
- smalltalk.addMethod(
- '_with_with_with_',
- smalltalk.method({
- selector: 'with:with:with:',
- fn: function (firstObject, secondObject, thirdObject){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_add_", [firstObject]);smalltalk.send($rec, "_add_", [secondObject]);smalltalk.send($rec, "_add_", [thirdObject]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", []));
- return self;}
- }),
- smalltalk.Collection.klass);
- smalltalk.addMethod(
- '_withAll_',
- smalltalk.method({
- selector: 'withAll:',
- fn: function (aCollection){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_addAll_", [aCollection]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", []));
- return self;}
- }),
- smalltalk.Collection.klass);
- smalltalk.addMethod(
- '_new_',
- smalltalk.method({
- selector: 'new:',
- fn: function (anInteger){
- var self=this;
- return smalltalk.send(self, "_new", []);
- return self;}
- }),
- smalltalk.Collection.klass);
- smalltalk.addClass('SequenceableCollection', smalltalk.Collection, [], 'Kernel-Collections');
- smalltalk.addMethod(
- '_at_',
- smalltalk.method({
- selector: 'at:',
- fn: function (anIndex){
- var self=this;
- return smalltalk.send(self, "_at_ifAbsent_", [anIndex, (function(){return smalltalk.send(self, "_errorNotFound", []);})]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_at_ifAbsent_',
- smalltalk.method({
- selector: 'at:ifAbsent:',
- fn: function (anIndex, aBlock){
- var self=this;
- smalltalk.send(self, "_subclassResponsibility", []);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_at_put_',
- smalltalk.method({
- selector: 'at:put:',
- fn: function (anIndex, anObject){
- var self=this;
- smalltalk.send(self, "_subclassResponsibility", []);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_copyFrom_to_',
- smalltalk.method({
- selector: 'copyFrom:to:',
- fn: function (anIndex, anotherIndex){
- var self=this;
- var range=nil;
- var newCollection=nil;
- range=smalltalk.send(anIndex, "_to_", [anotherIndex]);
- newCollection=smalltalk.send(smalltalk.send(self, "_class", []), "_new_", [smalltalk.send(range, "_size", [])]);
- smalltalk.send(range, "_do_", [(function(each){return smalltalk.send(newCollection, "_at_put_", [each, smalltalk.send(self, "_at_", [each])]);})]);
- return newCollection;
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_first',
- smalltalk.method({
- selector: 'first',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_at_", [(1)]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_fourth',
- smalltalk.method({
- selector: 'fourth',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_at_", [(4)]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_last',
- smalltalk.method({
- selector: 'last',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_at_", [smalltalk.send(self, "_size", [])]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_second',
- smalltalk.method({
- selector: 'second',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_at_", [(2)]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_third',
- smalltalk.method({
- selector: 'third',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_at_", [(3)]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_removeLast',
- smalltalk.method({
- selector: 'removeLast',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_remove_", [smalltalk.send(self, "_last", [])]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_addLast_',
- smalltalk.method({
- selector: 'addLast:',
- fn: function (anObject){
- var self=this;
- smalltalk.send(self, "_add_", [anObject]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_withIndexDo_',
- smalltalk.method({
- selector: 'withIndexDo:',
- fn: function (aBlock){
- var self=this;
- for(var i=0;i<self.length;i++){aBlock(self[i], i+1);};
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_allButFirst',
- smalltalk.method({
- selector: 'allButFirst',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_copyFrom_to_", [(2), smalltalk.send(self, "_size", [])]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_allButLast',
- smalltalk.method({
- selector: 'allButLast',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_copyFrom_to_", [(1), ((($receiver = smalltalk.send(self, "_size", [])).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)]))]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_indexOf_',
- smalltalk.method({
- selector: 'indexOf:',
- fn: function (anObject){
- var self=this;
- return smalltalk.send(self, "_indexOf_ifAbsent_", [anObject, (function(){return smalltalk.send(self, "_errorNotFound", []);})]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_indexOf_ifAbsent_',
- smalltalk.method({
- selector: 'indexOf:ifAbsent:',
- fn: function (anObject, aBlock){
- var self=this;
- for(var i=0;i<self.length;i++){
- if(self[i].__eq(anObject)) {return i+1}
- }
- return aBlock();
- ;
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_indexOf_startingAt_ifAbsent_',
- smalltalk.method({
- selector: 'indexOf:startingAt:ifAbsent:',
- fn: function (anObject, start, aBlock){
- var self=this;
- for(var i=start-1;i<self.length;i++){
- if(self[i].__eq(anObject)) {return i+1}
- }
- return aBlock();
- ;
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_indexOf_startingAt_',
- smalltalk.method({
- selector: 'indexOf:startingAt:',
- fn: function (anObject, start){
- var self=this;
- return smalltalk.send(self, "_indexOf_startingAt_ifAbsent_", [anObject, start, (function(){return (0);})]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_reversed',
- smalltalk.method({
- selector: 'reversed',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_subclassResponsibility", []);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_atRandom',
- smalltalk.method({
- selector: 'atRandom',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_at_", [smalltalk.send(smalltalk.send(self, "_size", []), "_atRandom", [])]);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '__eq',
- smalltalk.method({
- selector: '=',
- fn: function (aCollection){
- var self=this;
- try{((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "__eq", [smalltalk.send(aCollection, "_class", [])]), "_and_", [(function(){return smalltalk.send(smalltalk.send(self, "_size", []), "__eq", [smalltalk.send(aCollection, "_size", [])]);})])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})]));
- smalltalk.send(self, "_withIndexDo_", [(function(each, i){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_at_", [i]), "__eq", [each])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})]));})]);
- (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return true}})})();
- return self;
- } catch(e) {if(e.name === 'stReturn' && e.selector === '__eq'){return e.fn()} throw(e)}}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_shallowCopy',
- smalltalk.method({
- selector: 'shallowCopy',
- fn: function (){
- var self=this;
- var newCollection=nil;
- newCollection=smalltalk.send(smalltalk.send(self, "_class", []), "_new_", [smalltalk.send(self, "_size", [])]);
- smalltalk.send(self, "_withIndexDo_", [(function(each, index){return smalltalk.send(newCollection, "_at_put_", [index, each]);})]);
- return newCollection;
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_deepCopy',
- smalltalk.method({
- selector: 'deepCopy',
- fn: function (){
- var self=this;
- var newCollection=nil;
- newCollection=smalltalk.send(smalltalk.send(self, "_class", []), "_new_", [smalltalk.send(self, "_size", [])]);
- smalltalk.send(self, "_withIndexDo_", [(function(each, index){return smalltalk.send(newCollection, "_at_put_", [index, smalltalk.send(each, "_deepCopy", [])]);})]);
- return newCollection;
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addMethod(
- '_printString',
- smalltalk.method({
- selector: 'printString',
- fn: function (){
- var self=this;
- var str=nil;
- str=smalltalk.send("", "_writeStream", []);
- smalltalk.send(str, "_nextPutAll_", [smalltalk.send(smalltalk.send(self, "_printString", [], smalltalk.Collection), "__comma", [unescape("%20%28")])]);
- smalltalk.send(self, "_do_separatedBy_", [(function(each){return smalltalk.send(str, "_nextPutAll_", [smalltalk.send(each, "_printString", [])]);}), (function(){return smalltalk.send(str, "_nextPutAll_", [" "]);})]);
- smalltalk.send(str, "_nextPutAll_", [unescape("%29")]);
- return smalltalk.send(str, "_contents", []);
- return self;}
- }),
- smalltalk.SequenceableCollection);
- smalltalk.addClass('CharacterArray', smalltalk.SequenceableCollection, [], 'Kernel-Collections');
- smalltalk.addMethod(
- '_at_put_',
- smalltalk.method({
- selector: 'at:put:',
- fn: function (anIndex, anObject){
- var self=this;
- smalltalk.send(self, "_errorReadOnly", []);
- return self;}
- }),
- smalltalk.CharacterArray);
- smalltalk.addMethod(
- '_add_',
- smalltalk.method({
- selector: 'add:',
- fn: function (anObject){
- var self=this;
- smalltalk.send(self, "_errorReadOnly", []);
- return self;}
- }),
- smalltalk.CharacterArray);
- smalltalk.addMethod(
- '__comma',
- smalltalk.method({
- selector: ',',
- fn: function (aString){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_asString", []), "__comma", [smalltalk.send(aString, "_asString", [])]);
- return self;}
- }),
- smalltalk.CharacterArray);
- smalltalk.addMethod(
- '_asString',
- smalltalk.method({
- selector: 'asString',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_subclassResponsibility", []);
- return self;}
- }),
- smalltalk.CharacterArray);
- smalltalk.addMethod(
- '_asNumber',
- smalltalk.method({
- selector: 'asNumber',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_asString", []), "_asNumber", []);
- return self;}
- }),
- smalltalk.CharacterArray);
- smalltalk.addMethod(
- '_errorReadOnly',
- smalltalk.method({
- selector: 'errorReadOnly',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_error_", [unescape("Object%20is%20read-only")]);
- return self;}
- }),
- smalltalk.CharacterArray);
- smalltalk.addMethod(
- '_printString',
- smalltalk.method({
- selector: 'printString',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_asString", []), "_printString", []);
- return self;}
- }),
- smalltalk.CharacterArray);
- smalltalk.addMethod(
- '_remove_',
- smalltalk.method({
- selector: 'remove:',
- fn: function (anObject){
- var self=this;
- smalltalk.send(self, "_errorReadOnly", []);
- return self;}
- }),
- smalltalk.CharacterArray);
- smalltalk.addMethod(
- '_asUppercase',
- smalltalk.method({
- selector: 'asUppercase',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_class", []), "_fromString_", [smalltalk.send(smalltalk.send(self, "_asString", []), "_asUppercase", [])]);
- return self;}
- }),
- smalltalk.CharacterArray);
- smalltalk.addMethod(
- '_asSymbol',
- smalltalk.method({
- selector: 'asSymbol',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_subclassResponsibility", []);
- return self;}
- }),
- smalltalk.CharacterArray);
- smalltalk.addMethod(
- '_asLowercase',
- smalltalk.method({
- selector: 'asLowercase',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_class", []), "_fromString_", [smalltalk.send(smalltalk.send(self, "_asString", []), "_asLowercase", [])]);
- return self;}
- }),
- smalltalk.CharacterArray);
- smalltalk.addMethod(
- '_fromString_',
- smalltalk.method({
- selector: 'fromString:',
- fn: function (aString){
- var self=this;
- smalltalk.send(self, "_subclassResponsibility", []);
- return self;}
- }),
- smalltalk.CharacterArray.klass);
- smalltalk.addClass('String', smalltalk.CharacterArray, [], 'Kernel-Collections');
- smalltalk.addMethod(
- '__eq',
- smalltalk.method({
- selector: '=',
- fn: function (aString){
- var self=this;
- try{((($receiver = smalltalk.send(smalltalk.send(aString, "_class", []), "__eq", [smalltalk.send(self, "_class", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})]));
- return String(self) === String(aString);
- return self;
- } catch(e) {if(e.name === 'stReturn' && e.selector === '__eq'){return e.fn()} throw(e)}}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_size',
- smalltalk.method({
- selector: 'size',
- fn: function (){
- var self=this;
- return self.length;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_at_ifAbsent_',
- smalltalk.method({
- selector: 'at:ifAbsent:',
- fn: function (anIndex, aBlock){
- var self=this;
- return self[anIndex - 1] || aBlock();
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_escaped',
- smalltalk.method({
- selector: 'escaped',
- fn: function (){
- var self=this;
- return escape(self);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_unescaped',
- smalltalk.method({
- selector: 'unescaped',
- fn: function (){
- var self=this;
- return unescape(self);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '__comma',
- smalltalk.method({
- selector: ',',
- fn: function (aString){
- var self=this;
- return self + aString;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_copyFrom_to_',
- smalltalk.method({
- selector: 'copyFrom:to:',
- fn: function (anIndex, anotherIndex){
- var self=this;
- return self.substring(anIndex - 1, anotherIndex);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_shallowCopy',
- smalltalk.method({
- selector: 'shallowCopy',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_class", []), "_fromString_", [self]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_deepCopy',
- smalltalk.method({
- selector: 'deepCopy',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_shallowCopy", []);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_asSelector',
- smalltalk.method({
- selector: 'asSelector',
- fn: function (){
- var self=this;
- var selector=nil;
- selector=smalltalk.send("_", "__comma", [self]);
- selector=smalltalk.send(selector, "_replace_with_", [":", "_"]);
- selector=smalltalk.send(selector, "_replace_with_", [unescape("%5B+%5D"), "_plus"]);
- selector=smalltalk.send(selector, "_replace_with_", [unescape("-"), "_minus"]);
- selector=smalltalk.send(selector, "_replace_with_", [unescape("%5B*%5D"), "_star"]);
- selector=smalltalk.send(selector, "_replace_with_", [unescape("%5B/%5D"), "_slash"]);
- selector=smalltalk.send(selector, "_replace_with_", [unescape("%3E"), "_gt"]);
- selector=smalltalk.send(selector, "_replace_with_", [unescape("%3C"), "_lt"]);
- selector=smalltalk.send(selector, "_replace_with_", [unescape("%3D"), "_eq"]);
- selector=smalltalk.send(selector, "_replace_with_", [unescape("%2C"), "_comma"]);
- selector=smalltalk.send(selector, "_replace_with_", [unescape("%5B@%5D"), "_at"]);
- return selector;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_asJavascript',
- smalltalk.method({
- selector: 'asJavascript',
- fn: function (){
- var self=this;
- if(self.search(/^[a-zA-Z0-9_:.$ ]*$/) == -1)
- return "unescape(\"" + escape(self) + "\")";
- else
- return "\"" + self + "\"";
- ;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_replace_with_',
- smalltalk.method({
- selector: 'replace:with:',
- fn: function (aString, anotherString){
- var self=this;
- return smalltalk.send(self, "_replaceRegexp_with_", [smalltalk.send((smalltalk.RegularExpression || RegularExpression), "_fromString_flag_", [aString, "g"]), anotherString]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_replaceRegexp_with_',
- smalltalk.method({
- selector: 'replaceRegexp:with:',
- fn: function (aRegexp, aString){
- var self=this;
- return self.replace(aRegexp, aString);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_tokenize_',
- smalltalk.method({
- selector: 'tokenize:',
- fn: function (aString){
- var self=this;
- return self.split(aString);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_match_',
- smalltalk.method({
- selector: 'match:',
- fn: function (aRegexp){
- var self=this;
- return self.search(aRegexp) != -1;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_asString',
- smalltalk.method({
- selector: 'asString',
- fn: function (){
- var self=this;
- return self;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_asNumber',
- smalltalk.method({
- selector: 'asNumber',
- fn: function (){
- var self=this;
- return Number(self);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_printString',
- smalltalk.method({
- selector: 'printString',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(unescape("%27"), "__comma", [self]), "__comma", [unescape("%27")]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_printNl',
- smalltalk.method({
- selector: 'printNl',
- fn: function (){
- var self=this;
- console.log(self);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_isString',
- smalltalk.method({
- selector: 'isString',
- fn: function (){
- var self=this;
- return true;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '__gt',
- smalltalk.method({
- selector: '>',
- fn: function (aString){
- var self=this;
- return String(self) > aString;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '__lt',
- smalltalk.method({
- selector: '<',
- fn: function (aString){
- var self=this;
- return String(self) < aString;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '__gt_eq',
- smalltalk.method({
- selector: '>=',
- fn: function (aString){
- var self=this;
- return String(self) >= aString;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '__lt_eq',
- smalltalk.method({
- selector: '<=',
- fn: function (aString){
- var self=this;
- return String(self) <= aString;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_trimLeft_',
- smalltalk.method({
- selector: 'trimLeft:',
- fn: function (separators){
- var self=this;
- return smalltalk.send(self, "_replaceRegexp_with_", [smalltalk.send((smalltalk.RegularExpression || RegularExpression), "_fromString_flag_", [smalltalk.send(smalltalk.send(unescape("%5E%5B"), "__comma", [separators]), "__comma", [unescape("%5D+")]), "g"]), ""]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_trimRight_',
- smalltalk.method({
- selector: 'trimRight:',
- fn: function (separators){
- var self=this;
- return smalltalk.send(self, "_replaceRegexp_with_", [smalltalk.send((smalltalk.RegularExpression || RegularExpression), "_fromString_flag_", [smalltalk.send(smalltalk.send(unescape("%5B"), "__comma", [separators]), "__comma", [unescape("%5D+%24")]), "g"]), ""]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_trimLeft',
- smalltalk.method({
- selector: 'trimLeft',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_trimLeft_", [unescape("%5Cs")]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_trimRight',
- smalltalk.method({
- selector: 'trimRight',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_trimRight_", [unescape("%5Cs")]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_trimBoth',
- smalltalk.method({
- selector: 'trimBoth',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_trimBoth_", [unescape("%5Cs")]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_trimBoth_',
- smalltalk.method({
- selector: 'trimBoth:',
- fn: function (separators){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_trimLeft_", [separators]), "_trimRight_", [separators]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_asLowercase',
- smalltalk.method({
- selector: 'asLowercase',
- fn: function (){
- var self=this;
- return self.toLowerCase();
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_asUppercase',
- smalltalk.method({
- selector: 'asUppercase',
- fn: function (){
- var self=this;
- return self.toUpperCase();
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_join_',
- smalltalk.method({
- selector: 'join:',
- fn: function (aCollection){
- var self=this;
- return smalltalk.send((smalltalk.String || String), "_streamContents_", [(function(stream){return smalltalk.send(aCollection, "_do_separatedBy_", [(function(each){return smalltalk.send(stream, "_nextPutAll_", [smalltalk.send(each, "_asString", [])]);}), (function(){return smalltalk.send(stream, "_nextPutAll_", [self]);})]);})]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_includesSubString_',
- smalltalk.method({
- selector: 'includesSubString:',
- fn: function (subString){
- var self=this;
- return self.indexOf(subString) != -1 ;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_asciiValue',
- smalltalk.method({
- selector: 'asciiValue',
- fn: function (){
- var self=this;
- return self.charCodeAt(0);;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_lineIndicesDo_',
- smalltalk.method({
- selector: 'lineIndicesDo:',
- fn: function (aBlock){
- var self=this;
- try{var cr=nil;
- var lf=nil;
- var start=nil;
- var sz=nil;
- var nextLF=nil;
- var nextCR=nil;
- start=(1);
- sz=smalltalk.send(self, "_size", []);
- cr=smalltalk.send((smalltalk.String || String), "_cr", []);
- nextCR=smalltalk.send(self, "_indexOf_startingAt_", [cr, (1)]);
- lf=smalltalk.send((smalltalk.String || String), "_lf", []);
- nextLF=smalltalk.send(self, "_indexOf_startingAt_", [lf, (1)]);
- (function(){while((function(){return ((($receiver = start).klass === smalltalk.Number) ? $receiver <=sz : smalltalk.send($receiver, "__lt_eq", [sz]));})()) {(function(){((($receiver = smalltalk.send(smalltalk.send(nextLF, "__eq", [(0)]), "_and_", [(function(){return smalltalk.send(nextCR, "__eq", [(0)]);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(aBlock, "_value_value_value_", [start, sz, sz]);return (function(){throw({name: 'stReturn', selector: '_lineIndicesDo_', fn: function(){return self}})})();})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(aBlock, "_value_value_value_", [start, sz, sz]);return (function(){throw({name: 'stReturn', selector: '_lineIndicesDo_', fn: function(){return self}})})();})]));return ((($receiver = smalltalk.send(smalltalk.send(nextCR, "__eq", [(0)]), "_or_", [(function(){return smalltalk.send((0) < nextLF, "_and_", [(function(){return ((($receiver = nextLF).klass === smalltalk.Number) ? $receiver <nextCR : smalltalk.send($receiver, "__lt", [nextCR]));})]);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(aBlock, "_value_value_value_", [start, ((($receiver = nextLF).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)])), nextLF]);start=(1) + nextLF;return nextLF=smalltalk.send(self, "_indexOf_startingAt_", [lf, start]);})() : (function(){return ((($receiver = smalltalk.send((1) + nextCR, "__eq", [nextLF])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(aBlock, "_value_value_value_", [start, ((($receiver = nextCR).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)])), nextLF]);start=(1) + nextLF;nextCR=smalltalk.send(self, "_indexOf_startingAt_", [cr, start]);return nextLF=smalltalk.send(self, "_indexOf_startingAt_", [lf, start]);})() : (function(){smalltalk.send(aBlock, "_value_value_value_", [start, ((($receiver = nextCR).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)])), nextCR]);start=(1) + nextCR;return nextCR=smalltalk.send(self, "_indexOf_startingAt_", [cr, start]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){smalltalk.send(aBlock, "_value_value_value_", [start, ((($receiver = nextCR).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)])), nextLF]);start=(1) + nextLF;nextCR=smalltalk.send(self, "_indexOf_startingAt_", [cr, start]);return nextLF=smalltalk.send(self, "_indexOf_startingAt_", [lf, start]);}), (function(){smalltalk.send(aBlock, "_value_value_value_", [start, ((($receiver = nextCR).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)])), nextCR]);start=(1) + nextCR;return nextCR=smalltalk.send(self, "_indexOf_startingAt_", [cr, start]);})]));})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){smalltalk.send(aBlock, "_value_value_value_", [start, ((($receiver = nextLF).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)])), nextLF]);start=(1) + nextLF;return nextLF=smalltalk.send(self, "_indexOf_startingAt_", [lf, start]);}), (function(){return ((($receiver = smalltalk.send((1) + nextCR, "__eq", [nextLF])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(aBlock, "_value_value_value_", [start, ((($receiver = nextCR).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)])), nextLF]);start=(1) + nextLF;nextCR=smalltalk.send(self, "_indexOf_startingAt_", [cr, start]);return nextLF=smalltalk.send(self, "_indexOf_startingAt_", [lf, start]);})() : (function(){smalltalk.send(aBlock, "_value_value_value_", [start, ((($receiver = nextCR).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)])), nextCR]);start=(1) + nextCR;return nextCR=smalltalk.send(self, "_indexOf_startingAt_", [cr, start]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){smalltalk.send(aBlock, "_value_value_value_", [start, ((($receiver = nextCR).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)])), nextLF]);start=(1) + nextLF;nextCR=smalltalk.send(self, "_indexOf_startingAt_", [cr, start]);return nextLF=smalltalk.send(self, "_indexOf_startingAt_", [lf, start]);}), (function(){smalltalk.send(aBlock, "_value_value_value_", [start, ((($receiver = nextCR).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)])), nextCR]);start=(1) + nextCR;return nextCR=smalltalk.send(self, "_indexOf_startingAt_", [cr, start]);})]));})]));})()}})();
- return self;
- } catch(e) {if(e.name === 'stReturn' && e.selector === '_lineIndicesDo_'){return e.fn()} throw(e)}}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_linesDo_',
- smalltalk.method({
- selector: 'linesDo:',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(self, "_lineIndicesDo_", [(function(start, endWithoutDelimiters, end){return smalltalk.send(aBlock, "_value_", [smalltalk.send(self, "_copyFrom_to_", [start, endWithoutDelimiters])]);})]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_lines',
- smalltalk.method({
- selector: 'lines',
- fn: function (){
- var self=this;
- var lines=nil;
- lines=smalltalk.send((smalltalk.Array || Array), "_new", []);
- smalltalk.send(self, "_linesDo_", [(function(aLine){return smalltalk.send(lines, "_add_", [aLine]);})]);
- return lines;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_lineNumber_',
- smalltalk.method({
- selector: 'lineNumber:',
- fn: function (anIndex){
- var self=this;
- try{var lineCount=nil;
- lineCount=(0);
- smalltalk.send(self, "_lineIndicesDo_", [(function(start, endWithoutDelimiters, end){return ((($receiver = smalltalk.send(lineCount=((($receiver = lineCount).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])), "__eq", [anIndex])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '_lineNumber_', fn: function(){return smalltalk.send(self, "_copyFrom_to_", [start, endWithoutDelimiters])}})})();})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return (function(){throw({name: 'stReturn', selector: '_lineNumber_', fn: function(){return smalltalk.send(self, "_copyFrom_to_", [start, endWithoutDelimiters])}})})();})]));})]);
- (function(){throw({name: 'stReturn', selector: '_lineNumber_', fn: function(){return nil}})})();
- return self;
- } catch(e) {if(e.name === 'stReturn' && e.selector === '_lineNumber_'){return e.fn()} throw(e)}}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_reversed',
- smalltalk.method({
- selector: 'reversed',
- fn: function (){
- var self=this;
- return self.split("").reverse().join("");
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_asJavaScriptSelector',
- smalltalk.method({
- selector: 'asJavaScriptSelector',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(smalltalk.send(self, "_asSelector", []), "_replace_with_", [unescape("%5E_"), ""]), "_replace_with_", [unescape("_.*"), ""]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_asJSONString',
- smalltalk.method({
- selector: 'asJSONString',
- fn: function (){
- var self=this;
- return self;
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_asSymbol',
- smalltalk.method({
- selector: 'asSymbol',
- fn: function (){
- var self=this;
- return smalltalk.send((smalltalk.Symbol || Symbol), "_lookup_", [self]);
- return self;}
- }),
- smalltalk.String);
- smalltalk.addMethod(
- '_streamClass',
- smalltalk.method({
- selector: 'streamClass',
- fn: function (){
- var self=this;
- return (smalltalk.StringStream || StringStream);
- return self;}
- }),
- smalltalk.String.klass);
- smalltalk.addMethod(
- '_fromString_',
- smalltalk.method({
- selector: 'fromString:',
- fn: function (aString){
- var self=this;
- return new self.fn(aString);
- return self;}
- }),
- smalltalk.String.klass);
- smalltalk.addMethod(
- '_cr',
- smalltalk.method({
- selector: 'cr',
- fn: function (){
- var self=this;
- return '\r';
- return self;}
- }),
- smalltalk.String.klass);
- smalltalk.addMethod(
- '_lf',
- smalltalk.method({
- selector: 'lf',
- fn: function (){
- var self=this;
- return '\n';
- return self;}
- }),
- smalltalk.String.klass);
- smalltalk.addMethod(
- '_space',
- smalltalk.method({
- selector: 'space',
- fn: function (){
- var self=this;
- return ' ';
- return self;}
- }),
- smalltalk.String.klass);
- smalltalk.addMethod(
- '_tab',
- smalltalk.method({
- selector: 'tab',
- fn: function (){
- var self=this;
- return '\t';
- return self;}
- }),
- smalltalk.String.klass);
- smalltalk.addMethod(
- '_crlf',
- smalltalk.method({
- selector: 'crlf',
- fn: function (){
- var self=this;
- return '\r\n';
- return self;}
- }),
- smalltalk.String.klass);
- smalltalk.addMethod(
- '_streamContents_',
- smalltalk.method({
- selector: 'streamContents:',
- fn: function (blockWithArg){
- var self=this;
- var stream=nil;
- stream=smalltalk.send(smalltalk.send(self, "_streamClass", []), "_on_", [smalltalk.send((smalltalk.String || String), "_new", [])]);
- smalltalk.send(blockWithArg, "_value_", [stream]);
- return smalltalk.send(stream, "_contents", []);
- return self;}
- }),
- smalltalk.String.klass);
- smalltalk.addMethod(
- '_value_',
- smalltalk.method({
- selector: 'value:',
- fn: function (aUTFCharCode){
- var self=this;
- return String.fromCharCode(aUTFCharCode);;
- return self;}
- }),
- smalltalk.String.klass);
- smalltalk.addClass('Symbol', smalltalk.CharacterArray, [], 'Kernel-Collections');
- smalltalk.addMethod(
- '_at_ifAbsent_',
- smalltalk.method({
- selector: 'at:ifAbsent:',
- fn: function (anIndex, aBlock){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_asString", []), "_at_ifAbsent_", [anIndex, aBlock]);
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '_asString',
- smalltalk.method({
- selector: 'asString',
- fn: function (){
- var self=this;
- return self.value;
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '_printString',
- smalltalk.method({
- selector: 'printString',
- fn: function (){
- var self=this;
- return smalltalk.send(unescape("%23"), "__comma", [smalltalk.send(self, "_asString", [])]);
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '_size',
- smalltalk.method({
- selector: 'size',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_asString", []), "_size", []);
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '_asSymbol',
- smalltalk.method({
- selector: 'asSymbol',
- fn: function (){
- var self=this;
- return self;
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '_copyFrom_to_',
- smalltalk.method({
- selector: 'copyFrom:to:',
- fn: function (anIndex, anotherIndex){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_class", []), "_fromString_", [smalltalk.send(smalltalk.send(self, "_asString", []), "_copyFrom_to_", [anIndex, anotherIndex])]);
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '_deepCopy',
- smalltalk.method({
- selector: 'deepCopy',
- fn: function (){
- var self=this;
- return self;
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '_shadowCopy',
- smalltalk.method({
- selector: 'shadowCopy',
- fn: function (){
- var self=this;
- return self;
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '__lt',
- smalltalk.method({
- selector: '<',
- fn: function (aSymbol){
- var self=this;
- return ((($receiver = smalltalk.send(self, "_asString", [])).klass === smalltalk.Number) ? $receiver <smalltalk.send(aSymbol, "_asString", []) : smalltalk.send($receiver, "__lt", [smalltalk.send(aSymbol, "_asString", [])]));
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '__lt_eq',
- smalltalk.method({
- selector: '<=',
- fn: function (aSymbol){
- var self=this;
- return ((($receiver = smalltalk.send(self, "_asString", [])).klass === smalltalk.Number) ? $receiver <=smalltalk.send(aSymbol, "_asString", []) : smalltalk.send($receiver, "__lt_eq", [smalltalk.send(aSymbol, "_asString", [])]));
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '__gt_eq',
- smalltalk.method({
- selector: '>=',
- fn: function (aSymbol){
- var self=this;
- return ((($receiver = smalltalk.send(self, "_asString", [])).klass === smalltalk.Number) ? $receiver >=smalltalk.send(aSymbol, "_asString", []) : smalltalk.send($receiver, "__gt_eq", [smalltalk.send(aSymbol, "_asString", [])]));
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '__eq',
- smalltalk.method({
- selector: '=',
- fn: function (aSymbol){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_asString", []), "__eq", [smalltalk.send(aSymbol, "_asString", [])]);
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '_isSymbol',
- smalltalk.method({
- selector: 'isSymbol',
- fn: function (){
- var self=this;
- return true;
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '_asJavascript',
- smalltalk.method({
- selector: 'asJavascript',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(unescape("smalltalk.symbolFor%28%22"), "__comma", [smalltalk.send(self, "_asString", [])]), "__comma", [unescape("%22%29")]);
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '__gt',
- smalltalk.method({
- selector: '>',
- fn: function (aSymbol){
- var self=this;
- return ((($receiver = smalltalk.send(self, "_asString", [])).klass === smalltalk.Number) ? $receiver >smalltalk.send(aSymbol, "_asString", []) : smalltalk.send($receiver, "__gt", [smalltalk.send(aSymbol, "_asString", [])]));
- return self;}
- }),
- smalltalk.Symbol);
- smalltalk.addMethod(
- '_lookup_',
- smalltalk.method({
- selector: 'lookup:',
- fn: function (aString){
- var self=this;
- return smalltalk.symbolFor(aString);;
- return self;}
- }),
- smalltalk.Symbol.klass);
- smalltalk.addMethod(
- '_basicNew',
- smalltalk.method({
- selector: 'basicNew',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_shouldNotImplement", []);
- return self;}
- }),
- smalltalk.Symbol.klass);
- smalltalk.addMethod(
- '_fromString_',
- smalltalk.method({
- selector: 'fromString:',
- fn: function (aString){
- var self=this;
- return smalltalk.send(self, "_lookup_", [aString]);
- return self;}
- }),
- smalltalk.Symbol.klass);
- smalltalk.addClass('Array', smalltalk.SequenceableCollection, [], 'Kernel-Collections');
- smalltalk.addMethod(
- '_size',
- smalltalk.method({
- selector: 'size',
- fn: function (){
- var self=this;
- return self.length;
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_at_put_',
- smalltalk.method({
- selector: 'at:put:',
- fn: function (anIndex, anObject){
- var self=this;
- return self[anIndex - 1] = anObject;
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_at_ifAbsent_',
- smalltalk.method({
- selector: 'at:ifAbsent:',
- fn: function (anIndex, aBlock){
- var self=this;
- var value = self[anIndex - 1];
- if(value === undefined) {
- return aBlock();
- } else {
- return value;
- }
- ;
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_add_',
- smalltalk.method({
- selector: 'add:',
- fn: function (anObject){
- var self=this;
- self.push(anObject); return anObject;;
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_join_',
- smalltalk.method({
- selector: 'join:',
- fn: function (aString){
- var self=this;
- return self.join(aString);
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_asJavascript',
- smalltalk.method({
- selector: 'asJavascript',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(unescape("%5B"), "__comma", [smalltalk.send(smalltalk.send(self, "_collect_", [(function(each){return smalltalk.send(each, "_asJavascript", []);})]), "_join_", [unescape("%2C%20")])]), "__comma", [unescape("%5D")]);
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_sort',
- smalltalk.method({
- selector: 'sort',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_basicPerform_", ["sort"]);
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_sort_',
- smalltalk.method({
- selector: 'sort:',
- fn: function (aBlock){
- var self=this;
- return self.sort(function(a, b) {
- if(aBlock(a,b)) {return -1} else {return 1}
- })
- ;
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_remove_',
- smalltalk.method({
- selector: 'remove:',
- fn: function (anObject){
- var self=this;
- for(var i=0;i<self.length;i++) {
- if(self[i] == anObject) {
- self.splice(i,1);
- break;
- }
- }
- ;
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_sorted',
- smalltalk.method({
- selector: 'sorted',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_copy", []), "_sort", []);
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_sorted_',
- smalltalk.method({
- selector: 'sorted:',
- fn: function (aBlock){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_copy", []), "_sort_", [aBlock]);
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_removeFrom_to_',
- smalltalk.method({
- selector: 'removeFrom:to:',
- fn: function (aNumber, anotherNumber){
- var self=this;
- self.splice(aNumber - 1,anotherNumber - 1);
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_reversed',
- smalltalk.method({
- selector: 'reversed',
- fn: function (){
- var self=this;
- return self._copy().reverse();
- return self;}
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- '_new_',
- smalltalk.method({
- selector: 'new:',
- fn: function (anInteger){
- var self=this;
- return new Array(anInteger);
- return self;}
- }),
- smalltalk.Array.klass);
- smalltalk.addMethod(
- '_with_',
- smalltalk.method({
- selector: 'with:',
- fn: function (anObject){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_at_put_", [(1), anObject]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new_", [(1)]));
- return self;}
- }),
- smalltalk.Array.klass);
- smalltalk.addMethod(
- '_with_with_',
- smalltalk.method({
- selector: 'with:with:',
- fn: function (anObject, anObject2){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_at_put_", [(1), anObject]);smalltalk.send($rec, "_at_put_", [(2), anObject2]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new_", [(2)]));
- return self;}
- }),
- smalltalk.Array.klass);
- smalltalk.addMethod(
- '_with_with_with_',
- smalltalk.method({
- selector: 'with:with:with:',
- fn: function (anObject, anObject2, anObject3){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_at_put_", [(1), anObject]);smalltalk.send($rec, "_at_put_", [(2), anObject2]);smalltalk.send($rec, "_at_put_", [(3), anObject3]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new_", [(3)]));
- return self;}
- }),
- smalltalk.Array.klass);
- smalltalk.addMethod(
- '_withAll_',
- smalltalk.method({
- selector: 'withAll:',
- fn: function (aCollection){
- var self=this;
- var instance=nil;
- instance=smalltalk.send(self, "_new_", [smalltalk.send(aCollection, "_size", [])]);
- smalltalk.send(aCollection, "_withIndexDo_", [(function(index, each){return smalltalk.send(instance, "_at_put_", [index, each]);})]);
- return instance;
- return self;}
- }),
- smalltalk.Array.klass);
- smalltalk.addClass('RegularExpression', smalltalk.Object, [], 'Kernel-Collections');
- smalltalk.addMethod(
- '_compile_',
- smalltalk.method({
- selector: 'compile:',
- fn: function (aString){
- var self=this;
- return self.compile(aString);
- return self;}
- }),
- smalltalk.RegularExpression);
- smalltalk.addMethod(
- '_exec_',
- smalltalk.method({
- selector: 'exec:',
- fn: function (aString){
- var self=this;
- return self.exec(aString) || nil;
- return self;}
- }),
- smalltalk.RegularExpression);
- smalltalk.addMethod(
- '_test_',
- smalltalk.method({
- selector: 'test:',
- fn: function (aString){
- var self=this;
- return self.test(aString);
- return self;}
- }),
- smalltalk.RegularExpression);
- smalltalk.addMethod(
- '_fromString_flag_',
- smalltalk.method({
- selector: 'fromString:flag:',
- fn: function (aString, anotherString){
- var self=this;
- return new RegExp(aString, anotherString);
- return self;}
- }),
- smalltalk.RegularExpression.klass);
- smalltalk.addMethod(
- '_fromString_',
- smalltalk.method({
- selector: 'fromString:',
- fn: function (aString){
- var self=this;
- return smalltalk.send(self, "_fromString_flag_", [aString, ""]);
- return self;}
- }),
- smalltalk.RegularExpression.klass);
- smalltalk.addClass('Association', smalltalk.Object, ['key', 'value'], 'Kernel-Collections');
- smalltalk.addMethod(
- '__eq',
- smalltalk.method({
- selector: '=',
- fn: function (anAssociation){
- var self=this;
- return smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "__eq", [smalltalk.send(anAssociation, "_class", [])]), "_and_", [(function(){return smalltalk.send(smalltalk.send(smalltalk.send(self, "_key", []), "__eq", [smalltalk.send(anAssociation, "_key", [])]), "_and_", [(function(){return smalltalk.send(smalltalk.send(self, "_value", []), "__eq", [smalltalk.send(anAssociation, "_value", [])]);})]);})]);
- return self;}
- }),
- smalltalk.Association);
- smalltalk.addMethod(
- '_key_',
- smalltalk.method({
- selector: 'key:',
- fn: function (aKey){
- var self=this;
- self['@key']=aKey;
- return self;}
- }),
- smalltalk.Association);
- smalltalk.addMethod(
- '_key',
- smalltalk.method({
- selector: 'key',
- fn: function (){
- var self=this;
- return self['@key'];
- return self;}
- }),
- smalltalk.Association);
- smalltalk.addMethod(
- '_value_',
- smalltalk.method({
- selector: 'value:',
- fn: function (aValue){
- var self=this;
- self['@value']=aValue;
- return self;}
- }),
- smalltalk.Association);
- smalltalk.addMethod(
- '_value',
- smalltalk.method({
- selector: 'value',
- fn: function (){
- var self=this;
- return self['@value'];
- return self;}
- }),
- smalltalk.Association);
- smalltalk.addMethod(
- '_storeOn_',
- smalltalk.method({
- selector: 'storeOn:',
- fn: function (aStream){
- var self=this;
- smalltalk.send(self['@key'], "_storeOn_", [aStream]);
- smalltalk.send(aStream, "_nextPutAll_", [unescape("-%3E")]);
- smalltalk.send(self['@value'], "_storeOn_", [aStream]);
- return self;}
- }),
- smalltalk.Association);
- smalltalk.addMethod(
- '_key_value_',
- smalltalk.method({
- selector: 'key:value:',
- fn: function (aKey, aValue){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_key_", [aKey]);smalltalk.send($rec, "_value_", [aValue]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", []));
- return self;}
- }),
- smalltalk.Association.klass);
- smalltalk.addClass('Stream', smalltalk.Object, ['collection', 'position', 'streamSize'], 'Kernel-Collections');
- smalltalk.addMethod(
- '_collection',
- smalltalk.method({
- selector: 'collection',
- fn: function (){
- var self=this;
- return self['@collection'];
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_setCollection_',
- smalltalk.method({
- selector: 'setCollection:',
- fn: function (aCollection){
- var self=this;
- self['@collection']=aCollection;
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_position',
- smalltalk.method({
- selector: 'position',
- fn: function (){
- var self=this;
- return (($receiver = self['@position']) == nil || $receiver == undefined) ? (function(){return self['@position']=(0);})() : $receiver;
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_position_',
- smalltalk.method({
- selector: 'position:',
- fn: function (anInteger){
- var self=this;
- self['@position']=anInteger;
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_streamSize',
- smalltalk.method({
- selector: 'streamSize',
- fn: function (){
- var self=this;
- return self['@streamSize'];
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_setStreamSize_',
- smalltalk.method({
- selector: 'setStreamSize:',
- fn: function (anInteger){
- var self=this;
- self['@streamSize']=anInteger;
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_contents',
- smalltalk.method({
- selector: 'contents',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_collection", []), "_copyFrom_to_", [(1), smalltalk.send(self, "_streamSize", [])]);
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_size',
- smalltalk.method({
- selector: 'size',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_streamSize", []);
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_reset',
- smalltalk.method({
- selector: 'reset',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_position_", [(0)]);
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_close',
- smalltalk.method({
- selector: 'close',
- fn: function (){
- var self=this;
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_flush',
- smalltalk.method({
- selector: 'flush',
- fn: function (){
- var self=this;
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_resetContents',
- smalltalk.method({
- selector: 'resetContents',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_reset", []);
- smalltalk.send(self, "_setStreamSize_", [(0)]);
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_do_',
- smalltalk.method({
- selector: 'do:',
- fn: function (aBlock){
- var self=this;
- (function(){while(!(function(){return smalltalk.send(self, "_atEnd", []);})()) {(function(){return smalltalk.send(aBlock, "_value_", [smalltalk.send(self, "_next", [])]);})()}})();
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_setToEnd',
- smalltalk.method({
- selector: 'setToEnd',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_position_", [smalltalk.send(self, "_size", [])]);
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_skip_',
- smalltalk.method({
- selector: 'skip:',
- fn: function (anInteger){
- var self=this;
- smalltalk.send(self, "_position_", [smalltalk.send(((($receiver = smalltalk.send(self, "_position", [])).klass === smalltalk.Number) ? $receiver +anInteger : smalltalk.send($receiver, "__plus", [anInteger])), "_min_max_", [smalltalk.send(self, "_size", []), (0)])]);
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_next',
- smalltalk.method({
- selector: 'next',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_position_", [((($receiver = smalltalk.send(self, "_position", [])).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]))]);
- return smalltalk.send(self['@collection'], "_at_", [smalltalk.send(self, "_position", [])]);
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_next_',
- smalltalk.method({
- selector: 'next:',
- fn: function (anInteger){
- var self=this;
- var tempCollection=nil;
- tempCollection=smalltalk.send(smalltalk.send(smalltalk.send(self, "_collection", []), "_class", []), "_new", []);
- smalltalk.send(anInteger, "_timesRepeat_", [(function(){return ((($receiver = smalltalk.send(self, "_atEnd", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(tempCollection, "_add_", [smalltalk.send(self, "_next", [])]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(tempCollection, "_add_", [smalltalk.send(self, "_next", [])]);})]));})]);
- return tempCollection;
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_nextPut_',
- smalltalk.method({
- selector: 'nextPut:',
- fn: function (anObject){
- var self=this;
- smalltalk.send(self, "_position_", [((($receiver = smalltalk.send(self, "_position", [])).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]))]);
- smalltalk.send(smalltalk.send(self, "_collection", []), "_at_put_", [smalltalk.send(self, "_position", []), anObject]);
- smalltalk.send(self, "_setStreamSize_", [smalltalk.send(smalltalk.send(self, "_streamSize", []), "_max_", [smalltalk.send(self, "_position", [])])]);
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_nextPutAll_',
- smalltalk.method({
- selector: 'nextPutAll:',
- fn: function (aCollection){
- var self=this;
- smalltalk.send(aCollection, "_do_", [(function(each){return smalltalk.send(self, "_nextPut_", [each]);})]);
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_peek',
- smalltalk.method({
- selector: 'peek',
- fn: function (){
- var self=this;
- return ((($receiver = smalltalk.send(self, "_atEnd", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(smalltalk.send(self, "_collection", []), "_at_", [((($receiver = smalltalk.send(self, "_position", [])).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]))]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(smalltalk.send(self, "_collection", []), "_at_", [((($receiver = smalltalk.send(self, "_position", [])).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]))]);})]));
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_atEnd',
- smalltalk.method({
- selector: 'atEnd',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_position", []), "__eq", [smalltalk.send(self, "_size", [])]);
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_atStart',
- smalltalk.method({
- selector: 'atStart',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_position", []), "__eq", [(0)]);
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_isEmpty',
- smalltalk.method({
- selector: 'isEmpty',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_size", []), "__eq", [(0)]);
- return self;}
- }),
- smalltalk.Stream);
- smalltalk.addMethod(
- '_on_',
- smalltalk.method({
- selector: 'on:',
- fn: function (aCollection){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_setCollection_", [aCollection]);smalltalk.send($rec, "_setStreamSize_", [smalltalk.send(aCollection, "_size", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", []));
- return self;}
- }),
- smalltalk.Stream.klass);
- smalltalk.addClass('StringStream', smalltalk.Stream, [], 'Kernel-Collections');
- smalltalk.addMethod(
- '_next_',
- smalltalk.method({
- selector: 'next:',
- fn: function (anInteger){
- var self=this;
- var tempCollection=nil;
- tempCollection=smalltalk.send(smalltalk.send(smalltalk.send(self, "_collection", []), "_class", []), "_new", []);
- smalltalk.send(anInteger, "_timesRepeat_", [(function(){return ((($receiver = smalltalk.send(self, "_atEnd", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return tempCollection=smalltalk.send(tempCollection, "__comma", [smalltalk.send(self, "_next", [])]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return tempCollection=smalltalk.send(tempCollection, "__comma", [smalltalk.send(self, "_next", [])]);})]));})]);
- return tempCollection;
- return self;}
- }),
- smalltalk.StringStream);
- smalltalk.addMethod(
- '_nextPut_',
- smalltalk.method({
- selector: 'nextPut:',
- fn: function (aString){
- var self=this;
- smalltalk.send(self, "_nextPutAll_", [aString]);
- return self;}
- }),
- smalltalk.StringStream);
- smalltalk.addMethod(
- '_nextPutAll_',
- smalltalk.method({
- selector: 'nextPutAll:',
- fn: function (aString){
- var self=this;
- smalltalk.send(self, "_setCollection_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_collection", []), "_copyFrom_to_", [(1), smalltalk.send(self, "_position", [])]), "__comma", [aString]), "__comma", [smalltalk.send(smalltalk.send(self, "_collection", []), "_copyFrom_to_", [((($receiver = ((($receiver = smalltalk.send(self, "_position", [])).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]))).klass === smalltalk.Number) ? $receiver +smalltalk.send(aString, "_size", []) : smalltalk.send($receiver, "__plus", [smalltalk.send(aString, "_size", [])])), smalltalk.send(smalltalk.send(self, "_collection", []), "_size", [])])])]);
- smalltalk.send(self, "_position_", [((($receiver = smalltalk.send(self, "_position", [])).klass === smalltalk.Number) ? $receiver +smalltalk.send(aString, "_size", []) : smalltalk.send($receiver, "__plus", [smalltalk.send(aString, "_size", [])]))]);
- smalltalk.send(self, "_setStreamSize_", [smalltalk.send(smalltalk.send(self, "_streamSize", []), "_max_", [smalltalk.send(self, "_position", [])])]);
- return self;}
- }),
- smalltalk.StringStream);
- smalltalk.addMethod(
- '_cr',
- smalltalk.method({
- selector: 'cr',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_nextPutAll_", [smalltalk.send((smalltalk.String || String), "_cr", [])]);
- return self;}
- }),
- smalltalk.StringStream);
- smalltalk.addMethod(
- '_crlf',
- smalltalk.method({
- selector: 'crlf',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_nextPutAll_", [smalltalk.send((smalltalk.String || String), "_crlf", [])]);
- return self;}
- }),
- smalltalk.StringStream);
- smalltalk.addMethod(
- '_lf',
- smalltalk.method({
- selector: 'lf',
- fn: function (){
- var self=this;
- return smalltalk.send(self, "_nextPutAll_", [smalltalk.send((smalltalk.String || String), "_lf", [])]);
- return self;}
- }),
- smalltalk.StringStream);
- smalltalk.addMethod(
- '_space',
- smalltalk.method({
- selector: 'space',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_nextPut_", [" "]);
- return self;}
- }),
- smalltalk.StringStream);
- smalltalk.addClass('Set', smalltalk.Collection, ['elements'], 'Kernel-Collections');
- smalltalk.addMethod(
- '_add_',
- smalltalk.method({
- selector: 'add:',
- fn: function (anObject){
- var self=this;
- var found;
- for(var i in self['@elements']) {
- if(anObject == self['@elements'][i]) {
- found = true;
- break;
- }
- }
- if(!found) {self['@elements'].push(anObject)}
- ;
- return self;}
- }),
- smalltalk.Set);
- smalltalk.addMethod(
- '_remove_',
- smalltalk.method({
- selector: 'remove:',
- fn: function (anObject){
- var self=this;
- smalltalk.send(self['@elements'], "_remove_", [anObject]);
- return self;}
- }),
- smalltalk.Set);
- smalltalk.addMethod(
- '_initialize',
- smalltalk.method({
- selector: 'initialize',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_initialize", [], smalltalk.Collection);
- self['@elements']=[];
- return self;}
- }),
- smalltalk.Set);
- smalltalk.addMethod(
- '_size',
- smalltalk.method({
- selector: 'size',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@elements'], "_size", []);
- return self;}
- }),
- smalltalk.Set);
- smalltalk.addMethod(
- '_asArray',
- smalltalk.method({
- selector: 'asArray',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@elements'], "_copy", []);
- return self;}
- }),
- smalltalk.Set);
- smalltalk.addMethod(
- '_detect_ifNone_',
- smalltalk.method({
- selector: 'detect:ifNone:',
- fn: function (aBlock, anotherBlock){
- var self=this;
- return smalltalk.send(self['@elements'], "_detect_ifNone_", [aBlock, anotherBlock]);
- return self;}
- }),
- smalltalk.Set);
- smalltalk.addMethod(
- '_do_',
- smalltalk.method({
- selector: 'do:',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(self['@elements'], "_do_", [aBlock]);
- return self;}
- }),
- smalltalk.Set);
- smalltalk.addMethod(
- '_includes_',
- smalltalk.method({
- selector: 'includes:',
- fn: function (anObject){
- var self=this;
- return smalltalk.send(self['@elements'], "_includes_", [anObject]);
- return self;}
- }),
- smalltalk.Set);
- smalltalk.addMethod(
- '__eq',
- smalltalk.method({
- selector: '=',
- fn: function (aCollection){
- var self=this;
- return smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "__eq", [smalltalk.send(aCollection, "_class", [])]), "_and_", [(function(){return smalltalk.send(self['@elements'], "__eq", [smalltalk.send(aCollection, "_asArray", [])]);})]);
- return self;}
- }),
- smalltalk.Set);
- smalltalk.addClass('HashedCollection', smalltalk.Collection, [], 'Kernel-Collections');
- smalltalk.addMethod(
- '_size',
- smalltalk.method({
- selector: 'size',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_keys", []), "_size", []);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_associations',
- smalltalk.method({
- selector: 'associations',
- fn: function (){
- var self=this;
- var associations=nil;
- associations=[];
- smalltalk.send(smalltalk.send(self, "_keys", []), "_do_", [(function(each){return smalltalk.send(associations, "_add_", [smalltalk.send((smalltalk.Association || Association), "_key_value_", [each, smalltalk.send(self, "_at_", [each])])]);})]);
- return associations;
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_keys',
- smalltalk.method({
- selector: 'keys',
- fn: function (){
- var self=this;
- var keys = [];
- for(var i in self) {
- if(self.hasOwnProperty(i)) {
- keys.push(i);
- }
- };
- return keys;
- ;
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_values',
- smalltalk.method({
- selector: 'values',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_keys", []), "_collect_", [(function(each){return smalltalk.send(self, "_at_", [each]);})]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_at_put_',
- smalltalk.method({
- selector: 'at:put:',
- fn: function (aKey, aValue){
- var self=this;
- return smalltalk.send(self, "_basicAt_put_", [aKey, aValue]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_at_ifAbsent_',
- smalltalk.method({
- selector: 'at:ifAbsent:',
- fn: function (aKey, aBlock){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_includesKey_", [aKey]), "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self, "_basicAt_", [aKey]);}), aBlock]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_at_ifAbsentPut_',
- smalltalk.method({
- selector: 'at:ifAbsentPut:',
- fn: function (aKey, aBlock){
- var self=this;
- return smalltalk.send(self, "_at_ifAbsent_", [aKey, (function(){return smalltalk.send(self, "_at_put_", [aKey, smalltalk.send(aBlock, "_value", [])]);})]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_at_ifPresent_',
- smalltalk.method({
- selector: 'at:ifPresent:',
- fn: function (aKey, aBlock){
- var self=this;
- return (($receiver = smalltalk.send(self, "_basicAt_", [aKey])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(aBlock, "_value_", [smalltalk.send(self, "_at_", [aKey])]);})() : nil;
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_at_ifPresent_ifAbsent_',
- smalltalk.method({
- selector: 'at:ifPresent:ifAbsent:',
- fn: function (aKey, aBlock, anotherBlock){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_basicAt_", [aKey]), "_ifNil_ifNotNil_", [anotherBlock, (function(){return smalltalk.send(aBlock, "_value_", [smalltalk.send(self, "_at_", [aKey])]);})]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_at_',
- smalltalk.method({
- selector: 'at:',
- fn: function (aKey){
- var self=this;
- return smalltalk.send(self, "_at_ifAbsent_", [aKey, (function(){return smalltalk.send(self, "_errorNotFound", []);})]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_add_',
- smalltalk.method({
- selector: 'add:',
- fn: function (anAssociation){
- var self=this;
- smalltalk.send(self, "_at_put_", [smalltalk.send(anAssociation, "_key", []), smalltalk.send(anAssociation, "_value", [])]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_addAll_',
- smalltalk.method({
- selector: 'addAll:',
- fn: function (aHashedCollection){
- var self=this;
- smalltalk.send(self, "_addAll_", [smalltalk.send(aHashedCollection, "_associations", [])], smalltalk.Collection);
- return aHashedCollection;
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_removeKey_',
- smalltalk.method({
- selector: 'removeKey:',
- fn: function (aKey){
- var self=this;
- smalltalk.send(self, "_remove_", [aKey]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_remove_ifAbsent_',
- smalltalk.method({
- selector: 'remove:ifAbsent:',
- fn: function (aKey, aBlock){
- var self=this;
- return smalltalk.send(self, "_removeKey_ifAbsent_", [aKey, aBlock]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_removeKey_ifAbsent_',
- smalltalk.method({
- selector: 'removeKey:ifAbsent:',
- fn: function (aKey, aBlock){
- var self=this;
- return ((($receiver = smalltalk.send(self, "_includesKey_", [aKey])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(aBlock, "_value", []);})() : (function(){return smalltalk.send(self, "_basicDelete_", [aKey]);})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){return smalltalk.send(aBlock, "_value", []);}), (function(){return smalltalk.send(self, "_basicDelete_", [aKey]);})]));
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '__eq',
- smalltalk.method({
- selector: '=',
- fn: function (aHashedCollection){
- var self=this;
- try{((($receiver = smalltalk.send(smalltalk.send(self, "_class", []), "__eq", [smalltalk.send(aHashedCollection, "_class", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})]));
- ((($receiver = smalltalk.send(smalltalk.send(self, "_size", []), "__eq", [smalltalk.send(aHashedCollection, "_size", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})]));
- (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return smalltalk.send(smalltalk.send(self, "_associations", []), "__eq", [smalltalk.send(aHashedCollection, "_associations", [])])}})})();
- return self;
- } catch(e) {if(e.name === 'stReturn' && e.selector === '__eq'){return e.fn()} throw(e)}}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_shallowCopy',
- smalltalk.method({
- selector: 'shallowCopy',
- fn: function (){
- var self=this;
- var copy=nil;
- copy=smalltalk.send(smalltalk.send(self, "_class", []), "_new", []);
- smalltalk.send(self, "_associationsDo_", [(function(each){return smalltalk.send(copy, "_at_put_", [smalltalk.send(each, "_key", []), smalltalk.send(each, "_value", [])]);})]);
- return copy;
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '__comma',
- smalltalk.method({
- selector: ',',
- fn: function (aCollection){
- var self=this;
- smalltalk.send(self, "_shouldNotImplement", []);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_copyFrom_to_',
- smalltalk.method({
- selector: 'copyFrom:to:',
- fn: function (anIndex, anotherIndex){
- var self=this;
- smalltalk.send(self, "_shouldNotImplement", []);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_deepCopy',
- smalltalk.method({
- selector: 'deepCopy',
- fn: function (){
- var self=this;
- var copy=nil;
- copy=smalltalk.send(smalltalk.send(self, "_class", []), "_new", []);
- smalltalk.send(self, "_associationsDo_", [(function(each){return smalltalk.send(copy, "_at_put_", [smalltalk.send(each, "_key", []), smalltalk.send(smalltalk.send(each, "_value", []), "_deepCopy", [])]);})]);
- return copy;
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_associationsDo_',
- smalltalk.method({
- selector: 'associationsDo:',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_associations", []), "_do_", [aBlock]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_keysAndValuesDo_',
- smalltalk.method({
- selector: 'keysAndValuesDo:',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(self, "_associationsDo_", [(function(each){return smalltalk.send(aBlock, "_value_value_", [smalltalk.send(each, "_key", []), smalltalk.send(each, "_value", [])]);})]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_do_',
- smalltalk.method({
- selector: 'do:',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_values", []), "_do_", [aBlock]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_select_',
- smalltalk.method({
- selector: 'select:',
- fn: function (aBlock){
- var self=this;
- var newDict=nil;
- newDict=smalltalk.send(smalltalk.send(self, "_class", []), "_new", []);
- smalltalk.send(self, "_keysAndValuesDo_", [(function(key, value){return ((($receiver = smalltalk.send(aBlock, "_value_", [value])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(newDict, "_at_put_", [key, value]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(newDict, "_at_put_", [key, value]);})]));})]);
- return newDict;
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_collect_',
- smalltalk.method({
- selector: 'collect:',
- fn: function (aBlock){
- var self=this;
- var newDict=nil;
- newDict=smalltalk.send(smalltalk.send(self, "_class", []), "_new", []);
- smalltalk.send(self, "_keysAndValuesDo_", [(function(key, value){return smalltalk.send(newDict, "_at_put_", [key, smalltalk.send(aBlock, "_value_", [value])]);})]);
- return newDict;
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_detect_ifNone_',
- smalltalk.method({
- selector: 'detect:ifNone:',
- fn: function (aBlock, anotherBlock){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_values", []), "_detect_ifNone_", [aBlock, anotherBlock]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_includes_',
- smalltalk.method({
- selector: 'includes:',
- fn: function (anObject){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_values", []), "_includes_", [anObject]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_printString',
- smalltalk.method({
- selector: 'printString',
- fn: function (){
- var self=this;
- return smalltalk.send((smalltalk.String || String), "_streamContents_", [(function(aStream){(function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self, "_printString", [], smalltalk.Collection)]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%28")]);})(aStream);smalltalk.send(smalltalk.send(self, "_associations", []), "_do_separatedBy_", [(function(anAssociation){return (function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(anAssociation, "_key", []), "_printString", [])]);smalltalk.send($rec, "_nextPutAll_", [unescape("%20-%3E%20")]);return smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(anAssociation, "_value", []), "_printString", [])]);})(aStream);}), (function(){return smalltalk.send(aStream, "_nextPutAll_", [unescape("%20%2C%20")]);})]);return smalltalk.send(aStream, "_nextPutAll_", [unescape("%29")]);})]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_storeOn_',
- smalltalk.method({
- selector: 'storeOn:',
- fn: function (aStream){
- var self=this;
- smalltalk.send(aStream, "_nextPutAll_", [unescape("%23%7B")]);
- smalltalk.send(smalltalk.send(self, "_associations", []), "_do_separatedBy_", [(function(each){return smalltalk.send(each, "_storeOn_", [aStream]);}), (function(){return smalltalk.send(aStream, "_nextPutAll_", [". "]);})]);
- smalltalk.send(aStream, "_nextPutAll_", [unescape("%7D")]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_includesKey_',
- smalltalk.method({
- selector: 'includesKey:',
- fn: function (aKey){
- var self=this;
- return self.hasOwnProperty(aKey);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_asDictionary',
- smalltalk.method({
- selector: 'asDictionary',
- fn: function (){
- var self=this;
- return smalltalk.send((smalltalk.Dictionary || Dictionary), "_fromPairs_", [smalltalk.send(self, "_associations", [])]);
- return self;}
- }),
- smalltalk.HashedCollection);
- smalltalk.addMethod(
- '_fromPairs_',
- smalltalk.method({
- selector: 'fromPairs:',
- fn: function (aCollection){
- var self=this;
- var dict=nil;
- dict=smalltalk.send(self, "_new", []);
- smalltalk.send(aCollection, "_do_", [(function(each){return smalltalk.send(dict, "_add_", [each]);})]);
- return dict;
- return self;}
- }),
- smalltalk.HashedCollection.klass);
- smalltalk.addClass('Dictionary', smalltalk.HashedCollection, ['keys', 'values'], 'Kernel-Collections');
- smalltalk.addMethod(
- '_at_ifAbsent_',
- smalltalk.method({
- selector: 'at:ifAbsent:',
- fn: function (aKey, aBlock){
- var self=this;
- var index;
- for(var i=0;i<self['@keys'].length;i++){
- if(self['@keys'][i].__eq(aKey)) {index = i;}
- };
- if(typeof index === 'undefined') {
- return aBlock();
- } else {
- return self['@values'][index];
- }
- ;
- return self;}
- }),
- smalltalk.Dictionary);
- smalltalk.addMethod(
- '_keys',
- smalltalk.method({
- selector: 'keys',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@keys'], "_copy", []);
- return self;}
- }),
- smalltalk.Dictionary);
- smalltalk.addMethod(
- '_values',
- smalltalk.method({
- selector: 'values',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@values'], "_copy", []);
- return self;}
- }),
- smalltalk.Dictionary);
- smalltalk.addMethod(
- '_at_put_',
- smalltalk.method({
- selector: 'at:put:',
- fn: function (aKey, aValue){
- var self=this;
- var index = self['@keys'].indexOf(aKey);
- if(index === -1) {
- self['@values'].push(aValue);
- self['@keys'].push(aKey);
- } else {
- self['@values'][index] = aValue;
- };
- return aValue;
- ;
- return self;}
- }),
- smalltalk.Dictionary);
- smalltalk.addMethod(
- '_removeKey_ifAbsent_',
- smalltalk.method({
- selector: 'removeKey:ifAbsent:',
- fn: function (aKey, aBlock){
- var self=this;
- var index = self['@keys'].indexOf(aKey);
- if(index === -1) {
- return aBlock()
- } else {
- self['@keys'].splice(i, 1);
- self['@values'].splice(i, 1);
- return aKey
- };
- ;
- return self;}
- }),
- smalltalk.Dictionary);
- smalltalk.addMethod(
- '_initialize',
- smalltalk.method({
- selector: 'initialize',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_initialize", [], smalltalk.HashedCollection);
- self['@keys']=[];
- self['@values']=[];
- return self;}
- }),
- smalltalk.Dictionary);
- smalltalk.addMethod(
- '_includesKey_',
- smalltalk.method({
- selector: 'includesKey:',
- fn: function (aKey){
- var self=this;
- return smalltalk.send(self['@keys'], "_includes_", [aKey]);
- return self;}
- }),
- smalltalk.Dictionary);
- smalltalk.addMethod(
- '_asHashedCollection',
- smalltalk.method({
- selector: 'asHashedCollection',
- fn: function (){
- var self=this;
- return smalltalk.send((smalltalk.HashedCollection || HashedCollection), "_fromPairs_", [smalltalk.send(self, "_associations", [])]);
- return self;}
- }),
- smalltalk.Dictionary);
- smalltalk.addMethod(
- '_asJSONString',
- smalltalk.method({
- selector: 'asJSONString',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_asHashedCollection", []), "_asJSONString", []);
- return self;}
- }),
- smalltalk.Dictionary);
- smalltalk.addClass('OrderedCollection', smalltalk.SequenceableCollection, ['elements'], 'Kernel-Collections');
- smalltalk.addMethod(
- '_size',
- smalltalk.method({
- selector: 'size',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@elements'], "_size", []);
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_at_put_',
- smalltalk.method({
- selector: 'at:put:',
- fn: function (anIndex, anObject){
- var self=this;
- return self['@elements'][anIndex - 1] = anObject;
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_at_ifAbsent_',
- smalltalk.method({
- selector: 'at:ifAbsent:',
- fn: function (anIndex, aBlock){
- var self=this;
- return smalltalk.send(self['@elements'], "_at_ifAbsent_", [anIndex, aBlock]);
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_add_',
- smalltalk.method({
- selector: 'add:',
- fn: function (anObject){
- var self=this;
- self['@elements'].push(anObject); return anObject;;
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_join_',
- smalltalk.method({
- selector: 'join:',
- fn: function (aString){
- var self=this;
- return smalltalk.send(self['@elements'], "_join_", [aString]);
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_sort',
- smalltalk.method({
- selector: 'sort',
- fn: function (){
- var self=this;
- smalltalk.send(self['@elements'], "_sort", []);
- return self;
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_sort_',
- smalltalk.method({
- selector: 'sort:',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(self['@elements'], "_sort_", [aBlock]);
- return self;
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_remove_',
- smalltalk.method({
- selector: 'remove:',
- fn: function (anObject){
- var self=this;
- for(var i=0;i<self['@elements'].length;i++) {
- if(self['@elements'][i] == anObject) {
- self['@elements'].splice(i,1);
- break;
- }
- }
- ;
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_sorted',
- smalltalk.method({
- selector: 'sorted',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_copy", []), "_sort", []);
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_sorted_',
- smalltalk.method({
- selector: 'sorted:',
- fn: function (aBlock){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_copy", []), "_sort_", [aBlock]);
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_removeFrom_to_',
- smalltalk.method({
- selector: 'removeFrom:to:',
- fn: function (aNumber, anotherNumber){
- var self=this;
- self['@elements'].splice(aNumber - 1,anotherNumber - 1);
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_reversed',
- smalltalk.method({
- selector: 'reversed',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.send(smalltalk.send(self, "_asArray", []), "_reversed", []), "_asOrderedCollection", []);
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_initialize',
- smalltalk.method({
- selector: 'initialize',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_initialize", [], smalltalk.SequenceableCollection);
- self['@elements']=[];
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_withIndexDo_',
- smalltalk.method({
- selector: 'withIndexDo:',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(self['@elements'], "_withIndexDo_", [aBlock]);
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_detect_ifNone_',
- smalltalk.method({
- selector: 'detect:ifNone:',
- fn: function (aBlock, anotherBlock){
- var self=this;
- return smalltalk.send(self['@elements'], "_detect_ifNone_", [aBlock, anotherBlock]);
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_do_',
- smalltalk.method({
- selector: 'do:',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(self['@elements'], "_do_", [aBlock]);
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_asOrderedCollection',
- smalltalk.method({
- selector: 'asOrderedCollection',
- fn: function (){
- var self=this;
- return self;
- return self;}
- }),
- smalltalk.OrderedCollection);
- smalltalk.addMethod(
- '_asArray',
- smalltalk.method({
- selector: 'asArray',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@elements'], "_copy", []);
- return self;}
- }),
- smalltalk.OrderedCollection);
|