h2pas.pas 210 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464346534663467346834693470347134723473347434753476347734783479348034813482348334843485348634873488348934903491349234933494349534963497349834993500350135023503350435053506350735083509351035113512351335143515351635173518351935203521352235233524352535263527352835293530353135323533353435353536353735383539354035413542354335443545354635473548354935503551355235533554355535563557355835593560356135623563356435653566356735683569357035713572357335743575357635773578357935803581358235833584358535863587358835893590359135923593359435953596359735983599360036013602360336043605360636073608360936103611361236133614361536163617361836193620362136223623362436253626362736283629363036313632363336343635363636373638363936403641364236433644364536463647364836493650365136523653365436553656365736583659366036613662366336643665366636673668366936703671367236733674367536763677367836793680368136823683368436853686368736883689369036913692369336943695369636973698369937003701370237033704370537063707370837093710371137123713371437153716371737183719372037213722372337243725372637273728372937303731373237333734373537363737373837393740374137423743374437453746374737483749375037513752375337543755375637573758375937603761376237633764376537663767376837693770377137723773377437753776377737783779378037813782378337843785378637873788378937903791379237933794379537963797379837993800380138023803380438053806380738083809381038113812381338143815381638173818381938203821382238233824382538263827382838293830383138323833383438353836383738383839384038413842384338443845384638473848384938503851385238533854385538563857385838593860386138623863386438653866386738683869387038713872387338743875387638773878387938803881388238833884388538863887388838893890389138923893389438953896389738983899390039013902390339043905390639073908390939103911391239133914391539163917391839193920392139223923392439253926392739283929393039313932393339343935393639373938393939403941394239433944394539463947394839493950395139523953395439553956395739583959396039613962396339643965396639673968396939703971397239733974397539763977397839793980398139823983398439853986398739883989399039913992399339943995399639973998399940004001400240034004400540064007400840094010401140124013401440154016401740184019402040214022402340244025402640274028402940304031403240334034403540364037403840394040404140424043404440454046404740484049405040514052405340544055405640574058405940604061406240634064406540664067406840694070407140724073407440754076407740784079408040814082408340844085408640874088408940904091409240934094409540964097409840994100410141024103410441054106410741084109411041114112411341144115411641174118411941204121412241234124412541264127412841294130413141324133413441354136413741384139414041414142414341444145414641474148414941504151415241534154415541564157415841594160416141624163416441654166416741684169417041714172417341744175417641774178417941804181418241834184418541864187418841894190419141924193419441954196419741984199420042014202420342044205420642074208420942104211421242134214421542164217421842194220422142224223422442254226422742284229423042314232423342344235423642374238423942404241424242434244424542464247424842494250425142524253425442554256425742584259426042614262426342644265426642674268426942704271427242734274427542764277427842794280428142824283428442854286428742884289429042914292429342944295429642974298429943004301430243034304430543064307430843094310431143124313431443154316431743184319432043214322432343244325432643274328432943304331433243334334433543364337433843394340434143424343434443454346434743484349435043514352435343544355435643574358435943604361436243634364436543664367436843694370437143724373437443754376437743784379438043814382438343844385438643874388438943904391439243934394439543964397439843994400440144024403440444054406440744084409441044114412441344144415441644174418441944204421442244234424442544264427442844294430443144324433443444354436443744384439444044414442444344444445444644474448444944504451445244534454445544564457445844594460446144624463446444654466446744684469447044714472447344744475447644774478447944804481448244834484448544864487448844894490449144924493449444954496449744984499450045014502450345044505450645074508450945104511451245134514451545164517451845194520452145224523452445254526452745284529453045314532453345344535453645374538453945404541454245434544454545464547454845494550455145524553455445554556455745584559456045614562456345644565456645674568456945704571457245734574457545764577457845794580458145824583458445854586458745884589459045914592459345944595459645974598459946004601460246034604460546064607460846094610461146124613461446154616461746184619462046214622462346244625462646274628462946304631463246334634463546364637463846394640464146424643464446454646464746484649465046514652465346544655465646574658465946604661466246634664466546664667466846694670467146724673467446754676467746784679468046814682468346844685468646874688468946904691469246934694469546964697469846994700470147024703470447054706470747084709471047114712471347144715471647174718471947204721472247234724472547264727472847294730473147324733473447354736473747384739474047414742474347444745474647474748474947504751475247534754475547564757475847594760476147624763476447654766476747684769477047714772477347744775477647774778477947804781478247834784478547864787478847894790479147924793479447954796479747984799480048014802480348044805480648074808480948104811481248134814481548164817481848194820482148224823482448254826482748284829483048314832483348344835483648374838483948404841484248434844484548464847484848494850485148524853485448554856485748584859486048614862486348644865486648674868486948704871487248734874487548764877487848794880488148824883488448854886488748884889489048914892489348944895489648974898489949004901490249034904490549064907490849094910491149124913491449154916491749184919492049214922492349244925492649274928492949304931493249334934493549364937493849394940494149424943494449454946494749484949495049514952495349544955495649574958495949604961496249634964496549664967496849694970497149724973497449754976497749784979498049814982498349844985498649874988498949904991499249934994499549964997499849995000500150025003500450055006500750085009501050115012501350145015501650175018501950205021502250235024502550265027502850295030503150325033503450355036503750385039504050415042504350445045504650475048504950505051505250535054505550565057505850595060506150625063506450655066506750685069507050715072507350745075507650775078507950805081508250835084508550865087508850895090509150925093509450955096509750985099510051015102510351045105510651075108510951105111511251135114511551165117511851195120512151225123512451255126512751285129513051315132513351345135513651375138513951405141514251435144514551465147514851495150515151525153515451555156515751585159516051615162516351645165516651675168516951705171517251735174517551765177517851795180518151825183518451855186518751885189519051915192519351945195519651975198519952005201520252035204520552065207520852095210521152125213521452155216521752185219522052215222522352245225522652275228522952305231523252335234523552365237523852395240524152425243524452455246524752485249525052515252525352545255525652575258525952605261526252635264526552665267526852695270527152725273527452755276527752785279528052815282528352845285528652875288528952905291529252935294529552965297529852995300530153025303530453055306530753085309531053115312531353145315531653175318531953205321532253235324532553265327532853295330533153325333533453355336533753385339534053415342534353445345534653475348534953505351535253535354535553565357535853595360536153625363536453655366536753685369537053715372537353745375537653775378537953805381538253835384538553865387538853895390539153925393539453955396539753985399540054015402540354045405540654075408540954105411541254135414541554165417541854195420542154225423542454255426542754285429543054315432543354345435543654375438543954405441544254435444544554465447544854495450545154525453545454555456545754585459546054615462546354645465546654675468546954705471547254735474547554765477547854795480548154825483548454855486548754885489549054915492549354945495549654975498549955005501550255035504550555065507550855095510551155125513551455155516551755185519552055215522552355245525552655275528552955305531553255335534553555365537553855395540554155425543554455455546554755485549555055515552555355545555555655575558555955605561556255635564556555665567556855695570557155725573557455755576557755785579558055815582558355845585558655875588558955905591559255935594559555965597559855995600560156025603560456055606560756085609561056115612561356145615561656175618561956205621562256235624562556265627562856295630563156325633563456355636563756385639564056415642564356445645564656475648564956505651565256535654565556565657565856595660566156625663566456655666566756685669567056715672567356745675567656775678567956805681568256835684568556865687568856895690569156925693569456955696569756985699570057015702570357045705570657075708570957105711571257135714571557165717571857195720572157225723572457255726572757285729573057315732573357345735573657375738573957405741574257435744574557465747574857495750575157525753575457555756575757585759576057615762576357645765576657675768576957705771577257735774577557765777577857795780578157825783578457855786578757885789579057915792579357945795579657975798579958005801580258035804580558065807580858095810581158125813581458155816581758185819582058215822582358245825582658275828582958305831583258335834583558365837583858395840584158425843584458455846584758485849585058515852585358545855585658575858585958605861586258635864586558665867586858695870587158725873587458755876587758785879588058815882588358845885588658875888588958905891589258935894589558965897589858995900590159025903590459055906590759085909591059115912591359145915591659175918591959205921592259235924592559265927592859295930593159325933593459355936593759385939594059415942594359445945594659475948594959505951595259535954595559565957595859595960596159625963596459655966596759685969597059715972597359745975597659775978597959805981598259835984598559865987598859895990599159925993599459955996599759985999600060016002600360046005600660076008600960106011601260136014601560166017601860196020602160226023602460256026602760286029603060316032603360346035603660376038603960406041604260436044604560466047604860496050605160526053605460556056605760586059606060616062606360646065606660676068606960706071607260736074607560766077607860796080608160826083608460856086608760886089609060916092609360946095609660976098609961006101610261036104610561066107610861096110611161126113611461156116611761186119612061216122612361246125612661276128612961306131613261336134613561366137613861396140614161426143614461456146614761486149615061516152615361546155615661576158615961606161616261636164616561666167616861696170617161726173617461756176617761786179618061816182618361846185618661876188618961906191619261936194619561966197619861996200620162026203620462056206620762086209621062116212621362146215621662176218621962206221622262236224622562266227622862296230623162326233623462356236623762386239624062416242624362446245624662476248624962506251625262536254625562566257625862596260626162626263626462656266626762686269627062716272627362746275627662776278627962806281628262836284628562866287628862896290629162926293629462956296629762986299630063016302630363046305630663076308630963106311631263136314631563166317631863196320632163226323632463256326632763286329633063316332633363346335633663376338633963406341634263436344634563466347634863496350635163526353635463556356635763586359636063616362636363646365636663676368636963706371637263736374637563766377637863796380638163826383638463856386638763886389639063916392639363946395639663976398639964006401640264036404640564066407640864096410641164126413641464156416641764186419642064216422642364246425642664276428642964306431643264336434643564366437643864396440644164426443644464456446644764486449645064516452645364546455645664576458645964606461646264636464646564666467646864696470647164726473647464756476647764786479648064816482648364846485648664876488648964906491649264936494649564966497649864996500650165026503650465056506650765086509651065116512651365146515651665176518651965206521652265236524652565266527652865296530653165326533653465356536653765386539654065416542654365446545654665476548654965506551655265536554655565566557655865596560656165626563656465656566656765686569657065716572657365746575657665776578657965806581658265836584658565866587658865896590659165926593659465956596659765986599660066016602660366046605660666076608660966106611661266136614661566166617661866196620662166226623662466256626662766286629663066316632663366346635663666376638663966406641664266436644664566466647664866496650665166526653665466556656665766586659666066616662666366646665666666676668666966706671667266736674667566766677667866796680668166826683668466856686668766886689669066916692669366946695669666976698669967006701670267036704670567066707670867096710671167126713671467156716671767186719672067216722672367246725672667276728672967306731673267336734673567366737673867396740674167426743674467456746674767486749675067516752675367546755675667576758675967606761676267636764676567666767676867696770677167726773677467756776677767786779678067816782678367846785678667876788678967906791679267936794679567966797679867996800680168026803680468056806680768086809681068116812681368146815681668176818681968206821682268236824682568266827682868296830683168326833683468356836683768386839684068416842684368446845684668476848684968506851685268536854685568566857685868596860686168626863686468656866686768686869687068716872687368746875687668776878687968806881688268836884688568866887688868896890689168926893689468956896689768986899690069016902690369046905690669076908690969106911691269136914691569166917691869196920692169226923692469256926692769286929693069316932693369346935693669376938693969406941694269436944694569466947694869496950695169526953695469556956695769586959696069616962696369646965696669676968696969706971697269736974697569766977697869796980698169826983698469856986698769886989699069916992699369946995699669976998699970007001700270037004700570067007700870097010701170127013701470157016701770187019702070217022702370247025702670277028702970307031703270337034703570367037703870397040704170427043704470457046704770487049705070517052705370547055705670577058705970607061706270637064706570667067706870697070707170727073707470757076707770787079708070817082708370847085708670877088708970907091709270937094709570967097709870997100710171027103710471057106710771087109711071117112711371147115711671177118711971207121712271237124712571267127712871297130713171327133713471357136713771387139714071417142714371447145714671477148714971507151715271537154715571567157715871597160716171627163716471657166716771687169717071717172717371747175717671777178717971807181718271837184718571867187718871897190719171927193719471957196719771987199720072017202720372047205720672077208720972107211721272137214721572167217721872197220722172227223722472257226722772287229723072317232723372347235723672377238723972407241724272437244724572467247724872497250725172527253725472557256725772587259726072617262726372647265726672677268726972707271727272737274727572767277727872797280728172827283728472857286728772887289729072917292729372947295729672977298729973007301730273037304730573067307730873097310731173127313731473157316731773187319732073217322732373247325732673277328732973307331733273337334733573367337733873397340734173427343734473457346734773487349735073517352735373547355735673577358735973607361736273637364736573667367736873697370737173727373737473757376737773787379738073817382738373847385738673877388738973907391739273937394739573967397739873997400740174027403740474057406740774087409741074117412741374147415741674177418741974207421742274237424742574267427742874297430743174327433743474357436743774387439744074417442744374447445744674477448744974507451745274537454745574567457745874597460746174627463746474657466746774687469747074717472747374747475747674777478747974807481748274837484748574867487748874897490749174927493749474957496749774987499750075017502750375047505750675077508750975107511751275137514751575167517751875197520752175227523752475257526752775287529753075317532753375347535753675377538753975407541754275437544754575467547754875497550755175527553755475557556755775587559756075617562756375647565756675677568756975707571757275737574757575767577757875797580758175827583758475857586758775887589759075917592759375947595759675977598759976007601760276037604760576067607760876097610761176127613761476157616761776187619762076217622762376247625762676277628762976307631763276337634763576367637763876397640764176427643764476457646764776487649765076517652765376547655765676577658765976607661766276637664766576667667766876697670767176727673767476757676767776787679768076817682768376847685768676877688768976907691769276937694769576967697769876997700770177027703770477057706770777087709771077117712771377147715771677177718771977207721772277237724772577267727772877297730773177327733773477357736773777387739774077417742774377447745774677477748774977507751775277537754775577567757775877597760776177627763776477657766776777687769777077717772777377747775777677777778777977807781778277837784778577867787778877897790779177927793779477957796779777987799780078017802780378047805780678077808780978107811781278137814781578167817781878197820782178227823782478257826782778287829783078317832783378347835783678377838783978407841784278437844784578467847784878497850785178527853785478557856785778587859786078617862786378647865786678677868786978707871787278737874787578767877787878797880788178827883788478857886788778887889789078917892789378947895789678977898789979007901790279037904790579067907790879097910791179127913791479157916791779187919792079217922792379247925792679277928792979307931793279337934793579367937793879397940794179427943794479457946794779487949795079517952795379547955795679577958795979607961796279637964796579667967796879697970797179727973797479757976797779787979798079817982798379847985798679877988798979907991799279937994799579967997799879998000800180028003800480058006800780088009801080118012801380148015801680178018801980208021802280238024802580268027802880298030803180328033803480358036803780388039804080418042804380448045804680478048804980508051805280538054805580568057805880598060806180628063806480658066806780688069807080718072807380748075807680778078807980808081808280838084808580868087808880898090809180928093809480958096809780988099810081018102810381048105810681078108810981108111811281138114811581168117811881198120812181228123812481258126812781288129813081318132813381348135813681378138813981408141814281438144814581468147814881498150815181528153815481558156815781588159816081618162816381648165816681678168816981708171817281738174817581768177817881798180818181828183818481858186818781888189819081918192819381948195819681978198819982008201820282038204820582068207820882098210821182128213821482158216821782188219822082218222822382248225822682278228822982308231823282338234823582368237823882398240824182428243824482458246824782488249825082518252825382548255825682578258825982608261826282638264826582668267826882698270827182728273827482758276827782788279828082818282828382848285828682878288828982908291829282938294829582968297829882998300830183028303830483058306830783088309831083118312831383148315831683178318831983208321832283238324832583268327832883298330833183328333833483358336833783388339834083418342834383448345834683478348834983508351835283538354835583568357835883598360836183628363836483658366836783688369837083718372837383748375837683778378837983808381838283838384838583868387838883898390839183928393839483958396839783988399840084018402840384048405840684078408840984108411841284138414841584168417841884198420842184228423842484258426842784288429843084318432843384348435843684378438843984408441844284438444844584468447844884498450845184528453845484558456845784588459846084618462846384648465846684678468846984708471847284738474847584768477847884798480848184828483848484858486848784888489849084918492849384948495849684978498849985008501850285038504850585068507850885098510851185128513851485158516851785188519852085218522852385248525852685278528852985308531853285338534853585368537853885398540854185428543854485458546854785488549855085518552855385548555855685578558855985608561856285638564856585668567856885698570857185728573857485758576857785788579858085818582858385848585858685878588858985908591859285938594859585968597859885998600860186028603860486058606860786088609861086118612861386148615861686178618861986208621862286238624862586268627862886298630863186328633863486358636863786388639864086418642864386448645864686478648864986508651865286538654865586568657865886598660866186628663866486658666866786688669867086718672867386748675867686778678867986808681868286838684868586868687868886898690869186928693869486958696869786988699870087018702870387048705870687078708870987108711871287138714871587168717871887198720872187228723872487258726872787288729873087318732873387348735873687378738873987408741874287438744874587468747874887498750875187528753875487558756875787588759876087618762
  1. (* Yacc parser template (TP Yacc V3.0), V1.2 6-17-91 AG *)
  2. (* global definitions: *)
  3. program h2pas;
  4. (*
  5. $Id: h2pas.y,v 1.10 2005/02/20 11:09:41 florian Exp $
  6. Copyright (c) 1998-2000 by Florian Klaempfl
  7. This program is free software; you can redistribute it and/or modify
  8. it under the terms of the GNU General Public License as published by
  9. the Free Software Foundation; either version 2 of the License, or
  10. (at your option) any later version.
  11. This program is distributed in the hope that it will be useful,
  12. but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  14. GNU General Public License for more details.
  15. You should have received a copy of the GNU General Public License
  16. along with this program; if not, write to the Free Software
  17. Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18. ****************************************************************************)
  19. uses
  20. SysUtils,classes,
  21. options,scan,converu,lexlib,yacclib;
  22. type
  23. YYSTYPE = presobject;
  24. const
  25. SHORT_STR = 'smallint';
  26. USHORT_STR = 'word';
  27. INT_STR = 'longint';
  28. UINT_STR = 'dword';
  29. CHAR_STR = 'char';
  30. UCHAR_STR = 'byte'; { should we use byte or char for 'unsigned char' ?? }
  31. INT64_STR = 'int64';
  32. QWORD_STR = 'qword';
  33. REAL_STR = 'double';
  34. WCHAR_STR = 'widechar';
  35. var
  36. hp,ph : presobject;
  37. implemfile : text; (* file for implementation headers extern procs *)
  38. IsExtern : boolean;
  39. NeedEllipsisOverload : boolean;
  40. must_write_packed_field : boolean;
  41. tempfile : text;
  42. No_pop : boolean;
  43. s,TN,PN : String;
  44. pointerprefix: boolean;
  45. freedynlibproc,
  46. loaddynlibproc : tstringlist;
  47. (* $ define yydebug
  48. compile with -dYYDEBUG to get debugging info *)
  49. const
  50. (* number of a?b:c construction in one define *)
  51. if_nb : longint = 0;
  52. is_packed : boolean = false;
  53. is_procvar : boolean = false;
  54. var space_array : array [0..255] of byte;
  55. space_index : byte;
  56. { Used when PPointers is used - pointer type definitions }
  57. PTypeList : TStringList;
  58. procedure shift(space_number : byte);
  59. var
  60. i : byte;
  61. begin
  62. space_array[space_index]:=space_number;
  63. inc(space_index);
  64. for i:=1 to space_number do
  65. aktspace:=aktspace+' ';
  66. end;
  67. procedure popshift;
  68. begin
  69. dec(space_index);
  70. if space_index<0 then
  71. internalerror(20);
  72. delete(aktspace,1,space_array[space_index]);
  73. end;
  74. function str(i : longint) : string;
  75. var
  76. s : string;
  77. begin
  78. system.str(i,s);
  79. str:=s;
  80. end;
  81. function hexstr(i : cardinal) : string;
  82. const
  83. HexTbl : array[0..15] of char='0123456789ABCDEF';
  84. var
  85. str : string;
  86. begin
  87. str:='';
  88. while i<>0 do
  89. begin
  90. str:=hextbl[i and $F]+str;
  91. i:=i shr 4;
  92. end;
  93. if str='' then str:='0';
  94. hexstr:='$'+str;
  95. end;
  96. function uppercase(s : string) : string;
  97. var
  98. i : byte;
  99. begin
  100. for i:=1 to length(s) do
  101. s[i]:=UpCase(s[i]);
  102. uppercase:=s;
  103. end;
  104. procedure write_type_specifier(var outfile:text; p : presobject);forward;
  105. procedure write_p_a_def(var outfile:text; p,simple_type : presobject);forward;
  106. procedure write_ifexpr(var outfile:text; p : presobject);forward;
  107. procedure write_funexpr(var outfile:text; p : presobject);forward;
  108. procedure yymsg(const msg : string);
  109. begin
  110. writeln('line ',line_no,': ',msg);
  111. end;
  112. { This converts pascal reserved words to
  113. the correct syntax.
  114. }
  115. function FixId(const s:string):string;
  116. const
  117. maxtokens = 14;
  118. reservedid: array[1..maxtokens] of string[14] =
  119. (
  120. 'CLASS',
  121. 'DISPOSE',
  122. 'FUNCTION',
  123. 'FALSE',
  124. 'LABEL',
  125. 'NEW',
  126. 'PROPERTY',
  127. 'PROCEDURE',
  128. 'RECORD',
  129. 'REPEAT',
  130. 'STRING',
  131. 'TYPE',
  132. 'TRUE',
  133. 'UNTIL'
  134. );
  135. var
  136. b : boolean;
  137. up : string;
  138. i: integer;
  139. begin
  140. if s='' then
  141. begin
  142. FixId:='';
  143. exit;
  144. end;
  145. b:=false;
  146. up:=Uppercase(s);
  147. for i:=1 to maxtokens do
  148. begin
  149. if up=reservedid[i] then
  150. begin
  151. b:=true;
  152. break;
  153. end;
  154. end;
  155. if b then
  156. FixId:='_'+s
  157. else
  158. FixId:=s;
  159. end;
  160. function TypeName(const s:string):string;
  161. var
  162. i : longint;
  163. begin
  164. i:=1;
  165. if RemoveUnderScore and (length(s)>1) and (s[1]='_') then
  166. i:=2;
  167. if PrependTypes then
  168. TypeName:='T'+Copy(s,i,255)
  169. else
  170. TypeName:=Copy(s,i,255);
  171. end;
  172. function PointerName(const s:string):string;
  173. var
  174. i : longint;
  175. begin
  176. i:=1;
  177. if RemoveUnderScore and (length(s)>1) and (s[1]='_') then
  178. i:=2;
  179. if UsePPointers then
  180. begin
  181. PointerName:='P'+Copy(s,i,255);
  182. PTypeList.Add(PointerName);
  183. end
  184. else
  185. PointerName:=Copy(s,i,255);
  186. if PointerPrefix then
  187. PTypeList.Add('P'+s);
  188. end;
  189. procedure write_packed_fields_info(var outfile:text; p : presobject; ph : string);
  190. var
  191. hp1,hp2,hp3 : presobject;
  192. is_sized : boolean;
  193. line : string;
  194. flag_index : longint;
  195. name : pchar;
  196. ps : byte;
  197. begin
  198. { write out the tempfile created }
  199. close(tempfile);
  200. reset(tempfile);
  201. is_sized:=false;
  202. flag_index:=0;
  203. writeln(outfile);
  204. writeln(outfile,aktspace,'const');
  205. shift(3);
  206. while not eof(tempfile) do
  207. begin
  208. readln(tempfile,line);
  209. ps:=pos('&',line);
  210. if ps>0 then
  211. line:=copy(line,1,ps-1)+ph+'_'+copy(line,ps+1,255);
  212. writeln(outfile,aktspace,line);
  213. end;
  214. writeln(outfile);
  215. close(tempfile);
  216. rewrite(tempfile);
  217. popshift;
  218. (* walk through all members *)
  219. hp1 := p^.p1;
  220. while assigned(hp1) do
  221. begin
  222. (* hp2 is t_memberdec *)
  223. hp2:=hp1^.p1;
  224. (* hp3 is t_declist *)
  225. hp3:=hp2^.p2;
  226. while assigned(hp3) do
  227. begin
  228. if assigned(hp3^.p1^.p3) and
  229. (hp3^.p1^.p3^.typ = t_size_specifier) then
  230. begin
  231. is_sized:=true;
  232. name:=hp3^.p1^.p2^.p;
  233. { get function in interface }
  234. write(outfile,aktspace,'function ',name);
  235. write(outfile,'(var a : ',ph,') : ');
  236. shift(2);
  237. write_p_a_def(outfile,hp3^.p1^.p1,hp2^.p1);
  238. writeln(outfile,';');
  239. popshift;
  240. { get function in implementation }
  241. write(implemfile,aktspace,'function ',name);
  242. write(implemfile,'(var a : ',ph,') : ');
  243. if not compactmode then
  244. shift(2);
  245. write_p_a_def(implemfile,hp3^.p1^.p1,hp2^.p1);
  246. writeln(implemfile,';');
  247. writeln(implemfile,aktspace,'begin');
  248. shift(3);
  249. write(implemfile,aktspace,name,':=(a.flag',flag_index);
  250. writeln(implemfile,' and bm_',ph,'_',name,') shr bp_',ph,'_',name,';');
  251. popshift;
  252. writeln(implemfile,aktspace,'end;');
  253. if not compactmode then
  254. popshift;
  255. writeln(implemfile,'');
  256. { set function in interface }
  257. write(outfile,aktspace,'procedure set_',name);
  258. write(outfile,'(var a : ',ph,'; __',name,' : ');
  259. shift(2);
  260. write_p_a_def(outfile,hp3^.p1^.p1,hp2^.p1);
  261. writeln(outfile,');');
  262. popshift;
  263. { set function in implementation }
  264. write(implemfile,aktspace,'procedure set_',name);
  265. write(implemfile,'(var a : ',ph,'; __',name,' : ');
  266. if not compactmode then
  267. shift(2);
  268. write_p_a_def(implemfile,hp3^.p1^.p1,hp2^.p1);
  269. writeln(implemfile,');');
  270. writeln(implemfile,aktspace,'begin');
  271. shift(3);
  272. write(implemfile,aktspace,'a.flag',flag_index,':=');
  273. write(implemfile,'a.flag',flag_index,' or ');
  274. writeln(implemfile,'((__',name,' shl bp_',ph,'_',name,') and bm_',ph,'_',name,');');
  275. popshift;
  276. writeln(implemfile,aktspace,'end;');
  277. if not compactmode then
  278. popshift;
  279. writeln(implemfile,'');
  280. end
  281. else if is_sized then
  282. begin
  283. is_sized:=false;
  284. inc(flag_index);
  285. end;
  286. hp3:=hp3^.next;
  287. end;
  288. hp1:=hp1^.next;
  289. end;
  290. must_write_packed_field:=false;
  291. block_type:=bt_no;
  292. end;
  293. procedure write_expr(var outfile:text; p : presobject);
  294. begin
  295. if assigned(p) then
  296. begin
  297. case p^.typ of
  298. t_id,
  299. t_ifexpr :
  300. write(outfile,FixId(p^.p));
  301. t_funexprlist :
  302. write_funexpr(outfile,p);
  303. t_exprlist :
  304. begin
  305. if assigned(p^.p1) then
  306. write_expr(outfile,p^.p1);
  307. if assigned(p^.next) then
  308. begin
  309. write(', ');
  310. write_expr(outfile,p^.next);
  311. end;
  312. end;
  313. t_preop : begin
  314. write(outfile,p^.p,'(');
  315. write_expr(outfile,p^.p1);
  316. write(outfile,')');
  317. flush(outfile);
  318. end;
  319. t_typespec : begin
  320. write_type_specifier(outfile,p^.p1);
  321. write(outfile,'(');
  322. write_expr(outfile,p^.p2);
  323. write(outfile,')');
  324. flush(outfile);
  325. end;
  326. t_bop : begin
  327. if p^.p1^.typ<>t_id then
  328. write(outfile,'(');
  329. write_expr(outfile,p^.p1);
  330. if p^.p1^.typ<>t_id then
  331. write(outfile,')');
  332. write(outfile,p^.p);
  333. if p^.p2^.typ<>t_id then
  334. write(outfile,'(');
  335. write_expr(outfile,p^.p2);
  336. if p^.p2^.typ<>t_id then
  337. write(outfile,')');
  338. flush(outfile);
  339. end;
  340. t_arrayop :
  341. begin
  342. write_expr(outfile,p^.p1);
  343. write(outfile,p^.p,'[');
  344. write_expr(outfile,p^.p2);
  345. write(outfile,']');
  346. flush(outfile);
  347. end;
  348. t_callop :
  349. begin
  350. write_expr(outfile,p^.p1);
  351. write(outfile,p^.p,'(');
  352. write_expr(outfile,p^.p2);
  353. write(outfile,')');
  354. flush(outfile);
  355. end;
  356. else
  357. begin
  358. writeln(ord(p^.typ));
  359. internalerror(2);
  360. end;
  361. end;
  362. end;
  363. end;
  364. procedure write_ifexpr(var outfile:text; p : presobject);
  365. begin
  366. flush(outfile);
  367. write(outfile,'if ');
  368. write_expr(outfile,p^.p1);
  369. writeln(outfile,' then');
  370. write(outfile,aktspace,' ');
  371. write(outfile,p^.p);
  372. write(outfile,':=');
  373. write_expr(outfile,p^.p2);
  374. writeln(outfile);
  375. writeln(outfile,aktspace,'else');
  376. write(outfile,aktspace,' ');
  377. write(outfile,p^.p);
  378. write(outfile,':=');
  379. write_expr(outfile,p^.p3);
  380. writeln(outfile,';');
  381. write(outfile,aktspace);
  382. flush(outfile);
  383. end;
  384. procedure write_all_ifexpr(var outfile:text; p : presobject);
  385. begin
  386. if assigned(p) then
  387. begin
  388. case p^.typ of
  389. t_id :;
  390. t_preop :
  391. write_all_ifexpr(outfile,p^.p1);
  392. t_callop,
  393. t_arrayop,
  394. t_bop :
  395. begin
  396. write_all_ifexpr(outfile,p^.p1);
  397. write_all_ifexpr(outfile,p^.p2);
  398. end;
  399. t_ifexpr :
  400. begin
  401. write_all_ifexpr(outfile,p^.p1);
  402. write_all_ifexpr(outfile,p^.p2);
  403. write_all_ifexpr(outfile,p^.p3);
  404. write_ifexpr(outfile,p);
  405. end;
  406. t_typespec :
  407. write_all_ifexpr(outfile,p^.p2);
  408. t_funexprlist,
  409. t_exprlist :
  410. begin
  411. if assigned(p^.p1) then
  412. write_all_ifexpr(outfile,p^.p1);
  413. if assigned(p^.next) then
  414. write_all_ifexpr(outfile,p^.next);
  415. end
  416. else
  417. internalerror(6);
  418. end;
  419. end;
  420. end;
  421. procedure write_funexpr(var outfile:text; p : presobject);
  422. var
  423. i : longint;
  424. begin
  425. if assigned(p) then
  426. begin
  427. case p^.typ of
  428. t_ifexpr :
  429. write(outfile,p^.p);
  430. t_exprlist :
  431. begin
  432. write_expr(outfile,p^.p1);
  433. if assigned(p^.next) then
  434. begin
  435. write(outfile,',');
  436. write_funexpr(outfile,p^.next);
  437. end
  438. end;
  439. t_funcname :
  440. begin
  441. if not compactmode then
  442. shift(2);
  443. if if_nb>0 then
  444. begin
  445. writeln(outfile,aktspace,'var');
  446. write(outfile,aktspace,' ');
  447. for i:=1 to if_nb do
  448. begin
  449. write(outfile,'if_local',i);
  450. if i<if_nb then
  451. write(outfile,', ')
  452. else
  453. writeln(outfile,' : longint;');
  454. end;
  455. writeln(outfile,aktspace,'(* result types are not known *)');
  456. if_nb:=0;
  457. end;
  458. writeln(outfile,aktspace,'begin');
  459. shift(3);
  460. write(outfile,aktspace);
  461. write_all_ifexpr(outfile,p^.p2);
  462. write_expr(outfile,p^.p1);
  463. write(outfile,':=');
  464. write_funexpr(outfile,p^.p2);
  465. writeln(outfile,';');
  466. popshift;
  467. writeln(outfile,aktspace,'end;');
  468. if not compactmode then
  469. popshift;
  470. flush(outfile);
  471. end;
  472. t_funexprlist :
  473. begin
  474. if assigned(p^.p3) then
  475. begin
  476. write_type_specifier(outfile,p^.p3);
  477. write(outfile,'(');
  478. end;
  479. if assigned(p^.p1) then
  480. write_funexpr(outfile,p^.p1);
  481. if assigned(p^.p2) then
  482. begin
  483. write(outfile,'(');
  484. write_funexpr(outfile,p^.p2);
  485. write(outfile,')');
  486. end;
  487. if assigned(p^.p3) then
  488. write(outfile,')');
  489. end
  490. else internalerror(5);
  491. end;
  492. end;
  493. end;
  494. function ellipsisarg : presobject;
  495. begin
  496. ellipsisarg:=new(presobject,init_two(t_arg,nil,nil));
  497. end;
  498. const
  499. (* if in args *dname is replaced by pdname *)
  500. in_args : boolean = false;
  501. typedef_level : longint = 0;
  502. (* writes an argument list, where p is t_arglist *)
  503. procedure write_args(var outfile:text; p : presobject);
  504. var
  505. len,para : longint;
  506. old_in_args : boolean;
  507. varpara : boolean;
  508. lastp : presobject;
  509. hs : string;
  510. begin
  511. NeedEllipsisOverload:=false;
  512. para:=1;
  513. len:=0;
  514. lastp:=nil;
  515. old_in_args:=in_args;
  516. in_args:=true;
  517. write(outfile,'(');
  518. shift(2);
  519. (* walk through all arguments *)
  520. (* p must be of type t_arglist *)
  521. while assigned(p) do
  522. begin
  523. if p^.typ<>t_arglist then
  524. internalerror(10);
  525. (* is ellipsis ? *)
  526. if not assigned(p^.p1^.p1) and
  527. not assigned(p^.p1^.next) then
  528. begin
  529. write(outfile,'args:array of const');
  530. (* if variable number of args we must allways pop *)
  531. no_pop:=false;
  532. (* Needs 2 declarations, also one without args, becuase
  533. in C you can omit the second parameter. Default parameter
  534. doesn't help as that isn't possible with array of const *)
  535. NeedEllipsisOverload:=true;
  536. (* Remove this para *)
  537. if assigned(lastp) then
  538. lastp^.next:=nil;
  539. dispose(p,done);
  540. (* leave the loop as p isnot valid anymore *)
  541. break;
  542. end
  543. (* we need to correct this in the pp file after *)
  544. else
  545. begin
  546. (* generate a call by reference parameter ? *)
  547. // varpara:=usevarparas and
  548. // assigned(p^.p1^.p2^.p1) and
  549. // (p^.p1^.p2^.p1^.typ in [t_addrdef,t_pointerdef]) and
  550. // assigned(p^.p1^.p2^.p1^.p1) and
  551. // (p^.p1^.p2^.p1^.p1^.typ<>t_procdef);
  552. varpara:=usevarparas and
  553. assigned(p^.p1^.p1) and
  554. (p^.p1^.p1^.typ in [t_addrdef,t_pointerdef]) and
  555. assigned(p^.p1^.p1^.p1) and
  556. (p^.p1^.p1^.p1^.typ<>t_procdef);
  557. (* do not do it for char pointer !! *)
  558. (* para : pchar; and var para : char; are *)
  559. (* completely different in pascal *)
  560. (* here we exclude all typename containing char *)
  561. (* is this a good method ?? *)
  562. if varpara and
  563. (p^.p1^.p1^.typ=t_pointerdef) and
  564. (p^.p1^.p1^.p1^.typ=t_id) and
  565. (pos('CHAR',uppercase(p^.p1^.p1^.p1^.str))<>0) then
  566. varpara:=false;
  567. if varpara then
  568. begin
  569. write(outfile,'var ');
  570. inc(len,4);
  571. end;
  572. (* write new parameter name *)
  573. if assigned(p^.p1^.p2^.p2) then
  574. begin
  575. hs:=FixId(p^.p1^.p2^.p2^.p);
  576. write(outfile,hs);
  577. inc(len,length(hs));
  578. end
  579. else
  580. begin
  581. If removeUnderscore then
  582. begin
  583. Write (outfile,'para',para);
  584. inc(Len,5);
  585. end
  586. else
  587. begin
  588. write(outfile,'_para',para);
  589. inc(Len,6);
  590. end;
  591. end;
  592. write(outfile,':');
  593. if varpara then
  594. begin
  595. write_p_a_def(outfile,p^.p1^.p2^.p1,p^.p1^.p1^.p1);
  596. end
  597. else
  598. write_p_a_def(outfile,p^.p1^.p2^.p1,p^.p1^.p1);
  599. end;
  600. lastp:=p;
  601. p:=p^.next;
  602. if assigned(p) then
  603. begin
  604. write(outfile,'; ');
  605. { if len>40 then : too complicated to compute }
  606. if (para mod 5) = 0 then
  607. begin
  608. writeln(outfile);
  609. write(outfile,aktspace);
  610. end;
  611. end;
  612. inc(para);
  613. end;
  614. write(outfile,')');
  615. flush(outfile);
  616. in_args:=old_in_args;
  617. popshift;
  618. end;
  619. procedure write_p_a_def(var outfile:text; p,simple_type : presobject);
  620. var
  621. i : longint;
  622. error : integer;
  623. pointerwritten,
  624. constant : boolean;
  625. begin
  626. if not(assigned(p)) then
  627. begin
  628. write_type_specifier(outfile,simple_type);
  629. exit;
  630. end;
  631. case p^.typ of
  632. t_pointerdef : begin
  633. (* procedure variable ? *)
  634. if assigned(p^.p1) and (p^.p1^.typ=t_procdef) then
  635. begin
  636. is_procvar:=true;
  637. (* distinguish between procedure and function *)
  638. if (simple_type^.typ=t_void) and (p^.p1^.p1=nil) then
  639. begin
  640. write(outfile,'procedure ');
  641. shift(10);
  642. (* write arguments *)
  643. if assigned(p^.p1^.p2) then
  644. write_args(outfile,p^.p1^.p2);
  645. flush(outfile);
  646. popshift;
  647. end
  648. else
  649. begin
  650. write(outfile,'function ');
  651. shift(9);
  652. (* write arguments *)
  653. if assigned(p^.p1^.p2) then
  654. write_args(outfile,p^.p1^.p2);
  655. write(outfile,':');
  656. flush(outfile);
  657. write_p_a_def(outfile,p^.p1^.p1,simple_type);
  658. popshift;
  659. end
  660. end
  661. else
  662. begin
  663. (* generate "pointer" ? *)
  664. if (simple_type^.typ=t_void) and (p^.p1=nil) then
  665. begin
  666. write(outfile,'pointer');
  667. flush(outfile);
  668. end
  669. else
  670. begin
  671. pointerwritten:=false;
  672. if (p^.p1=nil) and UsePPointers then
  673. begin
  674. if (simple_type^.typ=t_id) then
  675. begin
  676. write(outfile,PointerName(simple_type^.p));
  677. pointerwritten:=true;
  678. end
  679. { structure }
  680. else if (simple_type^.typ in [t_uniondef,t_structdef]) and
  681. (simple_type^.p1=nil) and (simple_type^.p2^.typ=t_id) then
  682. begin
  683. write(outfile,PointerName(simple_type^.p2^.p));
  684. pointerwritten:=true;
  685. end;
  686. end;
  687. if not pointerwritten then
  688. begin
  689. if in_args then
  690. begin
  691. write(outfile,'P');
  692. pointerprefix:=true;
  693. end
  694. else
  695. write(outfile,'^');
  696. write_p_a_def(outfile,p^.p1,simple_type);
  697. pointerprefix:=false;
  698. end;
  699. end;
  700. end;
  701. end;
  702. t_arraydef : begin
  703. constant:=false;
  704. if assigned(p^.p2) then
  705. begin
  706. if p^.p2^.typ=t_id then
  707. begin
  708. val(p^.p2^.str,i,error);
  709. if error=0 then
  710. begin
  711. dec(i);
  712. constant:=true;
  713. end;
  714. end;
  715. if not constant then
  716. begin
  717. write(outfile,'array[0..(');
  718. write_expr(outfile,p^.p2);
  719. write(outfile,')-1] of ');
  720. end
  721. else
  722. begin
  723. write(outfile,'array[0..',i,'] of ');
  724. end;
  725. end
  726. else
  727. begin
  728. (* open array *)
  729. write(outfile,'array of ');
  730. end;
  731. flush(outfile);
  732. write_p_a_def(outfile,p^.p1,simple_type);
  733. end;
  734. else internalerror(1);
  735. end;
  736. end;
  737. procedure write_type_specifier(var outfile:text; p : presobject);
  738. var
  739. hp1,hp2,hp3,lastexpr : presobject;
  740. i,l,w : longint;
  741. error : integer;
  742. current_power,
  743. mask : cardinal;
  744. flag_index : longint;
  745. current_level : byte;
  746. pointerwritten,
  747. is_sized : boolean;
  748. begin
  749. case p^.typ of
  750. t_id :
  751. begin
  752. if pointerprefix then
  753. PTypeList.Add('P'+p^.str);
  754. if p^.intname then
  755. write(outfile,p^.p)
  756. else
  757. write(outfile,TypeName(p^.p));
  758. end;
  759. { what can we do with void defs ? }
  760. t_void :
  761. write(outfile,'void');
  762. t_pointerdef :
  763. begin
  764. pointerwritten:=false;
  765. if (p^.p1^.typ=t_void) then
  766. begin
  767. write(outfile,'pointer');
  768. pointerwritten:=true;
  769. end
  770. else
  771. if UsePPointers then
  772. begin
  773. if (p^.p1^.typ=t_id) then
  774. begin
  775. write(outfile,PointerName(p^.p1^.p));
  776. pointerwritten:=true;
  777. end
  778. { structure }
  779. else if (p^.p1^.typ in [t_uniondef,t_structdef]) and
  780. (p^.p1^.p1=nil) and (p^.p1^.p2^.typ=t_id) then
  781. begin
  782. write(outfile,PointerName(p^.p1^.p2^.p));
  783. pointerwritten:=true;
  784. end;
  785. end;
  786. if not pointerwritten then
  787. begin
  788. if in_args then
  789. begin
  790. write(outfile,'P');
  791. pointerprefix:=true;
  792. end
  793. else
  794. write(outfile,'^');
  795. write_type_specifier(outfile,p^.p1);
  796. pointerprefix:=false;
  797. end;
  798. end;
  799. t_enumdef :
  800. begin
  801. if (typedef_level>1) and (p^.p1=nil) and
  802. (p^.p2^.typ=t_id) then
  803. begin
  804. if pointerprefix then
  805. PTypeList.Add('P'+p^.p2^.str);
  806. write(outfile,p^.p2^.p);
  807. end
  808. else
  809. if not EnumToConst then
  810. begin
  811. write(outfile,'(');
  812. hp1:=p^.p1;
  813. w:=length(aktspace);
  814. while assigned(hp1) do
  815. begin
  816. write(outfile,hp1^.p1^.p);
  817. if assigned(hp1^.p2) then
  818. begin
  819. write(outfile,' := ');
  820. write_expr(outfile,hp1^.p2);
  821. w:=w+6;(* strlen(hp1^.p); *)
  822. end;
  823. w:=w+length(hp1^.p1^.str);
  824. hp1:=hp1^.next;
  825. if assigned(hp1) then
  826. write(outfile,',');
  827. if w>40 then
  828. begin
  829. writeln(outfile);
  830. write(outfile,aktspace);
  831. w:=length(aktspace);
  832. end;
  833. flush(outfile);
  834. end;
  835. write(outfile,')');
  836. flush(outfile);
  837. end
  838. else
  839. begin
  840. Writeln (outfile,' Longint;');
  841. hp1:=p^.p1;
  842. l:=0;
  843. lastexpr:=nil;
  844. Writeln (outfile,copy(aktspace,1,length(aktspace)-2),'Const');
  845. while assigned(hp1) do
  846. begin
  847. write (outfile,aktspace,hp1^.p1^.p,' = ');
  848. if assigned(hp1^.p2) then
  849. begin
  850. write_expr(outfile,hp1^.p2);
  851. writeln(outfile,';');
  852. lastexpr:=hp1^.p2;
  853. if lastexpr^.typ=t_id then
  854. begin
  855. val(lastexpr^.str,l,error);
  856. if error=0 then
  857. begin
  858. inc(l);
  859. lastexpr:=nil;
  860. end
  861. else
  862. l:=1;
  863. end
  864. else
  865. l:=1;
  866. end
  867. else
  868. begin
  869. if assigned(lastexpr) then
  870. begin
  871. write(outfile,'(');
  872. write_expr(outfile,lastexpr);
  873. writeln(outfile,')+',l,';');
  874. end
  875. else
  876. writeln (outfile,l,';');
  877. inc(l);
  878. end;
  879. hp1:=hp1^.next;
  880. flush(outfile);
  881. end;
  882. block_type:=bt_const;
  883. end;
  884. end;
  885. t_structdef :
  886. begin
  887. inc(typedef_level);
  888. flag_index:=-1;
  889. is_sized:=false;
  890. current_level:=0;
  891. if ((in_args) or (typedef_level>1)) and
  892. (p^.p1=nil) and (p^.p2^.typ=t_id) then
  893. begin
  894. if pointerprefix then
  895. PTypeList.Add('P'+p^.p2^.str);
  896. write(outfile,TypeName(p^.p2^.p));
  897. end
  898. else
  899. begin
  900. if packrecords then
  901. writeln(outfile,'packed record')
  902. else
  903. writeln(outfile,'record');
  904. shift(3);
  905. hp1:=p^.p1;
  906. (* walk through all members *)
  907. while assigned(hp1) do
  908. begin
  909. (* hp2 is t_memberdec *)
  910. hp2:=hp1^.p1;
  911. (* hp3 is t_declist *)
  912. hp3:=hp2^.p2;
  913. while assigned(hp3) do
  914. begin
  915. if not assigned(hp3^.p1^.p3) or
  916. (hp3^.p1^.p3^.typ <> t_size_specifier) then
  917. begin
  918. if is_sized then
  919. begin
  920. if current_level <= 16 then
  921. writeln(outfile,'word;')
  922. else if current_level <= 32 then
  923. writeln(outfile,'longint;')
  924. else
  925. internalerror(11);
  926. is_sized:=false;
  927. end;
  928. write(outfile,aktspace,FixId(hp3^.p1^.p2^.p));
  929. write(outfile,' : ');
  930. shift(2);
  931. write_p_a_def(outfile,hp3^.p1^.p1,hp2^.p1);
  932. popshift;
  933. end;
  934. { size specifier or default value ? }
  935. if assigned(hp3^.p1^.p3) then
  936. begin
  937. { we could use mask to implement this }
  938. { because we need to respect the positions }
  939. if hp3^.p1^.p3^.typ = t_size_specifier then
  940. begin
  941. if not is_sized then
  942. begin
  943. current_power:=1;
  944. current_level:=0;
  945. inc(flag_index);
  946. write(outfile,aktspace,'flag',flag_index,' : ');
  947. end;
  948. must_write_packed_field:=true;
  949. is_sized:=true;
  950. { can it be something else than a constant ? }
  951. { it can be a macro !! }
  952. if hp3^.p1^.p3^.p1^.typ=t_id then
  953. begin
  954. val(hp3^.p1^.p3^.p1^.str,l,error);
  955. if error=0 then
  956. begin
  957. mask:=0;
  958. for i:=1 to l do
  959. begin
  960. inc(mask,current_power);
  961. current_power:=current_power*2;
  962. end;
  963. write(tempfile,'bm_&',hp3^.p1^.p2^.p);
  964. writeln(tempfile,' = ',hexstr(mask),';');
  965. write(tempfile,'bp_&',hp3^.p1^.p2^.p);
  966. writeln(tempfile,' = ',current_level,';');
  967. current_level:=current_level + l;
  968. { go to next flag if 31 }
  969. if current_level = 32 then
  970. begin
  971. write(outfile,'longint');
  972. is_sized:=false;
  973. end;
  974. end;
  975. end;
  976. end
  977. else if hp3^.p1^.p3^.typ = t_default_value then
  978. begin
  979. write(outfile,'{=');
  980. write_expr(outfile,hp3^.p1^.p3^.p1);
  981. write(outfile,' ignored}');
  982. end;
  983. end;
  984. if not is_sized then
  985. begin
  986. if is_procvar then
  987. begin
  988. if not no_pop then
  989. begin
  990. write(outfile,';cdecl');
  991. no_pop:=true;
  992. end;
  993. is_procvar:=false;
  994. end;
  995. writeln(outfile,';');
  996. end;
  997. hp3:=hp3^.next;
  998. end;
  999. hp1:=hp1^.next;
  1000. end;
  1001. if is_sized then
  1002. begin
  1003. if current_level <= 16 then
  1004. writeln(outfile,'word;')
  1005. else if current_level <= 32 then
  1006. writeln(outfile,'longint;')
  1007. else
  1008. internalerror(11);
  1009. is_sized:=false;
  1010. end;
  1011. popshift;
  1012. write(outfile,aktspace,'end');
  1013. flush(outfile);
  1014. end;
  1015. dec(typedef_level);
  1016. end;
  1017. t_uniondef :
  1018. begin
  1019. inc(typedef_level);
  1020. if (typedef_level>1) and (p^.p1=nil) and
  1021. (p^.p2^.typ=t_id) then
  1022. begin
  1023. write(outfile,p^.p2^.p);
  1024. end
  1025. else
  1026. begin
  1027. inc(typedef_level);
  1028. if packrecords then
  1029. writeln(outfile,'packed record')
  1030. else
  1031. writeln(outfile,'record');
  1032. shift(2);
  1033. writeln(outfile,aktspace,'case longint of');
  1034. shift(3);
  1035. l:=0;
  1036. hp1:=p^.p1;
  1037. (* walk through all members *)
  1038. while assigned(hp1) do
  1039. begin
  1040. (* hp2 is t_memberdec *)
  1041. hp2:=hp1^.p1;
  1042. (* hp3 is t_declist *)
  1043. hp3:=hp2^.p2;
  1044. while assigned(hp3) do
  1045. begin
  1046. write(outfile,aktspace,l,' : ( ');
  1047. write(outfile,FixId(hp3^.p1^.p2^.p),' : ');
  1048. shift(2);
  1049. write_p_a_def(outfile,hp3^.p1^.p1,hp2^.p1);
  1050. popshift;
  1051. writeln(outfile,' );');
  1052. hp3:=hp3^.next;
  1053. inc(l);
  1054. end;
  1055. hp1:=hp1^.next;
  1056. end;
  1057. popshift;
  1058. write(outfile,aktspace,'end');
  1059. popshift;
  1060. flush(outfile);
  1061. dec(typedef_level);
  1062. end;
  1063. dec(typedef_level);
  1064. end;
  1065. else
  1066. internalerror(3);
  1067. end;
  1068. end;
  1069. procedure write_def_params(var outfile:text; p : presobject);
  1070. var
  1071. hp1 : presobject;
  1072. begin
  1073. case p^.typ of
  1074. t_enumdef : begin
  1075. hp1:=p^.p1;
  1076. while assigned(hp1) do
  1077. begin
  1078. write(outfile,FixId(hp1^.p1^.p));
  1079. hp1:=hp1^.next;
  1080. if assigned(hp1) then
  1081. write(outfile,',')
  1082. else
  1083. write(outfile);
  1084. flush(outfile);
  1085. end;
  1086. flush(outfile);
  1087. end;
  1088. else internalerror(4);
  1089. end;
  1090. end;
  1091. procedure write_statement_block(var outfile:text; p : presobject);
  1092. begin
  1093. writeln(outfile,aktspace,'begin');
  1094. while assigned(p) do
  1095. begin
  1096. shift(2);
  1097. if assigned(p^.p1) then
  1098. begin
  1099. case p^.p1^.typ of
  1100. t_whilenode:
  1101. begin
  1102. write(outfile,aktspace,'while ');
  1103. write_expr(outfile,p^.p1^.p1);
  1104. writeln(outfile,' do');
  1105. shift(2);
  1106. write_statement_block(outfile,p^.p1^.p2);
  1107. popshift;
  1108. end;
  1109. else
  1110. begin
  1111. write(outfile,aktspace);
  1112. write_expr(outfile,p^.p1);
  1113. writeln(outfile,';');
  1114. end;
  1115. end;
  1116. end;
  1117. p:=p^.next;
  1118. popshift;
  1119. end;
  1120. writeln(outfile,aktspace,'end;');
  1121. end;
  1122. const _WHILE = 257;
  1123. const _FOR = 258;
  1124. const _DO = 259;
  1125. const _GOTO = 260;
  1126. const _CONTINUE = 261;
  1127. const _BREAK = 262;
  1128. const TYPEDEF = 263;
  1129. const DEFINE = 264;
  1130. const COLON = 265;
  1131. const SEMICOLON = 266;
  1132. const COMMA = 267;
  1133. const LKLAMMER = 268;
  1134. const RKLAMMER = 269;
  1135. const LECKKLAMMER = 270;
  1136. const RECKKLAMMER = 271;
  1137. const LGKLAMMER = 272;
  1138. const RGKLAMMER = 273;
  1139. const STRUCT = 274;
  1140. const UNION = 275;
  1141. const ENUM = 276;
  1142. const ID = 277;
  1143. const NUMBER = 278;
  1144. const CSTRING = 279;
  1145. const SHORT = 280;
  1146. const UNSIGNED = 281;
  1147. const LONG = 282;
  1148. const INT = 283;
  1149. const REAL = 284;
  1150. const _CHAR = 285;
  1151. const VOID = 286;
  1152. const _CONST = 287;
  1153. const _FAR = 288;
  1154. const _HUGE = 289;
  1155. const _NEAR = 290;
  1156. const NEW_LINE = 291;
  1157. const SPACE_DEFINE = 292;
  1158. const EXTERN = 293;
  1159. const STDCALL = 294;
  1160. const CDECL = 295;
  1161. const CALLBACK = 296;
  1162. const PASCAL = 297;
  1163. const WINAPI = 298;
  1164. const APIENTRY = 299;
  1165. const WINGDIAPI = 300;
  1166. const SYS_TRAP = 301;
  1167. const _PACKED = 302;
  1168. const ELLIPSIS = 303;
  1169. const _ASSIGN = 304;
  1170. const R_AND = 305;
  1171. const EQUAL = 306;
  1172. const UNEQUAL = 307;
  1173. const GT = 308;
  1174. const LT = 309;
  1175. const GTE = 310;
  1176. const LTE = 311;
  1177. const QUESTIONMARK = 312;
  1178. const _OR = 313;
  1179. const _AND = 314;
  1180. const _PLUS = 315;
  1181. const MINUS = 316;
  1182. const _SHR = 317;
  1183. const _SHL = 318;
  1184. const STAR = 319;
  1185. const _SLASH = 320;
  1186. const _NOT = 321;
  1187. const PSTAR = 322;
  1188. const P_AND = 323;
  1189. const POINT = 324;
  1190. const DEREF = 325;
  1191. const STICK = 326;
  1192. const SIGNED = 327;
  1193. var yylval : YYSType;
  1194. function yylex : Integer; forward;
  1195. function yyparse : Integer;
  1196. var yystate, yysp, yyn : Integer;
  1197. yys : array [1..yymaxdepth] of Integer;
  1198. yyv : array [1..yymaxdepth] of YYSType;
  1199. yyval : YYSType;
  1200. procedure yyaction ( yyruleno : Integer );
  1201. (* local definitions: *)
  1202. begin
  1203. (* actions: *)
  1204. case yyruleno of
  1205. 1 : begin
  1206. yyval := yyv[yysp-0];
  1207. end;
  1208. 2 : begin
  1209. yyval:=nil;
  1210. end;
  1211. 3 : begin
  1212. yyval:=nil;
  1213. end;
  1214. 4 : begin
  1215. writeln(outfile,'(* error ');
  1216. writeln(outfile,yyline);
  1217. end;
  1218. 5 : begin
  1219. if yydebug then writeln('declaration reduced at line ',line_no);
  1220. if yydebug then writeln(outfile,'(* declaration reduced *)');
  1221. end;
  1222. 6 : begin
  1223. if yydebug then writeln('define declaration reduced at line ',line_no);
  1224. if yydebug then writeln(outfile,'(* define declaration reduced *)');
  1225. end;
  1226. 7 : begin
  1227. if yydebug then writeln('declaration reduced at line ',line_no);
  1228. end;
  1229. 8 : begin
  1230. if yydebug then writeln('define declaration reduced at line ',line_no);
  1231. end;
  1232. 9 : begin
  1233. yyval:=new(presobject,init_id('extern'));
  1234. end;
  1235. 10 : begin
  1236. yyval:=new(presobject,init_id('intern'));
  1237. end;
  1238. 11 : begin
  1239. yyval:=new(presobject,init_id('no_pop'));
  1240. end;
  1241. 12 : begin
  1242. yyval:=new(presobject,init_id('cdecl'));
  1243. end;
  1244. 13 : begin
  1245. yyval:=new(presobject,init_id('no_pop'));
  1246. end;
  1247. 14 : begin
  1248. yyval:=new(presobject,init_id('no_pop'));
  1249. end;
  1250. 15 : begin
  1251. yyval:=new(presobject,init_id('no_pop'));
  1252. end;
  1253. 16 : begin
  1254. yyval:=new(presobject,init_id('no_pop'));
  1255. end;
  1256. 17 : begin
  1257. yyval:=new(presobject,init_id('no_pop'));
  1258. end;
  1259. 18 : begin
  1260. yyval:=nil
  1261. end;
  1262. 19 : begin
  1263. yyval:=yyv[yysp-1];
  1264. end;
  1265. 20 : begin
  1266. yyval:=nil;
  1267. end;
  1268. 21 : begin
  1269. yyval:=yyv[yysp-1];
  1270. end;
  1271. 22 : begin
  1272. yyval:=new(presobject,init_two(t_whilenode,yyv[yysp-2],yyv[yysp-0]));
  1273. end;
  1274. 23 : begin
  1275. yyval:=new(presobject,init_one(t_statement_list,yyv[yysp-1]));
  1276. yyval^.next:=yyv[yysp-0];
  1277. end;
  1278. 24 : begin
  1279. yyval:=new(presobject,init_one(t_statement_list,yyv[yysp-0]));
  1280. end;
  1281. 25 : begin
  1282. yyval:=new(presobject,init_one(t_statement_list,nil));
  1283. end;
  1284. 26 : begin
  1285. yyval:=new(presobject,init_one(t_statement_list,nil));
  1286. end;
  1287. 27 : begin
  1288. yyval:=yyv[yysp-1];
  1289. end;
  1290. 28 : begin
  1291. IsExtern:=false;
  1292. (* by default we must pop the args pushed on stack *)
  1293. no_pop:=false;
  1294. if (assigned(yyv[yysp-1])and assigned(yyv[yysp-1]^.p1)and assigned(yyv[yysp-1]^.p1^.p1))
  1295. and (yyv[yysp-1]^.p1^.p1^.typ=t_procdef) then
  1296. begin
  1297. repeat
  1298. If UseLib then
  1299. IsExtern:=true
  1300. else
  1301. IsExtern:=assigned(yyv[yysp-4])and(yyv[yysp-4]^.str='extern');
  1302. no_pop:=assigned(yyv[yysp-2]) and (yyv[yysp-2]^.str='no_pop');
  1303. if (block_type<>bt_func) and not(createdynlib) then
  1304. begin
  1305. writeln(outfile);
  1306. block_type:=bt_func;
  1307. end;
  1308. (* dyn. procedures must be put into a var block *)
  1309. if createdynlib then
  1310. begin
  1311. if (block_type<>bt_var) then
  1312. begin
  1313. if not(compactmode) then
  1314. writeln(outfile);
  1315. writeln(outfile,aktspace,'var');
  1316. block_type:=bt_var;
  1317. end;
  1318. shift(2);
  1319. end;
  1320. if not CompactMode then
  1321. begin
  1322. write(outfile,aktspace);
  1323. if not IsExtern then
  1324. write(implemfile,aktspace);
  1325. end;
  1326. (* distinguish between procedure and function *)
  1327. if assigned(yyv[yysp-3]) then
  1328. if (yyv[yysp-3]^.typ=t_void) and (yyv[yysp-1]^.p1^.p1^.p1=nil) then
  1329. begin
  1330. if createdynlib then
  1331. begin
  1332. write(outfile,yyv[yysp-1]^.p1^.p2^.p,' : procedure');
  1333. end
  1334. else
  1335. begin
  1336. shift(10);
  1337. write(outfile,'procedure ',yyv[yysp-1]^.p1^.p2^.p);
  1338. end;
  1339. if assigned(yyv[yysp-1]^.p1^.p1^.p2) then
  1340. write_args(outfile,yyv[yysp-1]^.p1^.p1^.p2);
  1341. if createdynlib then
  1342. begin
  1343. loaddynlibproc.add('pointer('+yyv[yysp-1]^.p1^.p2^.p+'):=GetProcAddress(hlib,'''+yyv[yysp-1]^.p1^.p2^.p+''');');
  1344. freedynlibproc.add(yyv[yysp-1]^.p1^.p2^.p+':=nil;');
  1345. end
  1346. else if not IsExtern then
  1347. begin
  1348. write(implemfile,'procedure ',yyv[yysp-1]^.p1^.p2^.p);
  1349. if assigned(yyv[yysp-1]^.p1^.p1^.p2) then
  1350. write_args(implemfile,yyv[yysp-1]^.p1^.p1^.p2);
  1351. end;
  1352. end
  1353. else
  1354. begin
  1355. if createdynlib then
  1356. begin
  1357. write(outfile,yyv[yysp-1]^.p1^.p2^.p,' : function');
  1358. end
  1359. else
  1360. begin
  1361. shift(9);
  1362. write(outfile,'function ',yyv[yysp-1]^.p1^.p2^.p);
  1363. end;
  1364. if assigned(yyv[yysp-1]^.p1^.p1^.p2) then
  1365. write_args(outfile,yyv[yysp-1]^.p1^.p1^.p2);
  1366. write(outfile,':');
  1367. write_p_a_def(outfile,yyv[yysp-1]^.p1^.p1^.p1,yyv[yysp-3]);
  1368. if createdynlib then
  1369. begin
  1370. loaddynlibproc.add('pointer('+yyv[yysp-1]^.p1^.p2^.p+'):=GetProcAddress(hlib,'''+yyv[yysp-1]^.p1^.p2^.p+''');');
  1371. freedynlibproc.add(yyv[yysp-1]^.p1^.p2^.p+':=nil;');
  1372. end
  1373. else if not IsExtern then
  1374. begin
  1375. write(implemfile,'function ',yyv[yysp-1]^.p1^.p2^.p);
  1376. if assigned(yyv[yysp-1]^.p1^.p1^.p2) then
  1377. write_args(implemfile,yyv[yysp-1]^.p1^.p1^.p2);
  1378. write(implemfile,':');
  1379. write_p_a_def(implemfile,yyv[yysp-1]^.p1^.p1^.p1,yyv[yysp-3]);
  1380. end;
  1381. end;
  1382. (* No CDECL in interface for Uselib *)
  1383. if IsExtern and (not no_pop) then
  1384. write(outfile,';cdecl');
  1385. popshift;
  1386. if createdynlib then
  1387. begin
  1388. writeln(outfile,';');
  1389. end
  1390. else if UseLib then
  1391. begin
  1392. if IsExtern then
  1393. begin
  1394. write (outfile,';external');
  1395. If UseName then
  1396. Write(outfile,' External_library name ''',yyv[yysp-1]^.p1^.p2^.p,'''');
  1397. end;
  1398. writeln(outfile,';');
  1399. end
  1400. else
  1401. begin
  1402. writeln(outfile,';');
  1403. if not IsExtern then
  1404. begin
  1405. writeln(implemfile,';');
  1406. shift(2);
  1407. if yyv[yysp-0]^.typ=t_statement_list then
  1408. write_statement_block(implemfile,yyv[yysp-0]);
  1409. popshift;
  1410. end;
  1411. end;
  1412. IsExtern:=false;
  1413. if not(compactmode) and not(createdynlib) then
  1414. writeln(outfile);
  1415. until not NeedEllipsisOverload;
  1416. end
  1417. else (* yyv[yysp-1]^.p1^.p1^.typ=t_procdef *)
  1418. if assigned(yyv[yysp-1])and assigned(yyv[yysp-1]^.p1) then
  1419. begin
  1420. shift(2);
  1421. if block_type<>bt_var then
  1422. begin
  1423. if not(compactmode) then
  1424. writeln(outfile);
  1425. writeln(outfile,aktspace,'var');
  1426. end;
  1427. block_type:=bt_var;
  1428. shift(3);
  1429. IsExtern:=assigned(yyv[yysp-4])and(yyv[yysp-4]^.str='extern');
  1430. (* walk through all declarations *)
  1431. hp:=yyv[yysp-1];
  1432. while assigned(hp) and assigned(hp^.p1) do
  1433. begin
  1434. (* write new var name *)
  1435. if assigned(hp^.p1^.p2) and assigned(hp^.p1^.p2^.p) then
  1436. write(outfile,aktspace,hp^.p1^.p2^.p);
  1437. write(outfile,' : ');
  1438. shift(2);
  1439. (* write its type *)
  1440. write_p_a_def(outfile,hp^.p1^.p1,yyv[yysp-3]);
  1441. if assigned(hp^.p1^.p2)and assigned(hp^.p1^.p2^.p)then
  1442. begin
  1443. if isExtern then
  1444. write(outfile,';cvar;external')
  1445. else
  1446. write(outfile,';cvar;public');
  1447. end;
  1448. writeln(outfile,';');
  1449. popshift;
  1450. hp:=hp^.p2;
  1451. end;
  1452. popshift;
  1453. popshift;
  1454. end;
  1455. if assigned(yyv[yysp-4]) then
  1456. dispose(yyv[yysp-4],done);
  1457. if assigned(yyv[yysp-3]) then
  1458. dispose(yyv[yysp-3],done);
  1459. if assigned(yyv[yysp-2]) then
  1460. dispose(yyv[yysp-2],done);
  1461. if assigned(yyv[yysp-1]) then
  1462. dispose(yyv[yysp-1],done);
  1463. if assigned(yyv[yysp-0]) then
  1464. dispose(yyv[yysp-0],done);
  1465. end;
  1466. 29 : begin
  1467. IsExtern:=false;
  1468. (* by default we must pop the args pushed on stack *)
  1469. no_pop:=false;
  1470. if (assigned(yyv[yysp-2])and assigned(yyv[yysp-2]^.p1)and assigned(yyv[yysp-2]^.p1^.p1))
  1471. and (yyv[yysp-2]^.p1^.p1^.typ=t_procdef) then
  1472. begin
  1473. repeat
  1474. If UseLib then
  1475. IsExtern:=true
  1476. else
  1477. IsExtern:=assigned(yyv[yysp-5])and(yyv[yysp-5]^.str='extern');
  1478. no_pop:=assigned(yyv[yysp-3]) and (yyv[yysp-3]^.str='no_pop');
  1479. if (block_type<>bt_func) and not(createdynlib) then
  1480. begin
  1481. writeln(outfile);
  1482. block_type:=bt_func;
  1483. end;
  1484. (* dyn. procedures must be put into a var block *)
  1485. if createdynlib then
  1486. begin
  1487. if (block_type<>bt_var) then
  1488. begin
  1489. if not(compactmode) then
  1490. writeln(outfile);
  1491. writeln(outfile,aktspace,'var');
  1492. block_type:=bt_var;
  1493. end;
  1494. shift(2);
  1495. end;
  1496. if not CompactMode then
  1497. begin
  1498. write(outfile,aktspace);
  1499. if not IsExtern then
  1500. write(implemfile,aktspace);
  1501. end;
  1502. (* distinguish between procedure and function *)
  1503. if assigned(yyv[yysp-4]) then
  1504. if (yyv[yysp-4]^.typ=t_void) and (yyv[yysp-2]^.p1^.p1^.p1=nil) then
  1505. begin
  1506. if createdynlib then
  1507. begin
  1508. write(outfile,yyv[yysp-2]^.p1^.p2^.p,' : procedure');
  1509. end
  1510. else
  1511. begin
  1512. shift(10);
  1513. write(outfile,'procedure ',yyv[yysp-2]^.p1^.p2^.p);
  1514. end;
  1515. if assigned(yyv[yysp-2]^.p1^.p1^.p2) then
  1516. write_args(outfile,yyv[yysp-2]^.p1^.p1^.p2);
  1517. if createdynlib then
  1518. begin
  1519. loaddynlibproc.add('pointer('+yyv[yysp-2]^.p1^.p2^.p+'):=GetProcAddress(hlib,'''+yyv[yysp-2]^.p1^.p2^.p+''');');
  1520. freedynlibproc.add(yyv[yysp-2]^.p1^.p2^.p+':=nil;');
  1521. end
  1522. else if not IsExtern then
  1523. begin
  1524. write(implemfile,'procedure ',yyv[yysp-2]^.p1^.p2^.p);
  1525. if assigned(yyv[yysp-2]^.p1^.p1^.p2) then
  1526. write_args(implemfile,yyv[yysp-2]^.p1^.p1^.p2);
  1527. end;
  1528. end
  1529. else
  1530. begin
  1531. if createdynlib then
  1532. begin
  1533. write(outfile,yyv[yysp-2]^.p1^.p2^.p,' : function');
  1534. end
  1535. else
  1536. begin
  1537. shift(9);
  1538. write(outfile,'function ',yyv[yysp-2]^.p1^.p2^.p);
  1539. end;
  1540. if assigned(yyv[yysp-2]^.p1^.p1^.p2) then
  1541. write_args(outfile,yyv[yysp-2]^.p1^.p1^.p2);
  1542. write(outfile,':');
  1543. write_p_a_def(outfile,yyv[yysp-2]^.p1^.p1^.p1,yyv[yysp-4]);
  1544. if createdynlib then
  1545. begin
  1546. loaddynlibproc.add('pointer('+yyv[yysp-2]^.p1^.p2^.p+'):=GetProcAddress(hlib,'''+yyv[yysp-2]^.p1^.p2^.p+''');');
  1547. freedynlibproc.add(yyv[yysp-2]^.p1^.p2^.p+':=nil;');
  1548. end
  1549. else if not IsExtern then
  1550. begin
  1551. write(implemfile,'function ',yyv[yysp-2]^.p1^.p2^.p);
  1552. if assigned(yyv[yysp-2]^.p1^.p1^.p2) then
  1553. write_args(implemfile,yyv[yysp-2]^.p1^.p1^.p2);
  1554. write(implemfile,':');
  1555. write_p_a_def(implemfile,yyv[yysp-2]^.p1^.p1^.p1,yyv[yysp-4]);
  1556. end;
  1557. end;
  1558. if assigned(yyv[yysp-1]) then
  1559. write(outfile,';systrap ',yyv[yysp-1]^.p);
  1560. (* No CDECL in interface for Uselib *)
  1561. if IsExtern and (not no_pop) then
  1562. write(outfile,';cdecl');
  1563. popshift;
  1564. if createdynlib then
  1565. begin
  1566. writeln(outfile,';');
  1567. end
  1568. else if UseLib then
  1569. begin
  1570. if IsExtern then
  1571. begin
  1572. write (outfile,';external');
  1573. If UseName then
  1574. Write(outfile,' External_library name ''',yyv[yysp-2]^.p1^.p2^.p,'''');
  1575. end;
  1576. writeln(outfile,';');
  1577. end
  1578. else
  1579. begin
  1580. writeln(outfile,';');
  1581. if not IsExtern then
  1582. begin
  1583. writeln(implemfile,';');
  1584. writeln(implemfile,aktspace,'begin');
  1585. writeln(implemfile,aktspace,' { You must implement this function }');
  1586. writeln(implemfile,aktspace,'end;');
  1587. end;
  1588. end;
  1589. IsExtern:=false;
  1590. if not(compactmode) and not(createdynlib) then
  1591. writeln(outfile);
  1592. until not NeedEllipsisOverload;
  1593. end
  1594. else (* yyv[yysp-2]^.p1^.p1^.typ=t_procdef *)
  1595. if assigned(yyv[yysp-2])and assigned(yyv[yysp-2]^.p1) then
  1596. begin
  1597. shift(2);
  1598. if block_type<>bt_var then
  1599. begin
  1600. if not(compactmode) then
  1601. writeln(outfile);
  1602. writeln(outfile,aktspace,'var');
  1603. end;
  1604. block_type:=bt_var;
  1605. shift(3);
  1606. IsExtern:=assigned(yyv[yysp-5])and(yyv[yysp-5]^.str='extern');
  1607. (* walk through all declarations *)
  1608. hp:=yyv[yysp-2];
  1609. while assigned(hp) and assigned(hp^.p1) do
  1610. begin
  1611. (* write new var name *)
  1612. if assigned(hp^.p1^.p2) and assigned(hp^.p1^.p2^.p) then
  1613. write(outfile,aktspace,hp^.p1^.p2^.p);
  1614. write(outfile,' : ');
  1615. shift(2);
  1616. (* write its type *)
  1617. write_p_a_def(outfile,hp^.p1^.p1,yyv[yysp-4]);
  1618. if assigned(hp^.p1^.p2)and assigned(hp^.p1^.p2^.p)then
  1619. begin
  1620. if isExtern then
  1621. write(outfile,';cvar;external')
  1622. else
  1623. write(outfile,';cvar;public');
  1624. end;
  1625. writeln(outfile,';');
  1626. popshift;
  1627. hp:=hp^.p2;
  1628. end;
  1629. popshift;
  1630. popshift;
  1631. end;
  1632. if assigned(yyv[yysp-5])then dispose(yyv[yysp-5],done);
  1633. if assigned(yyv[yysp-4])then dispose(yyv[yysp-4],done);
  1634. if assigned(yyv[yysp-2])then dispose(yyv[yysp-2],done);
  1635. end;
  1636. 30 : begin
  1637. if block_type<>bt_type then
  1638. begin
  1639. if not(compactmode) then
  1640. writeln(outfile);
  1641. writeln(outfile,aktspace,'type');
  1642. block_type:=bt_type;
  1643. end;
  1644. shift(3);
  1645. if ( yyv[yysp-1]^.p2 <> nil ) then
  1646. begin
  1647. (* write new type name *)
  1648. TN:=TypeName(yyv[yysp-1]^.p2^.p);
  1649. PN:=PointerName(yyv[yysp-1]^.p2^.p);
  1650. (* define a Pointer type also for structs *)
  1651. if UsePPointers and (Uppercase(tn)<>Uppercase(pn)) and
  1652. assigned(yyv[yysp-1]) and (yyv[yysp-1]^.typ in [t_uniondef,t_structdef]) then
  1653. writeln(outfile,aktspace,PN,' = ^',TN,';');
  1654. write(outfile,aktspace,TN,' = ');
  1655. shift(2);
  1656. hp:=yyv[yysp-1];
  1657. write_type_specifier(outfile,hp);
  1658. popshift;
  1659. (* enum_to_const can make a switch to const *)
  1660. if block_type=bt_type then
  1661. writeln(outfile,';');
  1662. writeln(outfile);
  1663. flush(outfile);
  1664. popshift;
  1665. if must_write_packed_field then
  1666. write_packed_fields_info(outfile,hp,TN);
  1667. if assigned(hp) then
  1668. dispose(hp,done)
  1669. end
  1670. else
  1671. begin
  1672. TN:=TypeName(yyv[yysp-1]^.str);
  1673. PN:=PointerName(yyv[yysp-1]^.str);
  1674. if UsePPointers then writeln(outfile,aktspace,PN,' = ^',TN,';');
  1675. if PackRecords then
  1676. writeln(outfile, aktspace, TN, ' = packed record')
  1677. else
  1678. writeln(outfile, aktspace, TN, ' = record');
  1679. writeln(outfile, aktspace, ' {undefined structure}');
  1680. writeln(outfile, aktspace, ' end;');
  1681. writeln(outfile);
  1682. popshift;
  1683. end;
  1684. end;
  1685. 31 : begin
  1686. (* TYPEDEF STRUCT dname dname SEMICOLON *)
  1687. if block_type<>bt_type then
  1688. begin
  1689. if not(compactmode) then
  1690. writeln(outfile);
  1691. writeln(outfile,aktspace,'type');
  1692. block_type:=bt_type;
  1693. end;
  1694. PN:=TypeName(yyv[yysp-2]^.p);
  1695. TN:=TypeName(yyv[yysp-1]^.p);
  1696. if Uppercase(tn)<>Uppercase(pn) then
  1697. begin
  1698. shift(3);
  1699. writeln(outfile,aktspace,PN,' = ',TN,';');
  1700. popshift;
  1701. end;
  1702. if assigned(yyv[yysp-2]) then
  1703. dispose(yyv[yysp-2],done);
  1704. if assigned(yyv[yysp-1]) then
  1705. dispose(yyv[yysp-1],done);
  1706. end;
  1707. 32 : begin
  1708. (* TYPEDEF type_specifier LKLAMMER dec_modifier declarator RKLAMMER maybe_space LKLAMMER argument_declaration_list RKLAMMER SEMICOLON *)
  1709. if block_type<>bt_type then
  1710. begin
  1711. if not(compactmode) then
  1712. writeln(outfile);
  1713. writeln(outfile,aktspace,'type');
  1714. block_type:=bt_type;
  1715. end;
  1716. no_pop:=assigned(yyv[yysp-7]) and (yyv[yysp-7]^.str='no_pop');
  1717. shift(3);
  1718. (* walk through all declarations *)
  1719. hp:=yyv[yysp-6];
  1720. if assigned(hp) then
  1721. begin
  1722. hp:=yyv[yysp-6];
  1723. while assigned(hp^.p1) do
  1724. hp:=hp^.p1;
  1725. hp^.p1:=new(presobject,init_two(t_procdef,nil,yyv[yysp-2]));
  1726. hp:=yyv[yysp-6];
  1727. if assigned(hp^.p1) and assigned(hp^.p1^.p1) then
  1728. begin
  1729. writeln(outfile);
  1730. (* write new type name *)
  1731. write(outfile,aktspace,TypeName(hp^.p2^.p),' = ');
  1732. shift(2);
  1733. write_p_a_def(outfile,hp^.p1,yyv[yysp-9]);
  1734. popshift;
  1735. (* if no_pop it is normal fpc calling convention *)
  1736. if is_procvar and
  1737. (not no_pop) then
  1738. write(outfile,';cdecl');
  1739. writeln(outfile,';');
  1740. flush(outfile);
  1741. end;
  1742. end;
  1743. popshift;
  1744. if assigned(yyv[yysp-9])then
  1745. dispose(yyv[yysp-9],done);
  1746. if assigned(yyv[yysp-7])then
  1747. dispose(yyv[yysp-7],done);
  1748. if assigned(yyv[yysp-6])then (* disposes also yyv[yysp-2] *)
  1749. dispose(yyv[yysp-6],done);
  1750. end;
  1751. 33 : begin
  1752. (* TYPEDEF type_specifier dec_modifier declarator_list SEMICOLON *)
  1753. if block_type<>bt_type then
  1754. begin
  1755. if not(compactmode) then
  1756. writeln(outfile);
  1757. writeln(outfile,aktspace,'type');
  1758. block_type:=bt_type;
  1759. end;
  1760. no_pop:=assigned(yyv[yysp-2]) and (yyv[yysp-2]^.str='no_pop');
  1761. shift(3);
  1762. (* Get the name to write the type definition for, try
  1763. to use the tag name first *)
  1764. if assigned(yyv[yysp-3]^.p2) then
  1765. begin
  1766. ph:=yyv[yysp-3]^.p2;
  1767. end
  1768. else
  1769. begin
  1770. if not assigned(yyv[yysp-1]^.p1^.p2) then
  1771. internalerror(4444);
  1772. ph:=yyv[yysp-1]^.p1^.p2;
  1773. end;
  1774. (* write type definition *)
  1775. is_procvar:=false;
  1776. writeln(outfile);
  1777. TN:=TypeName(ph^.p);
  1778. PN:=PointerName(ph^.p);
  1779. if UsePPointers and (Uppercase(tn)<>Uppercase(pn)) and
  1780. assigned(yyv[yysp-3]) and (yyv[yysp-3]^.typ<>t_procdef) then
  1781. writeln(outfile,aktspace,PN,' = ^',TN,';');
  1782. (* write new type name *)
  1783. write(outfile,aktspace,TN,' = ');
  1784. shift(2);
  1785. write_type_specifier(outfile,yyv[yysp-3]);
  1786. popshift;
  1787. (* if no_pop it is normal fpc calling convention *)
  1788. if is_procvar and
  1789. (not no_pop) then
  1790. write(outfile,';cdecl');
  1791. writeln(outfile,';');
  1792. flush(outfile);
  1793. (* write alias names, ph points to the name already used *)
  1794. hp:=yyv[yysp-1];
  1795. while assigned(hp) do
  1796. begin
  1797. if (hp<>ph) and assigned(hp^.p1^.p2) then
  1798. begin
  1799. PN:=TypeName(ph^.p);
  1800. TN:=TypeName(hp^.p1^.p2^.p);
  1801. if Uppercase(TN)<>Uppercase(PN) then
  1802. begin
  1803. write(outfile,aktspace,TN,' = ');
  1804. write_p_a_def(outfile,hp^.p1^.p1,ph);
  1805. writeln(outfile,';');
  1806. PN:=PointerName(hp^.p1^.p2^.p);
  1807. if UsePPointers and (Uppercase(tn)<>Uppercase(pn)) and
  1808. assigned(yyv[yysp-3]) and (yyv[yysp-3]^.typ<>t_procdef) then
  1809. writeln(outfile,aktspace,PN,' = ^',TN,';');
  1810. end;
  1811. end;
  1812. hp:=hp^.next;
  1813. end;
  1814. popshift;
  1815. if must_write_packed_field then
  1816. if assigned(ph) then
  1817. write_packed_fields_info(outfile,yyv[yysp-3],ph^.str)
  1818. else if assigned(yyv[yysp-3]^.p2) then
  1819. write_packed_fields_info(outfile,yyv[yysp-3],yyv[yysp-3]^.p2^.str);
  1820. if assigned(yyv[yysp-3])then
  1821. dispose(yyv[yysp-3],done);
  1822. if assigned(yyv[yysp-2])then
  1823. dispose(yyv[yysp-2],done);
  1824. if assigned(yyv[yysp-1])then
  1825. dispose(yyv[yysp-1],done);
  1826. end;
  1827. 34 : begin
  1828. if block_type<>bt_type then
  1829. begin
  1830. if not(compactmode) then
  1831. writeln(outfile);
  1832. writeln(outfile,aktspace,'type');
  1833. block_type:=bt_type;
  1834. end;
  1835. shift(3);
  1836. (* write as pointer *)
  1837. writeln(outfile);
  1838. writeln(outfile,'(* generic typedef *)');
  1839. writeln(outfile,aktspace,yyv[yysp-1]^.p,' = pointer;');
  1840. flush(outfile);
  1841. popshift;
  1842. if assigned(yyv[yysp-1]) then
  1843. dispose(yyv[yysp-1],done);
  1844. end;
  1845. 35 : begin
  1846. writeln(outfile,'in declaration at line ',line_no,' *)');
  1847. aktspace:='';
  1848. in_space_define:=0;
  1849. in_define:=false;
  1850. arglevel:=0;
  1851. if_nb:=0;
  1852. aktspace:=' ';
  1853. space_index:=1;
  1854. yyerrok;
  1855. end;
  1856. 36 : begin
  1857. (* DEFINE dname LKLAMMER enum_list RKLAMMER para_def_expr NEW_LINE *)
  1858. if not stripinfo then
  1859. begin
  1860. writeln (outfile,aktspace,'{ was #define dname(params) para_def_expr }');
  1861. writeln (implemfile,aktspace,'{ was #define dname(params) para_def_expr }');
  1862. if assigned(yyv[yysp-3]) then
  1863. begin
  1864. writeln (outfile,aktspace,'{ argument types are unknown }');
  1865. writeln (implemfile,aktspace,'{ argument types are unknown }');
  1866. end;
  1867. if not assigned(yyv[yysp-1]^.p3) then
  1868. begin
  1869. writeln(outfile,aktspace,'{ return type might be wrong } ');
  1870. writeln(implemfile,aktspace,'{ return type might be wrong } ');
  1871. end;
  1872. end;
  1873. block_type:=bt_func;
  1874. write(outfile,aktspace,'function ',yyv[yysp-5]^.p);
  1875. write(implemfile,aktspace,'function ',yyv[yysp-5]^.p);
  1876. if assigned(yyv[yysp-3]) then
  1877. begin
  1878. write(outfile,'(');
  1879. write(implemfile,'(');
  1880. ph:=new(presobject,init_one(t_enumdef,yyv[yysp-3]));
  1881. write_def_params(outfile,ph);
  1882. write_def_params(implemfile,ph);
  1883. if assigned(ph) then dispose(ph,done);
  1884. ph:=nil;
  1885. (* types are unknown *)
  1886. write(outfile,' : longint)');
  1887. write(implemfile,' : longint)');
  1888. end;
  1889. if not assigned(yyv[yysp-1]^.p3) then
  1890. begin
  1891. writeln(outfile,' : longint;',aktspace,commentstr);
  1892. writeln(implemfile,' : longint;');
  1893. flush(outfile);
  1894. end
  1895. else
  1896. begin
  1897. write(outfile,' : ');
  1898. write_type_specifier(outfile,yyv[yysp-1]^.p3);
  1899. writeln(outfile,';',aktspace,commentstr);
  1900. flush(outfile);
  1901. write(implemfile,' : ');
  1902. write_type_specifier(implemfile,yyv[yysp-1]^.p3);
  1903. writeln(implemfile,';');
  1904. end;
  1905. writeln(outfile);
  1906. flush(outfile);
  1907. hp:=new(presobject,init_two(t_funcname,yyv[yysp-5],yyv[yysp-1]));
  1908. write_funexpr(implemfile,hp);
  1909. writeln(implemfile);
  1910. flush(implemfile);
  1911. if assigned(hp)then dispose(hp,done);
  1912. end;
  1913. 37 : begin
  1914. (* DEFINE dname SPACE_DEFINE NEW_LINE *)
  1915. writeln(outfile,'{$define ',yyv[yysp-2]^.p,'}',aktspace,commentstr);
  1916. flush(outfile);
  1917. if assigned(yyv[yysp-2])then
  1918. dispose(yyv[yysp-2],done);
  1919. end;
  1920. 38 : begin
  1921. writeln(outfile,'{$define ',yyv[yysp-1]^.p,'}',aktspace,commentstr);
  1922. flush(outfile);
  1923. if assigned(yyv[yysp-1])then
  1924. dispose(yyv[yysp-1],done);
  1925. end;
  1926. 39 : begin
  1927. (* DEFINE dname SPACE_DEFINE def_expr NEW_LINE *)
  1928. if (yyv[yysp-1]^.typ=t_exprlist) and
  1929. yyv[yysp-1]^.p1^.is_const and
  1930. not assigned(yyv[yysp-1]^.next) then
  1931. begin
  1932. if block_type<>bt_const then
  1933. begin
  1934. writeln(outfile);
  1935. writeln(outfile,aktspace,'const');
  1936. end;
  1937. block_type:=bt_const;
  1938. shift(3);
  1939. write(outfile,aktspace,yyv[yysp-3]^.p);
  1940. write(outfile,' = ');
  1941. flush(outfile);
  1942. write_expr(outfile,yyv[yysp-1]^.p1);
  1943. writeln(outfile,';',aktspace,commentstr);
  1944. popshift;
  1945. if assigned(yyv[yysp-3]) then
  1946. dispose(yyv[yysp-3],done);
  1947. if assigned(yyv[yysp-1]) then
  1948. dispose(yyv[yysp-1],done);
  1949. end
  1950. else
  1951. begin
  1952. if not stripinfo then
  1953. begin
  1954. writeln (outfile,aktspace,'{ was #define dname def_expr }');
  1955. writeln (implemfile,aktspace,'{ was #define dname def_expr }');
  1956. end;
  1957. block_type:=bt_func;
  1958. write(outfile,aktspace,'function ',yyv[yysp-3]^.p);
  1959. write(implemfile,aktspace,'function ',yyv[yysp-3]^.p);
  1960. shift(2);
  1961. if not assigned(yyv[yysp-1]^.p3) then
  1962. begin
  1963. writeln(outfile,' : longint;');
  1964. writeln(outfile,aktspace,' { return type might be wrong }');
  1965. flush(outfile);
  1966. writeln(implemfile,' : longint;');
  1967. writeln(implemfile,aktspace,' { return type might be wrong }');
  1968. end
  1969. else
  1970. begin
  1971. write(outfile,' : ');
  1972. write_type_specifier(outfile,yyv[yysp-1]^.p3);
  1973. writeln(outfile,';',aktspace,commentstr);
  1974. flush(outfile);
  1975. write(implemfile,' : ');
  1976. write_type_specifier(implemfile,yyv[yysp-1]^.p3);
  1977. writeln(implemfile,';');
  1978. end;
  1979. writeln(outfile);
  1980. flush(outfile);
  1981. hp:=new(presobject,init_two(t_funcname,yyv[yysp-3],yyv[yysp-1]));
  1982. write_funexpr(implemfile,hp);
  1983. popshift;
  1984. dispose(hp,done);
  1985. writeln(implemfile);
  1986. flush(implemfile);
  1987. end;
  1988. end;
  1989. 40 : begin
  1990. writeln(outfile,'in define line ',line_no,' *)');
  1991. aktspace:='';
  1992. in_space_define:=0;
  1993. in_define:=false;
  1994. arglevel:=0;
  1995. if_nb:=0;
  1996. aktspace:=' ';
  1997. space_index:=1;
  1998. yyerrok;
  1999. end;
  2000. 41 : begin
  2001. yyval:=yyv[yysp-1];
  2002. end;
  2003. 42 : begin
  2004. writeln(outfile,' in member_list *)');
  2005. yyerrok;
  2006. yyval:=nil;
  2007. end;
  2008. 43 : begin
  2009. yyval:=yyv[yysp-1];
  2010. end;
  2011. 44 : begin
  2012. writeln(outfile,' in enum_list *)');
  2013. yyerrok;
  2014. yyval:=nil;
  2015. end;
  2016. 45 : begin
  2017. if (not is_packed) and (not packrecords) then
  2018. writeln(outfile,'{$PACKRECORDS 1}');
  2019. is_packed:=true;
  2020. yyval:=new(presobject,init_two(t_structdef,yyv[yysp-1],yyv[yysp-2]));
  2021. end;
  2022. 46 : begin
  2023. if (is_packed) and (not packrecords) then
  2024. writeln(outfile,'{$PACKRECORDS 4}');
  2025. is_packed:=false;
  2026. yyval:=new(presobject,init_two(t_structdef,yyv[yysp-0],yyv[yysp-1]));
  2027. end;
  2028. 47 : begin
  2029. if (not is_packed) and (not packrecords) then
  2030. writeln(outfile,'{$PACKRECORDS 1}');
  2031. is_packed:=true;
  2032. yyval:=new(presobject,init_two(t_uniondef,yyv[yysp-1],yyv[yysp-2]));
  2033. end;
  2034. 48 : begin
  2035. yyval:=new(presobject,init_two(t_uniondef,yyv[yysp-0],yyv[yysp-1]));
  2036. end;
  2037. 49 : begin
  2038. yyval:=yyv[yysp-0];
  2039. end;
  2040. 50 : begin
  2041. yyval:=yyv[yysp-0];
  2042. end;
  2043. 51 : begin
  2044. yyval:=new(presobject,init_two(t_enumdef,yyv[yysp-0],yyv[yysp-1]));
  2045. end;
  2046. 52 : begin
  2047. yyval:=yyv[yysp-0];
  2048. end;
  2049. 53 : begin
  2050. if not stripinfo then
  2051. writeln(outfile,'(* Const before type ignored *)');
  2052. yyval:=yyv[yysp-0];
  2053. end;
  2054. 54 : begin
  2055. if (not is_packed) and (not packrecords)then
  2056. writeln(outfile,'{$PACKRECORDS 1}');
  2057. is_packed:=true;
  2058. yyval:=new(presobject,init_one(t_uniondef,yyv[yysp-1]));
  2059. end;
  2060. 55 : begin
  2061. yyval:=new(presobject,init_one(t_uniondef,yyv[yysp-0]));
  2062. end;
  2063. 56 : begin
  2064. if (not is_packed) and (not packrecords) then
  2065. writeln(outfile,'{$PACKRECORDS 1}');
  2066. is_packed:=true;
  2067. yyval:=new(presobject,init_one(t_structdef,yyv[yysp-1]));
  2068. end;
  2069. 57 : begin
  2070. if (is_packed) and (not packrecords) then
  2071. writeln(outfile,'{$PACKRECORDS 4}');
  2072. is_packed:=false;
  2073. yyval:=new(presobject,init_one(t_structdef,yyv[yysp-0]));
  2074. end;
  2075. 58 : begin
  2076. yyval:=new(presobject,init_one(t_enumdef,yyv[yysp-0]));
  2077. end;
  2078. 59 : begin
  2079. yyval:=yyv[yysp-0];
  2080. end;
  2081. 60 : begin
  2082. yyval:=yyv[yysp-0];
  2083. end;
  2084. 61 : begin
  2085. yyval:=new(presobject,init_one(t_memberdeclist,yyv[yysp-1]));
  2086. yyval^.next:=yyv[yysp-0];
  2087. end;
  2088. 62 : begin
  2089. yyval:=new(presobject,init_one(t_memberdeclist,yyv[yysp-0]));
  2090. end;
  2091. 63 : begin
  2092. yyval:=new(presobject,init_two(t_memberdec,yyv[yysp-2],yyv[yysp-1]));
  2093. end;
  2094. 64 : begin
  2095. (*dname*)
  2096. yyval:=new(presobject,init_id(act_token));
  2097. end;
  2098. 65 : begin
  2099. hp:=yyv[yysp-0];
  2100. yyval:=hp;
  2101. if assigned(hp) then
  2102. begin
  2103. s:=strpas(hp^.p);
  2104. if s=UINT_STR then
  2105. s:=INT_STR
  2106. else if s=USHORT_STR then
  2107. s:=SHORT_STR
  2108. else if s=UCHAR_STR then
  2109. s:=CHAR_STR
  2110. else if s=QWORD_STR then
  2111. s:=INT64_STR
  2112. else
  2113. s:='';
  2114. if s<>'' then
  2115. hp^.setstr(s);
  2116. end;
  2117. end;
  2118. 66 : begin
  2119. hp:=yyv[yysp-0];
  2120. yyval:=hp;
  2121. if assigned(hp) then
  2122. begin
  2123. s:=strpas(hp^.p);
  2124. if s=INT_STR then
  2125. s:=UINT_STR
  2126. else if s=SHORT_STR then
  2127. s:=USHORT_STR
  2128. else if s=CHAR_STR then
  2129. s:=UCHAR_STR
  2130. else if s=INT64_STR then
  2131. s:=QWORD_STR
  2132. else
  2133. s:='';
  2134. if s<>'' then
  2135. hp^.setstr(s);
  2136. end;
  2137. end;
  2138. 67 : begin
  2139. yyval:=new(presobject,init_intid(INT_STR));
  2140. end;
  2141. 68 : begin
  2142. yyval:=new(presobject,init_intid(INT_STR));
  2143. end;
  2144. 69 : begin
  2145. yyval:=new(presobject,init_intid(INT_STR));
  2146. end;
  2147. 70 : begin
  2148. yyval:=new(presobject,init_intid(INT64_STR));
  2149. end;
  2150. 71 : begin
  2151. yyval:=new(presobject,init_intid(INT64_STR));
  2152. end;
  2153. 72 : begin
  2154. yyval:=new(presobject,init_intid(SHORT_STR));
  2155. end;
  2156. 73 : begin
  2157. yyval:=new(presobject,init_intid(SHORT_STR));
  2158. end;
  2159. 74 : begin
  2160. yyval:=new(presobject,init_intid(REAL_STR));
  2161. end;
  2162. 75 : begin
  2163. yyval:=new(presobject,init_no(t_void));
  2164. end;
  2165. 76 : begin
  2166. yyval:=new(presobject,init_intid(CHAR_STR));
  2167. end;
  2168. 77 : begin
  2169. yyval:=new(presobject,init_intid(UINT_STR));
  2170. end;
  2171. 78 : begin
  2172. yyval:=yyv[yysp-0];
  2173. end;
  2174. 79 : begin
  2175. yyval:=yyv[yysp-0];
  2176. tn:=yyval^.str;
  2177. if removeunderscore and
  2178. (length(tn)>1) and (tn[1]='_') then
  2179. yyval^.setstr(Copy(tn,2,length(tn)-1));
  2180. end;
  2181. 80 : begin
  2182. yyval:=yyv[yysp-2];
  2183. hp:=yyv[yysp-2];
  2184. while assigned(hp^.next) do
  2185. hp:=hp^.next;
  2186. hp^.next:=new(presobject,init_one(t_declist,yyv[yysp-0]));
  2187. end;
  2188. 81 : begin
  2189. writeln(outfile,' in declarator_list *)');
  2190. yyval:=yyv[yysp-0];
  2191. yyerrok;
  2192. end;
  2193. 82 : begin
  2194. writeln(outfile,' in declarator_list *)');
  2195. yyerrok;
  2196. end;
  2197. 83 : begin
  2198. yyval:=new(presobject,init_one(t_declist,yyv[yysp-0]));
  2199. end;
  2200. 84 : begin
  2201. yyval:=new(presobject,init_two(t_arg,yyv[yysp-1],yyv[yysp-0]));
  2202. end;
  2203. 85 : begin
  2204. (* type_specifier STAR declarator *)
  2205. hp:=new(presobject,init_one(t_pointerdef,yyv[yysp-2]));
  2206. yyval:=new(presobject,init_two(t_arg,hp,yyv[yysp-0]));
  2207. end;
  2208. 86 : begin
  2209. yyval:=new(presobject,init_two(t_arg,yyv[yysp-1],yyv[yysp-0]));
  2210. end;
  2211. 87 : begin
  2212. yyval:=new(presobject,init_two(t_arglist,yyv[yysp-0],nil));
  2213. end;
  2214. 88 : begin
  2215. yyval:=new(presobject,init_two(t_arglist,yyv[yysp-2],nil));
  2216. yyval^.next:=yyv[yysp-0];
  2217. end;
  2218. 89 : begin
  2219. yyval:=new(presobject,init_two(t_arglist,ellipsisarg,nil));
  2220. end;
  2221. 90 : begin
  2222. yyval:=nil;
  2223. end;
  2224. 91 : begin
  2225. yyval:=new(presobject,init_id('far'));
  2226. end;
  2227. 92 : begin
  2228. yyval:=new(presobject,init_id('near'));
  2229. end;
  2230. 93 : begin
  2231. yyval:=new(presobject,init_id('huge'));
  2232. end;
  2233. 94 : begin
  2234. if not stripinfo then
  2235. writeln(outfile,'(* Const before declarator ignored *)');
  2236. yyval:=yyv[yysp-0];
  2237. end;
  2238. 95 : begin
  2239. if not stripinfo then
  2240. writeln(outfile,aktspace,'(* ',yyv[yysp-2]^.p,' ignored *)');
  2241. dispose(yyv[yysp-2],done);
  2242. hp:=yyv[yysp-0];
  2243. yyval:=hp;
  2244. while assigned(hp^.p1) do
  2245. hp:=hp^.p1;
  2246. hp^.p1:=new(presobject,init_one(t_pointerdef,nil));
  2247. end;
  2248. 96 : begin
  2249. (* %prec PSTAR this was wrong!! *)
  2250. hp:=yyv[yysp-0];
  2251. yyval:=hp;
  2252. while assigned(hp^.p1) do
  2253. hp:=hp^.p1;
  2254. hp^.p1:=new(presobject,init_one(t_pointerdef,nil));
  2255. end;
  2256. 97 : begin
  2257. hp:=yyv[yysp-0];
  2258. yyval:=hp;
  2259. while assigned(hp^.p1) do
  2260. hp:=hp^.p1;
  2261. hp^.p1:=new(presobject,init_one(t_addrdef,nil));
  2262. end;
  2263. 98 : begin
  2264. (* size specifier supported *)
  2265. hp:=new(presobject,init_one(t_size_specifier,yyv[yysp-0]));
  2266. yyval:=new(presobject,init_three(t_dec,nil,yyv[yysp-2],hp));
  2267. end;
  2268. 99 : begin
  2269. if not stripinfo then
  2270. writeln(outfile,'(* Warning : default value for ',yyv[yysp-2]^.p,' ignored *)');
  2271. hp:=new(presobject,init_one(t_default_value,yyv[yysp-0]));
  2272. yyval:=new(presobject,init_three(t_dec,nil,yyv[yysp-2],hp));
  2273. end;
  2274. 100 : begin
  2275. yyval:=new(presobject,init_two(t_dec,nil,yyv[yysp-0]));
  2276. end;
  2277. 101 : begin
  2278. hp:=yyv[yysp-3];
  2279. yyval:=hp;
  2280. while assigned(hp^.p1) do
  2281. hp:=hp^.p1;
  2282. hp^.p1:=new(presobject,init_two(t_procdef,nil,yyv[yysp-1]));
  2283. end;
  2284. 102 : begin
  2285. hp:=yyv[yysp-1];
  2286. yyval:=hp;
  2287. while assigned(hp^.p1) do
  2288. hp:=hp^.p1;
  2289. hp^.p1:=new(presobject,init_two(t_procdef,nil,nil));
  2290. end;
  2291. 103 : begin
  2292. hp:=yyv[yysp-3];
  2293. yyval:=hp;
  2294. while assigned(hp^.p1) do
  2295. hp:=hp^.p1;
  2296. hp^.p1:=new(presobject,init_two(t_arraydef,nil,yyv[yysp-1]));
  2297. end;
  2298. 104 : begin
  2299. (* this is translated into a pointer *)
  2300. hp:=yyv[yysp-2];
  2301. yyval:=hp;
  2302. while assigned(hp^.p1) do
  2303. hp:=hp^.p1;
  2304. hp^.p1:=new(presobject,init_two(t_arraydef,nil,nil));
  2305. end;
  2306. 105 : begin
  2307. yyval:=yyv[yysp-1];
  2308. end;
  2309. 106 : begin
  2310. yyval := yyv[yysp-1];
  2311. end;
  2312. 107 : begin
  2313. yyval := yyv[yysp-2];
  2314. end;
  2315. 108 : begin
  2316. if not stripinfo then
  2317. writeln(outfile,'(* Const before abstract_declarator ignored *)');
  2318. yyval:=yyv[yysp-0];
  2319. end;
  2320. 109 : begin
  2321. if not stripinfo then
  2322. writeln(outfile,aktspace,'(* ',yyv[yysp-2]^.p,' ignored *)');
  2323. dispose(yyv[yysp-2],done);
  2324. hp:=yyv[yysp-0];
  2325. yyval:=hp;
  2326. while assigned(hp^.p1) do
  2327. hp:=hp^.p1;
  2328. hp^.p1:=new(presobject,init_one(t_pointerdef,nil));
  2329. end;
  2330. 110 : begin
  2331. hp:=yyv[yysp-0];
  2332. yyval:=hp;
  2333. while assigned(hp^.p1) do
  2334. hp:=hp^.p1;
  2335. hp^.p1:=new(presobject,init_one(t_pointerdef,nil));
  2336. end;
  2337. 111 : begin
  2338. hp:=yyv[yysp-3];
  2339. yyval:=hp;
  2340. while assigned(hp^.p1) do
  2341. hp:=hp^.p1;
  2342. hp^.p1:=new(presobject,init_two(t_procdef,nil,yyv[yysp-1]));
  2343. end;
  2344. 112 : begin
  2345. hp:=yyv[yysp-1];
  2346. yyval:=hp;
  2347. while assigned(hp^.p1) do
  2348. hp:=hp^.p1;
  2349. hp^.p1:=new(presobject,init_two(t_procdef,nil,nil));
  2350. end;
  2351. 113 : begin
  2352. hp:=yyv[yysp-3];
  2353. yyval:=hp;
  2354. while assigned(hp^.p1) do
  2355. hp:=hp^.p1;
  2356. hp^.p1:=new(presobject,init_two(t_arraydef,nil,yyv[yysp-1]));
  2357. end;
  2358. 114 : begin
  2359. (* this is translated into a pointer *)
  2360. hp:=yyv[yysp-2];
  2361. yyval:=hp;
  2362. while assigned(hp^.p1) do
  2363. hp:=hp^.p1;
  2364. hp^.p1:=new(presobject,init_two(t_arraydef,nil,nil));
  2365. end;
  2366. 115 : begin
  2367. yyval:=yyv[yysp-1];
  2368. end;
  2369. 116 : begin
  2370. yyval:=new(presobject,init_two(t_dec,nil,nil));
  2371. end;
  2372. 117 : begin
  2373. yyval:=yyv[yysp-0];
  2374. end;
  2375. 118 : begin
  2376. yyval:=new(presobject,init_bop(':=',yyv[yysp-2],yyv[yysp-0]));
  2377. end;
  2378. 119 : begin
  2379. yyval:=new(presobject,init_bop('=',yyv[yysp-2],yyv[yysp-0]));
  2380. end;
  2381. 120 : begin
  2382. yyval:=new(presobject,init_bop('<>',yyv[yysp-2],yyv[yysp-0]));
  2383. end;
  2384. 121 : begin
  2385. yyval:=new(presobject,init_bop('>',yyv[yysp-2],yyv[yysp-0]));
  2386. end;
  2387. 122 : begin
  2388. yyval:=new(presobject,init_bop('>=',yyv[yysp-2],yyv[yysp-0]));
  2389. end;
  2390. 123 : begin
  2391. yyval:=new(presobject,init_bop('<',yyv[yysp-2],yyv[yysp-0]));
  2392. end;
  2393. 124 : begin
  2394. yyval:=new(presobject,init_bop('<=',yyv[yysp-2],yyv[yysp-0]));
  2395. end;
  2396. 125 : begin
  2397. yyval:=new(presobject,init_bop('+',yyv[yysp-2],yyv[yysp-0]));
  2398. end;
  2399. 126 : begin
  2400. yyval:=new(presobject,init_bop('-',yyv[yysp-2],yyv[yysp-0]));
  2401. end;
  2402. 127 : begin
  2403. yyval:=new(presobject,init_bop('*',yyv[yysp-2],yyv[yysp-0]));
  2404. end;
  2405. 128 : begin
  2406. yyval:=new(presobject,init_bop('/',yyv[yysp-2],yyv[yysp-0]));
  2407. end;
  2408. 129 : begin
  2409. yyval:=new(presobject,init_bop(' or ',yyv[yysp-2],yyv[yysp-0]));
  2410. end;
  2411. 130 : begin
  2412. yyval:=new(presobject,init_bop(' and ',yyv[yysp-2],yyv[yysp-0]));
  2413. end;
  2414. 131 : begin
  2415. yyval:=new(presobject,init_bop(' not ',yyv[yysp-2],yyv[yysp-0]));
  2416. end;
  2417. 132 : begin
  2418. yyval:=new(presobject,init_bop(' shl ',yyv[yysp-2],yyv[yysp-0]));
  2419. end;
  2420. 133 : begin
  2421. yyval:=new(presobject,init_bop(' shr ',yyv[yysp-2],yyv[yysp-0]));
  2422. end;
  2423. 134 : begin
  2424. yyv[yysp-0]^.p1:=yyv[yysp-2];
  2425. yyval:=yyv[yysp-0];
  2426. inc(if_nb);
  2427. yyval^.p:=strpnew('if_local'+str(if_nb));
  2428. end;
  2429. 135 : begin
  2430. yyval:=yyv[yysp-0];
  2431. end;
  2432. 136 : begin
  2433. (* if A then B else C *)
  2434. yyval:=new(presobject,init_three(t_ifexpr,nil,yyv[yysp-2],yyv[yysp-0]));
  2435. end;
  2436. 137 : begin
  2437. yyval:=yyv[yysp-0];
  2438. end;
  2439. 138 : begin
  2440. yyval:=nil;
  2441. end;
  2442. 139 : begin
  2443. yyval:=yyv[yysp-0];
  2444. end;
  2445. 140 : begin
  2446. yyval:=yyv[yysp-0];
  2447. end;
  2448. 141 : begin
  2449. (* remove L prefix for widestrings *)
  2450. s:=act_token;
  2451. if Win32headers and (s[1]='L') then
  2452. delete(s,1,1);
  2453. yyval:=new(presobject,init_id(''''+copy(s,2,length(s)-2)+''''));
  2454. end;
  2455. 142 : begin
  2456. yyval:=new(presobject,init_id(act_token));
  2457. end;
  2458. 143 : begin
  2459. yyval:=new(presobject,init_bop('.',yyv[yysp-2],yyv[yysp-0]));
  2460. end;
  2461. 144 : begin
  2462. yyval:=new(presobject,init_bop('^.',yyv[yysp-2],yyv[yysp-0]));
  2463. end;
  2464. 145 : begin
  2465. yyval:=new(presobject,init_preop('-',yyv[yysp-0]));
  2466. end;
  2467. 146 : begin
  2468. yyval:=new(presobject,init_preop('@',yyv[yysp-0]));
  2469. end;
  2470. 147 : begin
  2471. yyval:=new(presobject,init_preop(' not ',yyv[yysp-0]));
  2472. end;
  2473. 148 : begin
  2474. if assigned(yyv[yysp-0]) then
  2475. yyval:=new(presobject,init_two(t_typespec,yyv[yysp-2],yyv[yysp-0]))
  2476. else
  2477. yyval:=yyv[yysp-2];
  2478. end;
  2479. 149 : begin
  2480. yyval:=new(presobject,init_two(t_typespec,yyv[yysp-2],yyv[yysp-0]));
  2481. end;
  2482. 150 : begin
  2483. hp:=new(presobject,init_one(t_pointerdef,yyv[yysp-3]));
  2484. yyval:=new(presobject,init_two(t_typespec,hp,yyv[yysp-0]));
  2485. end;
  2486. 151 : begin
  2487. if not stripinfo then
  2488. writeln(outfile,aktspace,'(* ',yyv[yysp-3]^.p,' ignored *)');
  2489. dispose(yyv[yysp-3],done);
  2490. write_type_specifier(outfile,yyv[yysp-4]);
  2491. writeln(outfile,' ignored *)');
  2492. hp:=new(presobject,init_one(t_pointerdef,yyv[yysp-4]));
  2493. yyval:=new(presobject,init_two(t_typespec,hp,yyv[yysp-0]));
  2494. end;
  2495. 152 : begin
  2496. hp:=new(presobject,init_one(t_exprlist,yyv[yysp-3]));
  2497. yyval:=new(presobject,init_three(t_funexprlist,hp,yyv[yysp-1],nil));
  2498. end;
  2499. 153 : begin
  2500. yyval:=yyv[yysp-1];
  2501. end;
  2502. 154 : begin
  2503. yyval:=new(presobject,init_two(t_callop,yyv[yysp-5],yyv[yysp-1]));
  2504. end;
  2505. 155 : begin
  2506. yyval:=new(presobject,init_two(t_arrayop,yyv[yysp-3],yyv[yysp-1]));
  2507. end;
  2508. 156 : begin
  2509. (*enum_element COMMA enum_list *)
  2510. yyval:=yyv[yysp-2];
  2511. yyval^.next:=yyv[yysp-0];
  2512. end;
  2513. 157 : begin
  2514. yyval:=yyv[yysp-0];
  2515. end;
  2516. 158 : begin
  2517. (* empty enum list *)
  2518. yyval:=nil;
  2519. end;
  2520. 159 : begin
  2521. begin (*enum_element: dname _ASSIGN expr *)
  2522. yyval:=new(presobject,init_two(t_enumlist,yyv[yysp-2],yyv[yysp-0]));
  2523. end;
  2524. end;
  2525. 160 : begin
  2526. begin (*enum_element: dname*)
  2527. yyval:=new(presobject,init_two(t_enumlist,yyv[yysp-0],nil));
  2528. end;
  2529. end;
  2530. 161 : begin
  2531. if yyv[yysp-0]^.typ=t_funexprlist then
  2532. yyval:=yyv[yysp-0]
  2533. else
  2534. yyval:=new(presobject,init_two(t_exprlist,yyv[yysp-0],nil));
  2535. (* if here is a type specifier
  2536. we know the return type *)
  2537. if (yyv[yysp-0]^.typ=t_typespec) then
  2538. yyval^.p3:=yyv[yysp-0]^.p1^.get_copy;
  2539. end;
  2540. 162 : begin
  2541. yyval:=yyv[yysp-0];
  2542. end;
  2543. 163 : begin
  2544. yyval:=yyv[yysp-1]
  2545. end;
  2546. 164 : begin
  2547. (*exprlist COMMA expr*)
  2548. yyval:=yyv[yysp-2];
  2549. yyv[yysp-2]^.next:=yyv[yysp-0];
  2550. end;
  2551. 165 : begin
  2552. yyval:=yyv[yysp-0];
  2553. end;
  2554. 166 : begin
  2555. (* empty expression list *)
  2556. yyval:=nil;
  2557. end;
  2558. 167 : begin
  2559. yyval:=new(presobject,init_one(t_exprlist,yyv[yysp-0]));
  2560. end;
  2561. end;
  2562. end(*yyaction*);
  2563. (* parse table: *)
  2564. type YYARec = record
  2565. sym, act : Integer;
  2566. end;
  2567. YYRRec = record
  2568. len, sym : Integer;
  2569. end;
  2570. const
  2571. yynacts = 2724;
  2572. yyngotos = 421;
  2573. yynstates = 307;
  2574. yynrules = 167;
  2575. yya : array [1..yynacts] of YYARec = (
  2576. { 0: }
  2577. ( sym: 256; act: 7 ),
  2578. ( sym: 263; act: 8 ),
  2579. ( sym: 264; act: 9 ),
  2580. ( sym: 274; act: 10 ),
  2581. ( sym: 275; act: 11 ),
  2582. ( sym: 276; act: 12 ),
  2583. ( sym: 293; act: 13 ),
  2584. ( sym: 277; act: -10 ),
  2585. ( sym: 280; act: -10 ),
  2586. ( sym: 281; act: -10 ),
  2587. ( sym: 282; act: -10 ),
  2588. ( sym: 283; act: -10 ),
  2589. ( sym: 284; act: -10 ),
  2590. ( sym: 285; act: -10 ),
  2591. ( sym: 286; act: -10 ),
  2592. ( sym: 287; act: -10 ),
  2593. ( sym: 327; act: -10 ),
  2594. { 1: }
  2595. ( sym: 266; act: 14 ),
  2596. { 2: }
  2597. ( sym: 274; act: 20 ),
  2598. ( sym: 275; act: 21 ),
  2599. ( sym: 276; act: 22 ),
  2600. ( sym: 277; act: 23 ),
  2601. ( sym: 280; act: 24 ),
  2602. ( sym: 281; act: 25 ),
  2603. ( sym: 282; act: 26 ),
  2604. ( sym: 283; act: 27 ),
  2605. ( sym: 284; act: 28 ),
  2606. ( sym: 285; act: 29 ),
  2607. ( sym: 286; act: 30 ),
  2608. ( sym: 287; act: 31 ),
  2609. ( sym: 327; act: 32 ),
  2610. { 3: }
  2611. { 4: }
  2612. { 5: }
  2613. ( sym: 256; act: 7 ),
  2614. ( sym: 263; act: 8 ),
  2615. ( sym: 264; act: 9 ),
  2616. ( sym: 274; act: 10 ),
  2617. ( sym: 275; act: 11 ),
  2618. ( sym: 276; act: 12 ),
  2619. ( sym: 293; act: 13 ),
  2620. ( sym: 0; act: -1 ),
  2621. ( sym: 277; act: -10 ),
  2622. ( sym: 280; act: -10 ),
  2623. ( sym: 281; act: -10 ),
  2624. ( sym: 282; act: -10 ),
  2625. ( sym: 283; act: -10 ),
  2626. ( sym: 284; act: -10 ),
  2627. ( sym: 285; act: -10 ),
  2628. ( sym: 286; act: -10 ),
  2629. ( sym: 287; act: -10 ),
  2630. ( sym: 327; act: -10 ),
  2631. { 6: }
  2632. ( sym: 0; act: 0 ),
  2633. { 7: }
  2634. { 8: }
  2635. ( sym: 274; act: 38 ),
  2636. ( sym: 275; act: 21 ),
  2637. ( sym: 276; act: 22 ),
  2638. ( sym: 277; act: 23 ),
  2639. ( sym: 280; act: 24 ),
  2640. ( sym: 281; act: 25 ),
  2641. ( sym: 282; act: 26 ),
  2642. ( sym: 283; act: 27 ),
  2643. ( sym: 284; act: 28 ),
  2644. ( sym: 285; act: 29 ),
  2645. ( sym: 286; act: 30 ),
  2646. ( sym: 287; act: 31 ),
  2647. ( sym: 327; act: 32 ),
  2648. { 9: }
  2649. ( sym: 277; act: 23 ),
  2650. { 10: }
  2651. ( sym: 277; act: 23 ),
  2652. { 11: }
  2653. ( sym: 277; act: 23 ),
  2654. { 12: }
  2655. ( sym: 277; act: 23 ),
  2656. { 13: }
  2657. { 14: }
  2658. { 15: }
  2659. { 16: }
  2660. { 17: }
  2661. { 18: }
  2662. ( sym: 294; act: 44 ),
  2663. ( sym: 295; act: 45 ),
  2664. ( sym: 296; act: 46 ),
  2665. ( sym: 297; act: 47 ),
  2666. ( sym: 298; act: 48 ),
  2667. ( sym: 299; act: 49 ),
  2668. ( sym: 300; act: 50 ),
  2669. ( sym: 256; act: -18 ),
  2670. ( sym: 268; act: -18 ),
  2671. ( sym: 277; act: -18 ),
  2672. ( sym: 287; act: -18 ),
  2673. ( sym: 288; act: -18 ),
  2674. ( sym: 289; act: -18 ),
  2675. ( sym: 290; act: -18 ),
  2676. ( sym: 314; act: -18 ),
  2677. ( sym: 319; act: -18 ),
  2678. { 19: }
  2679. { 20: }
  2680. ( sym: 256; act: 52 ),
  2681. ( sym: 272; act: 53 ),
  2682. ( sym: 277; act: 23 ),
  2683. { 21: }
  2684. ( sym: 256; act: 52 ),
  2685. ( sym: 272; act: 53 ),
  2686. ( sym: 277; act: 23 ),
  2687. { 22: }
  2688. ( sym: 256; act: 56 ),
  2689. ( sym: 272; act: 57 ),
  2690. ( sym: 277; act: 23 ),
  2691. { 23: }
  2692. { 24: }
  2693. ( sym: 283; act: 58 ),
  2694. ( sym: 256; act: -72 ),
  2695. ( sym: 265; act: -72 ),
  2696. ( sym: 266; act: -72 ),
  2697. ( sym: 267; act: -72 ),
  2698. ( sym: 268; act: -72 ),
  2699. ( sym: 269; act: -72 ),
  2700. ( sym: 270; act: -72 ),
  2701. ( sym: 271; act: -72 ),
  2702. ( sym: 272; act: -72 ),
  2703. ( sym: 273; act: -72 ),
  2704. ( sym: 277; act: -72 ),
  2705. ( sym: 287; act: -72 ),
  2706. ( sym: 288; act: -72 ),
  2707. ( sym: 289; act: -72 ),
  2708. ( sym: 290; act: -72 ),
  2709. ( sym: 291; act: -72 ),
  2710. ( sym: 294; act: -72 ),
  2711. ( sym: 295; act: -72 ),
  2712. ( sym: 296; act: -72 ),
  2713. ( sym: 297; act: -72 ),
  2714. ( sym: 298; act: -72 ),
  2715. ( sym: 299; act: -72 ),
  2716. ( sym: 300; act: -72 ),
  2717. ( sym: 301; act: -72 ),
  2718. ( sym: 304; act: -72 ),
  2719. ( sym: 306; act: -72 ),
  2720. ( sym: 307; act: -72 ),
  2721. ( sym: 308; act: -72 ),
  2722. ( sym: 309; act: -72 ),
  2723. ( sym: 310; act: -72 ),
  2724. ( sym: 311; act: -72 ),
  2725. ( sym: 312; act: -72 ),
  2726. ( sym: 313; act: -72 ),
  2727. ( sym: 314; act: -72 ),
  2728. ( sym: 315; act: -72 ),
  2729. ( sym: 316; act: -72 ),
  2730. ( sym: 317; act: -72 ),
  2731. ( sym: 318; act: -72 ),
  2732. ( sym: 319; act: -72 ),
  2733. ( sym: 320; act: -72 ),
  2734. ( sym: 321; act: -72 ),
  2735. ( sym: 324; act: -72 ),
  2736. ( sym: 325; act: -72 ),
  2737. { 25: }
  2738. ( sym: 280; act: 24 ),
  2739. ( sym: 281; act: 25 ),
  2740. ( sym: 282; act: 26 ),
  2741. ( sym: 283; act: 27 ),
  2742. ( sym: 284; act: 28 ),
  2743. ( sym: 285; act: 29 ),
  2744. ( sym: 286; act: 30 ),
  2745. ( sym: 327; act: 32 ),
  2746. ( sym: 256; act: -77 ),
  2747. ( sym: 265; act: -77 ),
  2748. ( sym: 266; act: -77 ),
  2749. ( sym: 267; act: -77 ),
  2750. ( sym: 268; act: -77 ),
  2751. ( sym: 269; act: -77 ),
  2752. ( sym: 270; act: -77 ),
  2753. ( sym: 271; act: -77 ),
  2754. ( sym: 272; act: -77 ),
  2755. ( sym: 273; act: -77 ),
  2756. ( sym: 277; act: -77 ),
  2757. ( sym: 287; act: -77 ),
  2758. ( sym: 288; act: -77 ),
  2759. ( sym: 289; act: -77 ),
  2760. ( sym: 290; act: -77 ),
  2761. ( sym: 291; act: -77 ),
  2762. ( sym: 294; act: -77 ),
  2763. ( sym: 295; act: -77 ),
  2764. ( sym: 296; act: -77 ),
  2765. ( sym: 297; act: -77 ),
  2766. ( sym: 298; act: -77 ),
  2767. ( sym: 299; act: -77 ),
  2768. ( sym: 300; act: -77 ),
  2769. ( sym: 301; act: -77 ),
  2770. ( sym: 304; act: -77 ),
  2771. ( sym: 306; act: -77 ),
  2772. ( sym: 307; act: -77 ),
  2773. ( sym: 308; act: -77 ),
  2774. ( sym: 309; act: -77 ),
  2775. ( sym: 310; act: -77 ),
  2776. ( sym: 311; act: -77 ),
  2777. ( sym: 312; act: -77 ),
  2778. ( sym: 313; act: -77 ),
  2779. ( sym: 314; act: -77 ),
  2780. ( sym: 315; act: -77 ),
  2781. ( sym: 316; act: -77 ),
  2782. ( sym: 317; act: -77 ),
  2783. ( sym: 318; act: -77 ),
  2784. ( sym: 319; act: -77 ),
  2785. ( sym: 320; act: -77 ),
  2786. ( sym: 321; act: -77 ),
  2787. ( sym: 324; act: -77 ),
  2788. ( sym: 325; act: -77 ),
  2789. { 26: }
  2790. ( sym: 282; act: 60 ),
  2791. ( sym: 283; act: 61 ),
  2792. ( sym: 256; act: -68 ),
  2793. ( sym: 265; act: -68 ),
  2794. ( sym: 266; act: -68 ),
  2795. ( sym: 267; act: -68 ),
  2796. ( sym: 268; act: -68 ),
  2797. ( sym: 269; act: -68 ),
  2798. ( sym: 270; act: -68 ),
  2799. ( sym: 271; act: -68 ),
  2800. ( sym: 272; act: -68 ),
  2801. ( sym: 273; act: -68 ),
  2802. ( sym: 277; act: -68 ),
  2803. ( sym: 287; act: -68 ),
  2804. ( sym: 288; act: -68 ),
  2805. ( sym: 289; act: -68 ),
  2806. ( sym: 290; act: -68 ),
  2807. ( sym: 291; act: -68 ),
  2808. ( sym: 294; act: -68 ),
  2809. ( sym: 295; act: -68 ),
  2810. ( sym: 296; act: -68 ),
  2811. ( sym: 297; act: -68 ),
  2812. ( sym: 298; act: -68 ),
  2813. ( sym: 299; act: -68 ),
  2814. ( sym: 300; act: -68 ),
  2815. ( sym: 301; act: -68 ),
  2816. ( sym: 304; act: -68 ),
  2817. ( sym: 306; act: -68 ),
  2818. ( sym: 307; act: -68 ),
  2819. ( sym: 308; act: -68 ),
  2820. ( sym: 309; act: -68 ),
  2821. ( sym: 310; act: -68 ),
  2822. ( sym: 311; act: -68 ),
  2823. ( sym: 312; act: -68 ),
  2824. ( sym: 313; act: -68 ),
  2825. ( sym: 314; act: -68 ),
  2826. ( sym: 315; act: -68 ),
  2827. ( sym: 316; act: -68 ),
  2828. ( sym: 317; act: -68 ),
  2829. ( sym: 318; act: -68 ),
  2830. ( sym: 319; act: -68 ),
  2831. ( sym: 320; act: -68 ),
  2832. ( sym: 321; act: -68 ),
  2833. ( sym: 324; act: -68 ),
  2834. ( sym: 325; act: -68 ),
  2835. { 27: }
  2836. { 28: }
  2837. { 29: }
  2838. { 30: }
  2839. { 31: }
  2840. ( sym: 274; act: 20 ),
  2841. ( sym: 275; act: 21 ),
  2842. ( sym: 276; act: 22 ),
  2843. ( sym: 277; act: 23 ),
  2844. ( sym: 280; act: 24 ),
  2845. ( sym: 281; act: 25 ),
  2846. ( sym: 282; act: 26 ),
  2847. ( sym: 283; act: 27 ),
  2848. ( sym: 284; act: 28 ),
  2849. ( sym: 285; act: 29 ),
  2850. ( sym: 286; act: 30 ),
  2851. ( sym: 287; act: 31 ),
  2852. ( sym: 327; act: 32 ),
  2853. { 32: }
  2854. ( sym: 280; act: 24 ),
  2855. ( sym: 281; act: 25 ),
  2856. ( sym: 282; act: 26 ),
  2857. ( sym: 283; act: 27 ),
  2858. ( sym: 284; act: 28 ),
  2859. ( sym: 285; act: 29 ),
  2860. ( sym: 286; act: 30 ),
  2861. ( sym: 327; act: 32 ),
  2862. { 33: }
  2863. { 34: }
  2864. { 35: }
  2865. ( sym: 266; act: 64 ),
  2866. ( sym: 291; act: 65 ),
  2867. { 36: }
  2868. ( sym: 268; act: 67 ),
  2869. ( sym: 294; act: 44 ),
  2870. ( sym: 295; act: 45 ),
  2871. ( sym: 296; act: 46 ),
  2872. ( sym: 297; act: 47 ),
  2873. ( sym: 298; act: 48 ),
  2874. ( sym: 299; act: 49 ),
  2875. ( sym: 300; act: 50 ),
  2876. ( sym: 256; act: -18 ),
  2877. ( sym: 277; act: -18 ),
  2878. ( sym: 287; act: -18 ),
  2879. ( sym: 288; act: -18 ),
  2880. ( sym: 289; act: -18 ),
  2881. ( sym: 290; act: -18 ),
  2882. ( sym: 314; act: -18 ),
  2883. ( sym: 319; act: -18 ),
  2884. { 37: }
  2885. ( sym: 266; act: 68 ),
  2886. ( sym: 256; act: -79 ),
  2887. ( sym: 268; act: -79 ),
  2888. ( sym: 277; act: -79 ),
  2889. ( sym: 287; act: -79 ),
  2890. ( sym: 288; act: -79 ),
  2891. ( sym: 289; act: -79 ),
  2892. ( sym: 290; act: -79 ),
  2893. ( sym: 294; act: -79 ),
  2894. ( sym: 295; act: -79 ),
  2895. ( sym: 296; act: -79 ),
  2896. ( sym: 297; act: -79 ),
  2897. ( sym: 298; act: -79 ),
  2898. ( sym: 299; act: -79 ),
  2899. ( sym: 300; act: -79 ),
  2900. ( sym: 314; act: -79 ),
  2901. ( sym: 319; act: -79 ),
  2902. { 38: }
  2903. ( sym: 256; act: 52 ),
  2904. ( sym: 272; act: 53 ),
  2905. ( sym: 277; act: 23 ),
  2906. { 39: }
  2907. ( sym: 268; act: 70 ),
  2908. ( sym: 291; act: 71 ),
  2909. ( sym: 292; act: 72 ),
  2910. { 40: }
  2911. ( sym: 256; act: 52 ),
  2912. ( sym: 272; act: 53 ),
  2913. ( sym: 266; act: -50 ),
  2914. ( sym: 267; act: -50 ),
  2915. ( sym: 268; act: -50 ),
  2916. ( sym: 269; act: -50 ),
  2917. ( sym: 270; act: -50 ),
  2918. ( sym: 277; act: -50 ),
  2919. ( sym: 287; act: -50 ),
  2920. ( sym: 288; act: -50 ),
  2921. ( sym: 289; act: -50 ),
  2922. ( sym: 290; act: -50 ),
  2923. ( sym: 294; act: -50 ),
  2924. ( sym: 295; act: -50 ),
  2925. ( sym: 296; act: -50 ),
  2926. ( sym: 297; act: -50 ),
  2927. ( sym: 298; act: -50 ),
  2928. ( sym: 299; act: -50 ),
  2929. ( sym: 300; act: -50 ),
  2930. ( sym: 314; act: -50 ),
  2931. ( sym: 319; act: -50 ),
  2932. { 41: }
  2933. ( sym: 256; act: 52 ),
  2934. ( sym: 272; act: 53 ),
  2935. ( sym: 266; act: -49 ),
  2936. ( sym: 267; act: -49 ),
  2937. ( sym: 268; act: -49 ),
  2938. ( sym: 269; act: -49 ),
  2939. ( sym: 270; act: -49 ),
  2940. ( sym: 277; act: -49 ),
  2941. ( sym: 287; act: -49 ),
  2942. ( sym: 288; act: -49 ),
  2943. ( sym: 289; act: -49 ),
  2944. ( sym: 290; act: -49 ),
  2945. ( sym: 294; act: -49 ),
  2946. ( sym: 295; act: -49 ),
  2947. ( sym: 296; act: -49 ),
  2948. ( sym: 297; act: -49 ),
  2949. ( sym: 298; act: -49 ),
  2950. ( sym: 299; act: -49 ),
  2951. ( sym: 300; act: -49 ),
  2952. ( sym: 314; act: -49 ),
  2953. ( sym: 319; act: -49 ),
  2954. { 42: }
  2955. ( sym: 256; act: 56 ),
  2956. ( sym: 272; act: 57 ),
  2957. ( sym: 266; act: -52 ),
  2958. ( sym: 267; act: -52 ),
  2959. ( sym: 268; act: -52 ),
  2960. ( sym: 269; act: -52 ),
  2961. ( sym: 270; act: -52 ),
  2962. ( sym: 277; act: -52 ),
  2963. ( sym: 287; act: -52 ),
  2964. ( sym: 288; act: -52 ),
  2965. ( sym: 289; act: -52 ),
  2966. ( sym: 290; act: -52 ),
  2967. ( sym: 294; act: -52 ),
  2968. ( sym: 295; act: -52 ),
  2969. ( sym: 296; act: -52 ),
  2970. ( sym: 297; act: -52 ),
  2971. ( sym: 298; act: -52 ),
  2972. ( sym: 299; act: -52 ),
  2973. ( sym: 300; act: -52 ),
  2974. ( sym: 314; act: -52 ),
  2975. ( sym: 319; act: -52 ),
  2976. { 43: }
  2977. ( sym: 256; act: 80 ),
  2978. ( sym: 268; act: 81 ),
  2979. ( sym: 277; act: 23 ),
  2980. ( sym: 287; act: 82 ),
  2981. ( sym: 288; act: 83 ),
  2982. ( sym: 289; act: 84 ),
  2983. ( sym: 290; act: 85 ),
  2984. ( sym: 314; act: 86 ),
  2985. ( sym: 319; act: 87 ),
  2986. { 44: }
  2987. { 45: }
  2988. { 46: }
  2989. { 47: }
  2990. { 48: }
  2991. { 49: }
  2992. { 50: }
  2993. { 51: }
  2994. ( sym: 302; act: 88 ),
  2995. ( sym: 256; act: -57 ),
  2996. ( sym: 267; act: -57 ),
  2997. ( sym: 268; act: -57 ),
  2998. ( sym: 269; act: -57 ),
  2999. ( sym: 270; act: -57 ),
  3000. ( sym: 277; act: -57 ),
  3001. ( sym: 287; act: -57 ),
  3002. ( sym: 288; act: -57 ),
  3003. ( sym: 289; act: -57 ),
  3004. ( sym: 290; act: -57 ),
  3005. ( sym: 294; act: -57 ),
  3006. ( sym: 295; act: -57 ),
  3007. ( sym: 296; act: -57 ),
  3008. ( sym: 297; act: -57 ),
  3009. ( sym: 298; act: -57 ),
  3010. ( sym: 299; act: -57 ),
  3011. ( sym: 300; act: -57 ),
  3012. ( sym: 314; act: -57 ),
  3013. ( sym: 319; act: -57 ),
  3014. { 52: }
  3015. { 53: }
  3016. ( sym: 274; act: 20 ),
  3017. ( sym: 275; act: 21 ),
  3018. ( sym: 276; act: 22 ),
  3019. ( sym: 277; act: 23 ),
  3020. ( sym: 280; act: 24 ),
  3021. ( sym: 281; act: 25 ),
  3022. ( sym: 282; act: 26 ),
  3023. ( sym: 283; act: 27 ),
  3024. ( sym: 284; act: 28 ),
  3025. ( sym: 285; act: 29 ),
  3026. ( sym: 286; act: 30 ),
  3027. ( sym: 287; act: 31 ),
  3028. ( sym: 327; act: 32 ),
  3029. { 54: }
  3030. ( sym: 302; act: 93 ),
  3031. ( sym: 256; act: -55 ),
  3032. ( sym: 267; act: -55 ),
  3033. ( sym: 268; act: -55 ),
  3034. ( sym: 269; act: -55 ),
  3035. ( sym: 270; act: -55 ),
  3036. ( sym: 277; act: -55 ),
  3037. ( sym: 287; act: -55 ),
  3038. ( sym: 288; act: -55 ),
  3039. ( sym: 289; act: -55 ),
  3040. ( sym: 290; act: -55 ),
  3041. ( sym: 294; act: -55 ),
  3042. ( sym: 295; act: -55 ),
  3043. ( sym: 296; act: -55 ),
  3044. ( sym: 297; act: -55 ),
  3045. ( sym: 298; act: -55 ),
  3046. ( sym: 299; act: -55 ),
  3047. ( sym: 300; act: -55 ),
  3048. ( sym: 314; act: -55 ),
  3049. ( sym: 319; act: -55 ),
  3050. { 55: }
  3051. { 56: }
  3052. { 57: }
  3053. ( sym: 277; act: 23 ),
  3054. ( sym: 273; act: -158 ),
  3055. { 58: }
  3056. { 59: }
  3057. { 60: }
  3058. ( sym: 283; act: 98 ),
  3059. ( sym: 256; act: -70 ),
  3060. ( sym: 265; act: -70 ),
  3061. ( sym: 266; act: -70 ),
  3062. ( sym: 267; act: -70 ),
  3063. ( sym: 268; act: -70 ),
  3064. ( sym: 269; act: -70 ),
  3065. ( sym: 270; act: -70 ),
  3066. ( sym: 271; act: -70 ),
  3067. ( sym: 272; act: -70 ),
  3068. ( sym: 273; act: -70 ),
  3069. ( sym: 277; act: -70 ),
  3070. ( sym: 287; act: -70 ),
  3071. ( sym: 288; act: -70 ),
  3072. ( sym: 289; act: -70 ),
  3073. ( sym: 290; act: -70 ),
  3074. ( sym: 291; act: -70 ),
  3075. ( sym: 294; act: -70 ),
  3076. ( sym: 295; act: -70 ),
  3077. ( sym: 296; act: -70 ),
  3078. ( sym: 297; act: -70 ),
  3079. ( sym: 298; act: -70 ),
  3080. ( sym: 299; act: -70 ),
  3081. ( sym: 300; act: -70 ),
  3082. ( sym: 301; act: -70 ),
  3083. ( sym: 304; act: -70 ),
  3084. ( sym: 306; act: -70 ),
  3085. ( sym: 307; act: -70 ),
  3086. ( sym: 308; act: -70 ),
  3087. ( sym: 309; act: -70 ),
  3088. ( sym: 310; act: -70 ),
  3089. ( sym: 311; act: -70 ),
  3090. ( sym: 312; act: -70 ),
  3091. ( sym: 313; act: -70 ),
  3092. ( sym: 314; act: -70 ),
  3093. ( sym: 315; act: -70 ),
  3094. ( sym: 316; act: -70 ),
  3095. ( sym: 317; act: -70 ),
  3096. ( sym: 318; act: -70 ),
  3097. ( sym: 319; act: -70 ),
  3098. ( sym: 320; act: -70 ),
  3099. ( sym: 321; act: -70 ),
  3100. ( sym: 324; act: -70 ),
  3101. ( sym: 325; act: -70 ),
  3102. { 61: }
  3103. { 62: }
  3104. { 63: }
  3105. { 64: }
  3106. { 65: }
  3107. { 66: }
  3108. ( sym: 256; act: 80 ),
  3109. ( sym: 268; act: 81 ),
  3110. ( sym: 277; act: 23 ),
  3111. ( sym: 287; act: 82 ),
  3112. ( sym: 288; act: 83 ),
  3113. ( sym: 289; act: 84 ),
  3114. ( sym: 290; act: 85 ),
  3115. ( sym: 314; act: 86 ),
  3116. ( sym: 319; act: 87 ),
  3117. { 67: }
  3118. ( sym: 294; act: 44 ),
  3119. ( sym: 295; act: 45 ),
  3120. ( sym: 296; act: 46 ),
  3121. ( sym: 297; act: 47 ),
  3122. ( sym: 298; act: 48 ),
  3123. ( sym: 299; act: 49 ),
  3124. ( sym: 300; act: 50 ),
  3125. ( sym: 268; act: -18 ),
  3126. ( sym: 277; act: -18 ),
  3127. ( sym: 287; act: -18 ),
  3128. ( sym: 288; act: -18 ),
  3129. ( sym: 289; act: -18 ),
  3130. ( sym: 290; act: -18 ),
  3131. ( sym: 314; act: -18 ),
  3132. ( sym: 319; act: -18 ),
  3133. { 68: }
  3134. { 69: }
  3135. ( sym: 256; act: 52 ),
  3136. ( sym: 272; act: 53 ),
  3137. ( sym: 277; act: 23 ),
  3138. ( sym: 268; act: -50 ),
  3139. ( sym: 287; act: -50 ),
  3140. ( sym: 288; act: -50 ),
  3141. ( sym: 289; act: -50 ),
  3142. ( sym: 290; act: -50 ),
  3143. ( sym: 294; act: -50 ),
  3144. ( sym: 295; act: -50 ),
  3145. ( sym: 296; act: -50 ),
  3146. ( sym: 297; act: -50 ),
  3147. ( sym: 298; act: -50 ),
  3148. ( sym: 299; act: -50 ),
  3149. ( sym: 300; act: -50 ),
  3150. ( sym: 314; act: -50 ),
  3151. ( sym: 319; act: -50 ),
  3152. { 70: }
  3153. ( sym: 277; act: 23 ),
  3154. ( sym: 269; act: -158 ),
  3155. { 71: }
  3156. { 72: }
  3157. ( sym: 268; act: 107 ),
  3158. ( sym: 277; act: 23 ),
  3159. ( sym: 278; act: 108 ),
  3160. ( sym: 279; act: 109 ),
  3161. ( sym: 280; act: 24 ),
  3162. ( sym: 281; act: 25 ),
  3163. ( sym: 282; act: 26 ),
  3164. ( sym: 283; act: 27 ),
  3165. ( sym: 284; act: 28 ),
  3166. ( sym: 285; act: 29 ),
  3167. ( sym: 286; act: 30 ),
  3168. ( sym: 291; act: 110 ),
  3169. ( sym: 314; act: 111 ),
  3170. ( sym: 316; act: 112 ),
  3171. ( sym: 321; act: 113 ),
  3172. ( sym: 327; act: 32 ),
  3173. { 73: }
  3174. ( sym: 302; act: 114 ),
  3175. ( sym: 256; act: -46 ),
  3176. ( sym: 266; act: -46 ),
  3177. ( sym: 267; act: -46 ),
  3178. ( sym: 268; act: -46 ),
  3179. ( sym: 269; act: -46 ),
  3180. ( sym: 270; act: -46 ),
  3181. ( sym: 277; act: -46 ),
  3182. ( sym: 287; act: -46 ),
  3183. ( sym: 288; act: -46 ),
  3184. ( sym: 289; act: -46 ),
  3185. ( sym: 290; act: -46 ),
  3186. ( sym: 294; act: -46 ),
  3187. ( sym: 295; act: -46 ),
  3188. ( sym: 296; act: -46 ),
  3189. ( sym: 297; act: -46 ),
  3190. ( sym: 298; act: -46 ),
  3191. ( sym: 299; act: -46 ),
  3192. ( sym: 300; act: -46 ),
  3193. ( sym: 314; act: -46 ),
  3194. ( sym: 319; act: -46 ),
  3195. { 74: }
  3196. ( sym: 302; act: 115 ),
  3197. ( sym: 256; act: -48 ),
  3198. ( sym: 266; act: -48 ),
  3199. ( sym: 267; act: -48 ),
  3200. ( sym: 268; act: -48 ),
  3201. ( sym: 269; act: -48 ),
  3202. ( sym: 270; act: -48 ),
  3203. ( sym: 277; act: -48 ),
  3204. ( sym: 287; act: -48 ),
  3205. ( sym: 288; act: -48 ),
  3206. ( sym: 289; act: -48 ),
  3207. ( sym: 290; act: -48 ),
  3208. ( sym: 294; act: -48 ),
  3209. ( sym: 295; act: -48 ),
  3210. ( sym: 296; act: -48 ),
  3211. ( sym: 297; act: -48 ),
  3212. ( sym: 298; act: -48 ),
  3213. ( sym: 299; act: -48 ),
  3214. ( sym: 300; act: -48 ),
  3215. ( sym: 314; act: -48 ),
  3216. ( sym: 319; act: -48 ),
  3217. { 75: }
  3218. { 76: }
  3219. ( sym: 319; act: 116 ),
  3220. { 77: }
  3221. ( sym: 268; act: 118 ),
  3222. ( sym: 270; act: 119 ),
  3223. ( sym: 266; act: -83 ),
  3224. ( sym: 267; act: -83 ),
  3225. ( sym: 272; act: -83 ),
  3226. ( sym: 301; act: -83 ),
  3227. { 78: }
  3228. ( sym: 267; act: 122 ),
  3229. ( sym: 272; act: 123 ),
  3230. ( sym: 301; act: 124 ),
  3231. ( sym: 266; act: -20 ),
  3232. { 79: }
  3233. ( sym: 265; act: 126 ),
  3234. ( sym: 266; act: -100 ),
  3235. ( sym: 267; act: -100 ),
  3236. ( sym: 268; act: -100 ),
  3237. ( sym: 269; act: -100 ),
  3238. ( sym: 270; act: -100 ),
  3239. ( sym: 272; act: -100 ),
  3240. ( sym: 301; act: -100 ),
  3241. { 80: }
  3242. { 81: }
  3243. ( sym: 268; act: 81 ),
  3244. ( sym: 277; act: 23 ),
  3245. ( sym: 287; act: 82 ),
  3246. ( sym: 288; act: 83 ),
  3247. ( sym: 289; act: 84 ),
  3248. ( sym: 290; act: 85 ),
  3249. ( sym: 314; act: 86 ),
  3250. ( sym: 319; act: 87 ),
  3251. { 82: }
  3252. ( sym: 268; act: 81 ),
  3253. ( sym: 277; act: 23 ),
  3254. ( sym: 287; act: 82 ),
  3255. ( sym: 288; act: 83 ),
  3256. ( sym: 289; act: 84 ),
  3257. ( sym: 290; act: 85 ),
  3258. ( sym: 314; act: 86 ),
  3259. ( sym: 319; act: 87 ),
  3260. { 83: }
  3261. { 84: }
  3262. { 85: }
  3263. { 86: }
  3264. ( sym: 268; act: 81 ),
  3265. ( sym: 277; act: 23 ),
  3266. ( sym: 287; act: 82 ),
  3267. ( sym: 288; act: 83 ),
  3268. ( sym: 289; act: 84 ),
  3269. ( sym: 290; act: 85 ),
  3270. ( sym: 314; act: 86 ),
  3271. ( sym: 319; act: 87 ),
  3272. { 87: }
  3273. ( sym: 268; act: 81 ),
  3274. ( sym: 277; act: 23 ),
  3275. ( sym: 287; act: 82 ),
  3276. ( sym: 288; act: 83 ),
  3277. ( sym: 289; act: 84 ),
  3278. ( sym: 290; act: 85 ),
  3279. ( sym: 314; act: 86 ),
  3280. ( sym: 319; act: 87 ),
  3281. { 88: }
  3282. { 89: }
  3283. ( sym: 273; act: 132 ),
  3284. { 90: }
  3285. ( sym: 274; act: 20 ),
  3286. ( sym: 275; act: 21 ),
  3287. ( sym: 276; act: 22 ),
  3288. ( sym: 277; act: 23 ),
  3289. ( sym: 280; act: 24 ),
  3290. ( sym: 281; act: 25 ),
  3291. ( sym: 282; act: 26 ),
  3292. ( sym: 283; act: 27 ),
  3293. ( sym: 284; act: 28 ),
  3294. ( sym: 285; act: 29 ),
  3295. ( sym: 286; act: 30 ),
  3296. ( sym: 287; act: 31 ),
  3297. ( sym: 327; act: 32 ),
  3298. ( sym: 273; act: -62 ),
  3299. { 91: }
  3300. ( sym: 273; act: 134 ),
  3301. { 92: }
  3302. ( sym: 256; act: 80 ),
  3303. ( sym: 268; act: 81 ),
  3304. ( sym: 277; act: 23 ),
  3305. ( sym: 287; act: 82 ),
  3306. ( sym: 288; act: 83 ),
  3307. ( sym: 289; act: 84 ),
  3308. ( sym: 290; act: 85 ),
  3309. ( sym: 314; act: 86 ),
  3310. ( sym: 319; act: 87 ),
  3311. { 93: }
  3312. { 94: }
  3313. ( sym: 273; act: 136 ),
  3314. { 95: }
  3315. ( sym: 267; act: 137 ),
  3316. ( sym: 269; act: -157 ),
  3317. ( sym: 273; act: -157 ),
  3318. { 96: }
  3319. ( sym: 273; act: 138 ),
  3320. { 97: }
  3321. ( sym: 304; act: 139 ),
  3322. ( sym: 267; act: -160 ),
  3323. ( sym: 269; act: -160 ),
  3324. ( sym: 273; act: -160 ),
  3325. { 98: }
  3326. { 99: }
  3327. ( sym: 266; act: 140 ),
  3328. ( sym: 267; act: 122 ),
  3329. { 100: }
  3330. ( sym: 268; act: 81 ),
  3331. ( sym: 277; act: 23 ),
  3332. ( sym: 287; act: 82 ),
  3333. ( sym: 288; act: 83 ),
  3334. ( sym: 289; act: 84 ),
  3335. ( sym: 290; act: 85 ),
  3336. ( sym: 314; act: 86 ),
  3337. ( sym: 319; act: 87 ),
  3338. { 101: }
  3339. ( sym: 266; act: 142 ),
  3340. { 102: }
  3341. ( sym: 269; act: 143 ),
  3342. { 103: }
  3343. ( sym: 324; act: 144 ),
  3344. ( sym: 325; act: 145 ),
  3345. ( sym: 269; act: -161 ),
  3346. ( sym: 291; act: -161 ),
  3347. { 104: }
  3348. { 105: }
  3349. ( sym: 291; act: 146 ),
  3350. { 106: }
  3351. ( sym: 268; act: 147 ),
  3352. ( sym: 270; act: 148 ),
  3353. ( sym: 265; act: -139 ),
  3354. ( sym: 266; act: -139 ),
  3355. ( sym: 267; act: -139 ),
  3356. ( sym: 269; act: -139 ),
  3357. ( sym: 271; act: -139 ),
  3358. ( sym: 272; act: -139 ),
  3359. ( sym: 273; act: -139 ),
  3360. ( sym: 291; act: -139 ),
  3361. ( sym: 301; act: -139 ),
  3362. ( sym: 304; act: -139 ),
  3363. ( sym: 306; act: -139 ),
  3364. ( sym: 307; act: -139 ),
  3365. ( sym: 308; act: -139 ),
  3366. ( sym: 309; act: -139 ),
  3367. ( sym: 310; act: -139 ),
  3368. ( sym: 311; act: -139 ),
  3369. ( sym: 312; act: -139 ),
  3370. ( sym: 313; act: -139 ),
  3371. ( sym: 314; act: -139 ),
  3372. ( sym: 315; act: -139 ),
  3373. ( sym: 316; act: -139 ),
  3374. ( sym: 317; act: -139 ),
  3375. ( sym: 318; act: -139 ),
  3376. ( sym: 319; act: -139 ),
  3377. ( sym: 320; act: -139 ),
  3378. ( sym: 321; act: -139 ),
  3379. ( sym: 324; act: -139 ),
  3380. ( sym: 325; act: -139 ),
  3381. { 107: }
  3382. ( sym: 268; act: 107 ),
  3383. ( sym: 274; act: 20 ),
  3384. ( sym: 275; act: 21 ),
  3385. ( sym: 276; act: 22 ),
  3386. ( sym: 277; act: 23 ),
  3387. ( sym: 278; act: 108 ),
  3388. ( sym: 279; act: 109 ),
  3389. ( sym: 280; act: 24 ),
  3390. ( sym: 281; act: 25 ),
  3391. ( sym: 282; act: 26 ),
  3392. ( sym: 283; act: 27 ),
  3393. ( sym: 284; act: 28 ),
  3394. ( sym: 285; act: 29 ),
  3395. ( sym: 286; act: 30 ),
  3396. ( sym: 287; act: 31 ),
  3397. ( sym: 314; act: 111 ),
  3398. ( sym: 316; act: 112 ),
  3399. ( sym: 319; act: 155 ),
  3400. ( sym: 321; act: 113 ),
  3401. ( sym: 327; act: 32 ),
  3402. { 108: }
  3403. { 109: }
  3404. { 110: }
  3405. { 111: }
  3406. ( sym: 268; act: 107 ),
  3407. ( sym: 277; act: 23 ),
  3408. ( sym: 278; act: 108 ),
  3409. ( sym: 279; act: 109 ),
  3410. ( sym: 280; act: 24 ),
  3411. ( sym: 281; act: 25 ),
  3412. ( sym: 282; act: 26 ),
  3413. ( sym: 283; act: 27 ),
  3414. ( sym: 284; act: 28 ),
  3415. ( sym: 285; act: 29 ),
  3416. ( sym: 286; act: 30 ),
  3417. ( sym: 314; act: 111 ),
  3418. ( sym: 316; act: 112 ),
  3419. ( sym: 321; act: 113 ),
  3420. ( sym: 327; act: 32 ),
  3421. { 112: }
  3422. ( sym: 268; act: 107 ),
  3423. ( sym: 277; act: 23 ),
  3424. ( sym: 278; act: 108 ),
  3425. ( sym: 279; act: 109 ),
  3426. ( sym: 280; act: 24 ),
  3427. ( sym: 281; act: 25 ),
  3428. ( sym: 282; act: 26 ),
  3429. ( sym: 283; act: 27 ),
  3430. ( sym: 284; act: 28 ),
  3431. ( sym: 285; act: 29 ),
  3432. ( sym: 286; act: 30 ),
  3433. ( sym: 314; act: 111 ),
  3434. ( sym: 316; act: 112 ),
  3435. ( sym: 321; act: 113 ),
  3436. ( sym: 327; act: 32 ),
  3437. { 113: }
  3438. ( sym: 268; act: 107 ),
  3439. ( sym: 277; act: 23 ),
  3440. ( sym: 278; act: 108 ),
  3441. ( sym: 279; act: 109 ),
  3442. ( sym: 280; act: 24 ),
  3443. ( sym: 281; act: 25 ),
  3444. ( sym: 282; act: 26 ),
  3445. ( sym: 283; act: 27 ),
  3446. ( sym: 284; act: 28 ),
  3447. ( sym: 285; act: 29 ),
  3448. ( sym: 286; act: 30 ),
  3449. ( sym: 314; act: 111 ),
  3450. ( sym: 316; act: 112 ),
  3451. ( sym: 321; act: 113 ),
  3452. ( sym: 327; act: 32 ),
  3453. { 114: }
  3454. { 115: }
  3455. { 116: }
  3456. ( sym: 268; act: 81 ),
  3457. ( sym: 277; act: 23 ),
  3458. ( sym: 287; act: 82 ),
  3459. ( sym: 288; act: 83 ),
  3460. ( sym: 289; act: 84 ),
  3461. ( sym: 290; act: 85 ),
  3462. ( sym: 314; act: 86 ),
  3463. ( sym: 319; act: 87 ),
  3464. { 117: }
  3465. { 118: }
  3466. ( sym: 269; act: 163 ),
  3467. ( sym: 274; act: 20 ),
  3468. ( sym: 275; act: 21 ),
  3469. ( sym: 276; act: 22 ),
  3470. ( sym: 277; act: 23 ),
  3471. ( sym: 280; act: 24 ),
  3472. ( sym: 281; act: 25 ),
  3473. ( sym: 282; act: 26 ),
  3474. ( sym: 283; act: 27 ),
  3475. ( sym: 284; act: 28 ),
  3476. ( sym: 285; act: 29 ),
  3477. ( sym: 286; act: 164 ),
  3478. ( sym: 287; act: 31 ),
  3479. ( sym: 303; act: 165 ),
  3480. ( sym: 327; act: 32 ),
  3481. { 119: }
  3482. ( sym: 268; act: 107 ),
  3483. ( sym: 271; act: 168 ),
  3484. ( sym: 277; act: 23 ),
  3485. ( sym: 278; act: 108 ),
  3486. ( sym: 279; act: 109 ),
  3487. ( sym: 280; act: 24 ),
  3488. ( sym: 281; act: 25 ),
  3489. ( sym: 282; act: 26 ),
  3490. ( sym: 283; act: 27 ),
  3491. ( sym: 284; act: 28 ),
  3492. ( sym: 285; act: 29 ),
  3493. ( sym: 286; act: 30 ),
  3494. ( sym: 314; act: 111 ),
  3495. ( sym: 316; act: 112 ),
  3496. ( sym: 321; act: 113 ),
  3497. ( sym: 327; act: 32 ),
  3498. { 120: }
  3499. { 121: }
  3500. ( sym: 266; act: 169 ),
  3501. { 122: }
  3502. ( sym: 268; act: 81 ),
  3503. ( sym: 277; act: 23 ),
  3504. ( sym: 287; act: 82 ),
  3505. ( sym: 288; act: 83 ),
  3506. ( sym: 289; act: 84 ),
  3507. ( sym: 290; act: 85 ),
  3508. ( sym: 314; act: 86 ),
  3509. ( sym: 319; act: 87 ),
  3510. { 123: }
  3511. ( sym: 257; act: 174 ),
  3512. ( sym: 266; act: 175 ),
  3513. ( sym: 268; act: 107 ),
  3514. ( sym: 277; act: 23 ),
  3515. ( sym: 278; act: 108 ),
  3516. ( sym: 279; act: 109 ),
  3517. ( sym: 280; act: 24 ),
  3518. ( sym: 281; act: 25 ),
  3519. ( sym: 282; act: 26 ),
  3520. ( sym: 283; act: 27 ),
  3521. ( sym: 284; act: 28 ),
  3522. ( sym: 285; act: 29 ),
  3523. ( sym: 286; act: 30 ),
  3524. ( sym: 314; act: 111 ),
  3525. ( sym: 316; act: 112 ),
  3526. ( sym: 321; act: 113 ),
  3527. ( sym: 327; act: 32 ),
  3528. ( sym: 273; act: -26 ),
  3529. { 124: }
  3530. ( sym: 268; act: 176 ),
  3531. { 125: }
  3532. ( sym: 268; act: 107 ),
  3533. ( sym: 277; act: 23 ),
  3534. ( sym: 278; act: 108 ),
  3535. ( sym: 279; act: 109 ),
  3536. ( sym: 280; act: 24 ),
  3537. ( sym: 281; act: 25 ),
  3538. ( sym: 282; act: 26 ),
  3539. ( sym: 283; act: 27 ),
  3540. ( sym: 284; act: 28 ),
  3541. ( sym: 285; act: 29 ),
  3542. ( sym: 286; act: 30 ),
  3543. ( sym: 314; act: 111 ),
  3544. ( sym: 316; act: 112 ),
  3545. ( sym: 321; act: 113 ),
  3546. ( sym: 327; act: 32 ),
  3547. { 126: }
  3548. ( sym: 268; act: 107 ),
  3549. ( sym: 277; act: 23 ),
  3550. ( sym: 278; act: 108 ),
  3551. ( sym: 279; act: 109 ),
  3552. ( sym: 280; act: 24 ),
  3553. ( sym: 281; act: 25 ),
  3554. ( sym: 282; act: 26 ),
  3555. ( sym: 283; act: 27 ),
  3556. ( sym: 284; act: 28 ),
  3557. ( sym: 285; act: 29 ),
  3558. ( sym: 286; act: 30 ),
  3559. ( sym: 314; act: 111 ),
  3560. ( sym: 316; act: 112 ),
  3561. ( sym: 321; act: 113 ),
  3562. ( sym: 327; act: 32 ),
  3563. { 127: }
  3564. ( sym: 267; act: 179 ),
  3565. ( sym: 266; act: -82 ),
  3566. ( sym: 272; act: -82 ),
  3567. ( sym: 301; act: -82 ),
  3568. { 128: }
  3569. ( sym: 268; act: 118 ),
  3570. ( sym: 269; act: 180 ),
  3571. ( sym: 270; act: 119 ),
  3572. { 129: }
  3573. ( sym: 268; act: 118 ),
  3574. ( sym: 270; act: 119 ),
  3575. ( sym: 266; act: -94 ),
  3576. ( sym: 267; act: -94 ),
  3577. ( sym: 269; act: -94 ),
  3578. ( sym: 272; act: -94 ),
  3579. ( sym: 301; act: -94 ),
  3580. { 130: }
  3581. ( sym: 270; act: 119 ),
  3582. ( sym: 266; act: -97 ),
  3583. ( sym: 267; act: -97 ),
  3584. ( sym: 268; act: -97 ),
  3585. ( sym: 269; act: -97 ),
  3586. ( sym: 272; act: -97 ),
  3587. ( sym: 301; act: -97 ),
  3588. { 131: }
  3589. ( sym: 268; act: 118 ),
  3590. ( sym: 270; act: 119 ),
  3591. ( sym: 266; act: -96 ),
  3592. ( sym: 267; act: -96 ),
  3593. ( sym: 269; act: -96 ),
  3594. ( sym: 272; act: -96 ),
  3595. ( sym: 301; act: -96 ),
  3596. { 132: }
  3597. { 133: }
  3598. { 134: }
  3599. { 135: }
  3600. ( sym: 266; act: 181 ),
  3601. ( sym: 267; act: 122 ),
  3602. { 136: }
  3603. { 137: }
  3604. ( sym: 277; act: 23 ),
  3605. ( sym: 269; act: -158 ),
  3606. ( sym: 273; act: -158 ),
  3607. { 138: }
  3608. { 139: }
  3609. ( sym: 268; act: 107 ),
  3610. ( sym: 277; act: 23 ),
  3611. ( sym: 278; act: 108 ),
  3612. ( sym: 279; act: 109 ),
  3613. ( sym: 280; act: 24 ),
  3614. ( sym: 281; act: 25 ),
  3615. ( sym: 282; act: 26 ),
  3616. ( sym: 283; act: 27 ),
  3617. ( sym: 284; act: 28 ),
  3618. ( sym: 285; act: 29 ),
  3619. ( sym: 286; act: 30 ),
  3620. ( sym: 314; act: 111 ),
  3621. ( sym: 316; act: 112 ),
  3622. ( sym: 321; act: 113 ),
  3623. ( sym: 327; act: 32 ),
  3624. { 140: }
  3625. { 141: }
  3626. ( sym: 268; act: 118 ),
  3627. ( sym: 269; act: 184 ),
  3628. ( sym: 270; act: 119 ),
  3629. { 142: }
  3630. { 143: }
  3631. ( sym: 292; act: 187 ),
  3632. ( sym: 268; act: -3 ),
  3633. { 144: }
  3634. ( sym: 268; act: 107 ),
  3635. ( sym: 277; act: 23 ),
  3636. ( sym: 278; act: 108 ),
  3637. ( sym: 279; act: 109 ),
  3638. ( sym: 280; act: 24 ),
  3639. ( sym: 281; act: 25 ),
  3640. ( sym: 282; act: 26 ),
  3641. ( sym: 283; act: 27 ),
  3642. ( sym: 284; act: 28 ),
  3643. ( sym: 285; act: 29 ),
  3644. ( sym: 286; act: 30 ),
  3645. ( sym: 314; act: 111 ),
  3646. ( sym: 316; act: 112 ),
  3647. ( sym: 321; act: 113 ),
  3648. ( sym: 327; act: 32 ),
  3649. { 145: }
  3650. ( sym: 268; act: 107 ),
  3651. ( sym: 277; act: 23 ),
  3652. ( sym: 278; act: 108 ),
  3653. ( sym: 279; act: 109 ),
  3654. ( sym: 280; act: 24 ),
  3655. ( sym: 281; act: 25 ),
  3656. ( sym: 282; act: 26 ),
  3657. ( sym: 283; act: 27 ),
  3658. ( sym: 284; act: 28 ),
  3659. ( sym: 285; act: 29 ),
  3660. ( sym: 286; act: 30 ),
  3661. ( sym: 314; act: 111 ),
  3662. ( sym: 316; act: 112 ),
  3663. ( sym: 321; act: 113 ),
  3664. ( sym: 327; act: 32 ),
  3665. { 146: }
  3666. { 147: }
  3667. ( sym: 268; act: 107 ),
  3668. ( sym: 277; act: 23 ),
  3669. ( sym: 278; act: 108 ),
  3670. ( sym: 279; act: 109 ),
  3671. ( sym: 280; act: 24 ),
  3672. ( sym: 281; act: 25 ),
  3673. ( sym: 282; act: 26 ),
  3674. ( sym: 283; act: 27 ),
  3675. ( sym: 284; act: 28 ),
  3676. ( sym: 285; act: 29 ),
  3677. ( sym: 286; act: 30 ),
  3678. ( sym: 314; act: 111 ),
  3679. ( sym: 316; act: 112 ),
  3680. ( sym: 321; act: 113 ),
  3681. ( sym: 327; act: 32 ),
  3682. ( sym: 269; act: -166 ),
  3683. { 148: }
  3684. ( sym: 268; act: 107 ),
  3685. ( sym: 277; act: 23 ),
  3686. ( sym: 278; act: 108 ),
  3687. ( sym: 279; act: 109 ),
  3688. ( sym: 280; act: 24 ),
  3689. ( sym: 281; act: 25 ),
  3690. ( sym: 282; act: 26 ),
  3691. ( sym: 283; act: 27 ),
  3692. ( sym: 284; act: 28 ),
  3693. ( sym: 285; act: 29 ),
  3694. ( sym: 286; act: 30 ),
  3695. ( sym: 314; act: 111 ),
  3696. ( sym: 316; act: 112 ),
  3697. ( sym: 321; act: 113 ),
  3698. ( sym: 327; act: 32 ),
  3699. ( sym: 271; act: -166 ),
  3700. { 149: }
  3701. ( sym: 324; act: 144 ),
  3702. ( sym: 325; act: 145 ),
  3703. ( sym: 265; act: -135 ),
  3704. ( sym: 266; act: -135 ),
  3705. ( sym: 267; act: -135 ),
  3706. ( sym: 268; act: -135 ),
  3707. ( sym: 269; act: -135 ),
  3708. ( sym: 270; act: -135 ),
  3709. ( sym: 271; act: -135 ),
  3710. ( sym: 272; act: -135 ),
  3711. ( sym: 273; act: -135 ),
  3712. ( sym: 291; act: -135 ),
  3713. ( sym: 301; act: -135 ),
  3714. ( sym: 304; act: -135 ),
  3715. ( sym: 306; act: -135 ),
  3716. ( sym: 307; act: -135 ),
  3717. ( sym: 308; act: -135 ),
  3718. ( sym: 309; act: -135 ),
  3719. ( sym: 310; act: -135 ),
  3720. ( sym: 311; act: -135 ),
  3721. ( sym: 312; act: -135 ),
  3722. ( sym: 313; act: -135 ),
  3723. ( sym: 314; act: -135 ),
  3724. ( sym: 315; act: -135 ),
  3725. ( sym: 316; act: -135 ),
  3726. ( sym: 317; act: -135 ),
  3727. ( sym: 318; act: -135 ),
  3728. ( sym: 319; act: -135 ),
  3729. ( sym: 320; act: -135 ),
  3730. ( sym: 321; act: -135 ),
  3731. { 150: }
  3732. ( sym: 269; act: 194 ),
  3733. ( sym: 304; act: -117 ),
  3734. ( sym: 306; act: -117 ),
  3735. ( sym: 307; act: -117 ),
  3736. ( sym: 308; act: -117 ),
  3737. ( sym: 309; act: -117 ),
  3738. ( sym: 310; act: -117 ),
  3739. ( sym: 311; act: -117 ),
  3740. ( sym: 312; act: -117 ),
  3741. ( sym: 313; act: -117 ),
  3742. ( sym: 314; act: -117 ),
  3743. ( sym: 315; act: -117 ),
  3744. ( sym: 316; act: -117 ),
  3745. ( sym: 317; act: -117 ),
  3746. ( sym: 318; act: -117 ),
  3747. ( sym: 319; act: -117 ),
  3748. ( sym: 320; act: -117 ),
  3749. ( sym: 321; act: -117 ),
  3750. { 151: }
  3751. ( sym: 269; act: -78 ),
  3752. ( sym: 288; act: -78 ),
  3753. ( sym: 289; act: -78 ),
  3754. ( sym: 290; act: -78 ),
  3755. ( sym: 319; act: -78 ),
  3756. ( sym: 304; act: -140 ),
  3757. ( sym: 306; act: -140 ),
  3758. ( sym: 307; act: -140 ),
  3759. ( sym: 308; act: -140 ),
  3760. ( sym: 309; act: -140 ),
  3761. ( sym: 310; act: -140 ),
  3762. ( sym: 311; act: -140 ),
  3763. ( sym: 312; act: -140 ),
  3764. ( sym: 313; act: -140 ),
  3765. ( sym: 314; act: -140 ),
  3766. ( sym: 315; act: -140 ),
  3767. ( sym: 316; act: -140 ),
  3768. ( sym: 317; act: -140 ),
  3769. ( sym: 318; act: -140 ),
  3770. ( sym: 320; act: -140 ),
  3771. ( sym: 321; act: -140 ),
  3772. ( sym: 324; act: -140 ),
  3773. ( sym: 325; act: -140 ),
  3774. { 152: }
  3775. ( sym: 269; act: 196 ),
  3776. ( sym: 288; act: 83 ),
  3777. ( sym: 289; act: 84 ),
  3778. ( sym: 290; act: 85 ),
  3779. ( sym: 319; act: 197 ),
  3780. { 153: }
  3781. ( sym: 304; act: 198 ),
  3782. ( sym: 306; act: 199 ),
  3783. ( sym: 307; act: 200 ),
  3784. ( sym: 308; act: 201 ),
  3785. ( sym: 309; act: 202 ),
  3786. ( sym: 310; act: 203 ),
  3787. ( sym: 311; act: 204 ),
  3788. ( sym: 312; act: 205 ),
  3789. ( sym: 313; act: 206 ),
  3790. ( sym: 314; act: 207 ),
  3791. ( sym: 315; act: 208 ),
  3792. ( sym: 316; act: 209 ),
  3793. ( sym: 317; act: 210 ),
  3794. ( sym: 318; act: 211 ),
  3795. ( sym: 319; act: 212 ),
  3796. ( sym: 320; act: 213 ),
  3797. ( sym: 321; act: 214 ),
  3798. { 154: }
  3799. ( sym: 268; act: 147 ),
  3800. ( sym: 269; act: 215 ),
  3801. ( sym: 270; act: 148 ),
  3802. ( sym: 288; act: -79 ),
  3803. ( sym: 289; act: -79 ),
  3804. ( sym: 290; act: -79 ),
  3805. ( sym: 319; act: -79 ),
  3806. ( sym: 304; act: -139 ),
  3807. ( sym: 306; act: -139 ),
  3808. ( sym: 307; act: -139 ),
  3809. ( sym: 308; act: -139 ),
  3810. ( sym: 309; act: -139 ),
  3811. ( sym: 310; act: -139 ),
  3812. ( sym: 311; act: -139 ),
  3813. ( sym: 312; act: -139 ),
  3814. ( sym: 313; act: -139 ),
  3815. ( sym: 314; act: -139 ),
  3816. ( sym: 315; act: -139 ),
  3817. ( sym: 316; act: -139 ),
  3818. ( sym: 317; act: -139 ),
  3819. ( sym: 318; act: -139 ),
  3820. ( sym: 320; act: -139 ),
  3821. ( sym: 321; act: -139 ),
  3822. ( sym: 324; act: -139 ),
  3823. ( sym: 325; act: -139 ),
  3824. { 155: }
  3825. ( sym: 268; act: 107 ),
  3826. ( sym: 277; act: 23 ),
  3827. ( sym: 278; act: 108 ),
  3828. ( sym: 279; act: 109 ),
  3829. ( sym: 280; act: 24 ),
  3830. ( sym: 281; act: 25 ),
  3831. ( sym: 282; act: 26 ),
  3832. ( sym: 283; act: 27 ),
  3833. ( sym: 284; act: 28 ),
  3834. ( sym: 285; act: 29 ),
  3835. ( sym: 286; act: 30 ),
  3836. ( sym: 314; act: 111 ),
  3837. ( sym: 316; act: 112 ),
  3838. ( sym: 321; act: 113 ),
  3839. ( sym: 327; act: 32 ),
  3840. { 156: }
  3841. ( sym: 324; act: 144 ),
  3842. ( sym: 325; act: 145 ),
  3843. ( sym: 265; act: -146 ),
  3844. ( sym: 266; act: -146 ),
  3845. ( sym: 267; act: -146 ),
  3846. ( sym: 268; act: -146 ),
  3847. ( sym: 269; act: -146 ),
  3848. ( sym: 270; act: -146 ),
  3849. ( sym: 271; act: -146 ),
  3850. ( sym: 272; act: -146 ),
  3851. ( sym: 273; act: -146 ),
  3852. ( sym: 291; act: -146 ),
  3853. ( sym: 301; act: -146 ),
  3854. ( sym: 304; act: -146 ),
  3855. ( sym: 306; act: -146 ),
  3856. ( sym: 307; act: -146 ),
  3857. ( sym: 308; act: -146 ),
  3858. ( sym: 309; act: -146 ),
  3859. ( sym: 310; act: -146 ),
  3860. ( sym: 311; act: -146 ),
  3861. ( sym: 312; act: -146 ),
  3862. ( sym: 313; act: -146 ),
  3863. ( sym: 314; act: -146 ),
  3864. ( sym: 315; act: -146 ),
  3865. ( sym: 316; act: -146 ),
  3866. ( sym: 317; act: -146 ),
  3867. ( sym: 318; act: -146 ),
  3868. ( sym: 319; act: -146 ),
  3869. ( sym: 320; act: -146 ),
  3870. ( sym: 321; act: -146 ),
  3871. { 157: }
  3872. ( sym: 324; act: 144 ),
  3873. ( sym: 325; act: 145 ),
  3874. ( sym: 265; act: -145 ),
  3875. ( sym: 266; act: -145 ),
  3876. ( sym: 267; act: -145 ),
  3877. ( sym: 268; act: -145 ),
  3878. ( sym: 269; act: -145 ),
  3879. ( sym: 270; act: -145 ),
  3880. ( sym: 271; act: -145 ),
  3881. ( sym: 272; act: -145 ),
  3882. ( sym: 273; act: -145 ),
  3883. ( sym: 291; act: -145 ),
  3884. ( sym: 301; act: -145 ),
  3885. ( sym: 304; act: -145 ),
  3886. ( sym: 306; act: -145 ),
  3887. ( sym: 307; act: -145 ),
  3888. ( sym: 308; act: -145 ),
  3889. ( sym: 309; act: -145 ),
  3890. ( sym: 310; act: -145 ),
  3891. ( sym: 311; act: -145 ),
  3892. ( sym: 312; act: -145 ),
  3893. ( sym: 313; act: -145 ),
  3894. ( sym: 314; act: -145 ),
  3895. ( sym: 315; act: -145 ),
  3896. ( sym: 316; act: -145 ),
  3897. ( sym: 317; act: -145 ),
  3898. ( sym: 318; act: -145 ),
  3899. ( sym: 319; act: -145 ),
  3900. ( sym: 320; act: -145 ),
  3901. ( sym: 321; act: -145 ),
  3902. { 158: }
  3903. ( sym: 324; act: 144 ),
  3904. ( sym: 325; act: 145 ),
  3905. ( sym: 265; act: -147 ),
  3906. ( sym: 266; act: -147 ),
  3907. ( sym: 267; act: -147 ),
  3908. ( sym: 268; act: -147 ),
  3909. ( sym: 269; act: -147 ),
  3910. ( sym: 270; act: -147 ),
  3911. ( sym: 271; act: -147 ),
  3912. ( sym: 272; act: -147 ),
  3913. ( sym: 273; act: -147 ),
  3914. ( sym: 291; act: -147 ),
  3915. ( sym: 301; act: -147 ),
  3916. ( sym: 304; act: -147 ),
  3917. ( sym: 306; act: -147 ),
  3918. ( sym: 307; act: -147 ),
  3919. ( sym: 308; act: -147 ),
  3920. ( sym: 309; act: -147 ),
  3921. ( sym: 310; act: -147 ),
  3922. ( sym: 311; act: -147 ),
  3923. ( sym: 312; act: -147 ),
  3924. ( sym: 313; act: -147 ),
  3925. ( sym: 314; act: -147 ),
  3926. ( sym: 315; act: -147 ),
  3927. ( sym: 316; act: -147 ),
  3928. ( sym: 317; act: -147 ),
  3929. ( sym: 318; act: -147 ),
  3930. ( sym: 319; act: -147 ),
  3931. ( sym: 320; act: -147 ),
  3932. ( sym: 321; act: -147 ),
  3933. { 159: }
  3934. ( sym: 268; act: 118 ),
  3935. ( sym: 270; act: 119 ),
  3936. ( sym: 266; act: -95 ),
  3937. ( sym: 267; act: -95 ),
  3938. ( sym: 269; act: -95 ),
  3939. ( sym: 272; act: -95 ),
  3940. ( sym: 301; act: -95 ),
  3941. { 160: }
  3942. ( sym: 267; act: 217 ),
  3943. ( sym: 269; act: -87 ),
  3944. { 161: }
  3945. ( sym: 269; act: 218 ),
  3946. { 162: }
  3947. ( sym: 268; act: 222 ),
  3948. ( sym: 277; act: 23 ),
  3949. ( sym: 287; act: 223 ),
  3950. ( sym: 288; act: 83 ),
  3951. ( sym: 289; act: 84 ),
  3952. ( sym: 290; act: 85 ),
  3953. ( sym: 314; act: 86 ),
  3954. ( sym: 319; act: 224 ),
  3955. ( sym: 267; act: -116 ),
  3956. ( sym: 269; act: -116 ),
  3957. ( sym: 270; act: -116 ),
  3958. { 163: }
  3959. { 164: }
  3960. ( sym: 269; act: 225 ),
  3961. ( sym: 267; act: -75 ),
  3962. ( sym: 268; act: -75 ),
  3963. ( sym: 270; act: -75 ),
  3964. ( sym: 277; act: -75 ),
  3965. ( sym: 287; act: -75 ),
  3966. ( sym: 288; act: -75 ),
  3967. ( sym: 289; act: -75 ),
  3968. ( sym: 290; act: -75 ),
  3969. ( sym: 314; act: -75 ),
  3970. ( sym: 319; act: -75 ),
  3971. { 165: }
  3972. { 166: }
  3973. { 167: }
  3974. ( sym: 271; act: 226 ),
  3975. ( sym: 304; act: 198 ),
  3976. ( sym: 306; act: 199 ),
  3977. ( sym: 307; act: 200 ),
  3978. ( sym: 308; act: 201 ),
  3979. ( sym: 309; act: 202 ),
  3980. ( sym: 310; act: 203 ),
  3981. ( sym: 311; act: 204 ),
  3982. ( sym: 312; act: 205 ),
  3983. ( sym: 313; act: 206 ),
  3984. ( sym: 314; act: 207 ),
  3985. ( sym: 315; act: 208 ),
  3986. ( sym: 316; act: 209 ),
  3987. ( sym: 317; act: 210 ),
  3988. ( sym: 318; act: 211 ),
  3989. ( sym: 319; act: 212 ),
  3990. ( sym: 320; act: 213 ),
  3991. ( sym: 321; act: 214 ),
  3992. { 168: }
  3993. { 169: }
  3994. { 170: }
  3995. ( sym: 268; act: 118 ),
  3996. ( sym: 270; act: 119 ),
  3997. ( sym: 266; act: -80 ),
  3998. ( sym: 267; act: -80 ),
  3999. ( sym: 272; act: -80 ),
  4000. ( sym: 301; act: -80 ),
  4001. { 171: }
  4002. ( sym: 273; act: 227 ),
  4003. { 172: }
  4004. ( sym: 266; act: 228 ),
  4005. ( sym: 304; act: 198 ),
  4006. ( sym: 306; act: 199 ),
  4007. ( sym: 307; act: 200 ),
  4008. ( sym: 308; act: 201 ),
  4009. ( sym: 309; act: 202 ),
  4010. ( sym: 310; act: 203 ),
  4011. ( sym: 311; act: 204 ),
  4012. ( sym: 312; act: 205 ),
  4013. ( sym: 313; act: 206 ),
  4014. ( sym: 314; act: 207 ),
  4015. ( sym: 315; act: 208 ),
  4016. ( sym: 316; act: 209 ),
  4017. ( sym: 317; act: 210 ),
  4018. ( sym: 318; act: 211 ),
  4019. ( sym: 319; act: 212 ),
  4020. ( sym: 320; act: 213 ),
  4021. ( sym: 321; act: 214 ),
  4022. { 173: }
  4023. ( sym: 257; act: 174 ),
  4024. ( sym: 266; act: 175 ),
  4025. ( sym: 268; act: 107 ),
  4026. ( sym: 277; act: 23 ),
  4027. ( sym: 278; act: 108 ),
  4028. ( sym: 279; act: 109 ),
  4029. ( sym: 280; act: 24 ),
  4030. ( sym: 281; act: 25 ),
  4031. ( sym: 282; act: 26 ),
  4032. ( sym: 283; act: 27 ),
  4033. ( sym: 284; act: 28 ),
  4034. ( sym: 285; act: 29 ),
  4035. ( sym: 286; act: 30 ),
  4036. ( sym: 314; act: 111 ),
  4037. ( sym: 316; act: 112 ),
  4038. ( sym: 321; act: 113 ),
  4039. ( sym: 327; act: 32 ),
  4040. ( sym: 273; act: -24 ),
  4041. { 174: }
  4042. ( sym: 268; act: 230 ),
  4043. { 175: }
  4044. { 176: }
  4045. ( sym: 277; act: 23 ),
  4046. { 177: }
  4047. ( sym: 304; act: 198 ),
  4048. ( sym: 306; act: 199 ),
  4049. ( sym: 307; act: 200 ),
  4050. ( sym: 308; act: 201 ),
  4051. ( sym: 309; act: 202 ),
  4052. ( sym: 310; act: 203 ),
  4053. ( sym: 311; act: 204 ),
  4054. ( sym: 312; act: 205 ),
  4055. ( sym: 313; act: 206 ),
  4056. ( sym: 314; act: 207 ),
  4057. ( sym: 315; act: 208 ),
  4058. ( sym: 316; act: 209 ),
  4059. ( sym: 317; act: 210 ),
  4060. ( sym: 318; act: 211 ),
  4061. ( sym: 319; act: 212 ),
  4062. ( sym: 320; act: 213 ),
  4063. ( sym: 321; act: 214 ),
  4064. ( sym: 266; act: -99 ),
  4065. ( sym: 267; act: -99 ),
  4066. ( sym: 268; act: -99 ),
  4067. ( sym: 269; act: -99 ),
  4068. ( sym: 270; act: -99 ),
  4069. ( sym: 272; act: -99 ),
  4070. ( sym: 301; act: -99 ),
  4071. { 178: }
  4072. ( sym: 304; act: 198 ),
  4073. ( sym: 306; act: 199 ),
  4074. ( sym: 307; act: 200 ),
  4075. ( sym: 308; act: 201 ),
  4076. ( sym: 309; act: 202 ),
  4077. ( sym: 310; act: 203 ),
  4078. ( sym: 311; act: 204 ),
  4079. ( sym: 312; act: 205 ),
  4080. ( sym: 313; act: 206 ),
  4081. ( sym: 314; act: 207 ),
  4082. ( sym: 315; act: 208 ),
  4083. ( sym: 316; act: 209 ),
  4084. ( sym: 317; act: 210 ),
  4085. ( sym: 318; act: 211 ),
  4086. ( sym: 319; act: 212 ),
  4087. ( sym: 320; act: 213 ),
  4088. ( sym: 321; act: 214 ),
  4089. ( sym: 266; act: -98 ),
  4090. ( sym: 267; act: -98 ),
  4091. ( sym: 268; act: -98 ),
  4092. ( sym: 269; act: -98 ),
  4093. ( sym: 270; act: -98 ),
  4094. ( sym: 272; act: -98 ),
  4095. ( sym: 301; act: -98 ),
  4096. { 179: }
  4097. ( sym: 256; act: 80 ),
  4098. ( sym: 268; act: 81 ),
  4099. ( sym: 277; act: 23 ),
  4100. ( sym: 287; act: 82 ),
  4101. ( sym: 288; act: 83 ),
  4102. ( sym: 289; act: 84 ),
  4103. ( sym: 290; act: 85 ),
  4104. ( sym: 314; act: 86 ),
  4105. ( sym: 319; act: 87 ),
  4106. { 180: }
  4107. { 181: }
  4108. { 182: }
  4109. { 183: }
  4110. ( sym: 304; act: 198 ),
  4111. ( sym: 306; act: 199 ),
  4112. ( sym: 307; act: 200 ),
  4113. ( sym: 308; act: 201 ),
  4114. ( sym: 309; act: 202 ),
  4115. ( sym: 310; act: 203 ),
  4116. ( sym: 311; act: 204 ),
  4117. ( sym: 312; act: 205 ),
  4118. ( sym: 313; act: 206 ),
  4119. ( sym: 314; act: 207 ),
  4120. ( sym: 315; act: 208 ),
  4121. ( sym: 316; act: 209 ),
  4122. ( sym: 317; act: 210 ),
  4123. ( sym: 318; act: 211 ),
  4124. ( sym: 319; act: 212 ),
  4125. ( sym: 320; act: 213 ),
  4126. ( sym: 321; act: 214 ),
  4127. ( sym: 267; act: -159 ),
  4128. ( sym: 269; act: -159 ),
  4129. ( sym: 273; act: -159 ),
  4130. { 184: }
  4131. ( sym: 292; act: 234 ),
  4132. ( sym: 268; act: -3 ),
  4133. { 185: }
  4134. ( sym: 291; act: 235 ),
  4135. { 186: }
  4136. ( sym: 268; act: 236 ),
  4137. { 187: }
  4138. ( sym: 268; act: 107 ),
  4139. ( sym: 277; act: 23 ),
  4140. ( sym: 278; act: 108 ),
  4141. ( sym: 279; act: 109 ),
  4142. ( sym: 280; act: 24 ),
  4143. ( sym: 281; act: 25 ),
  4144. ( sym: 282; act: 26 ),
  4145. ( sym: 283; act: 27 ),
  4146. ( sym: 284; act: 28 ),
  4147. ( sym: 285; act: 29 ),
  4148. ( sym: 286; act: 30 ),
  4149. ( sym: 314; act: 111 ),
  4150. ( sym: 316; act: 112 ),
  4151. ( sym: 321; act: 113 ),
  4152. ( sym: 327; act: 32 ),
  4153. { 188: }
  4154. { 189: }
  4155. { 190: }
  4156. ( sym: 267; act: 238 ),
  4157. ( sym: 269; act: -165 ),
  4158. ( sym: 271; act: -165 ),
  4159. { 191: }
  4160. ( sym: 269; act: 239 ),
  4161. { 192: }
  4162. ( sym: 304; act: 198 ),
  4163. ( sym: 306; act: 199 ),
  4164. ( sym: 307; act: 200 ),
  4165. ( sym: 308; act: 201 ),
  4166. ( sym: 309; act: 202 ),
  4167. ( sym: 310; act: 203 ),
  4168. ( sym: 311; act: 204 ),
  4169. ( sym: 312; act: 205 ),
  4170. ( sym: 313; act: 206 ),
  4171. ( sym: 314; act: 207 ),
  4172. ( sym: 315; act: 208 ),
  4173. ( sym: 316; act: 209 ),
  4174. ( sym: 317; act: 210 ),
  4175. ( sym: 318; act: 211 ),
  4176. ( sym: 319; act: 212 ),
  4177. ( sym: 320; act: 213 ),
  4178. ( sym: 321; act: 214 ),
  4179. ( sym: 267; act: -167 ),
  4180. ( sym: 269; act: -167 ),
  4181. ( sym: 271; act: -167 ),
  4182. { 193: }
  4183. ( sym: 271; act: 240 ),
  4184. { 194: }
  4185. { 195: }
  4186. ( sym: 319; act: 241 ),
  4187. { 196: }
  4188. ( sym: 268; act: 107 ),
  4189. ( sym: 277; act: 23 ),
  4190. ( sym: 278; act: 108 ),
  4191. ( sym: 279; act: 109 ),
  4192. ( sym: 280; act: 24 ),
  4193. ( sym: 281; act: 25 ),
  4194. ( sym: 282; act: 26 ),
  4195. ( sym: 283; act: 27 ),
  4196. ( sym: 284; act: 28 ),
  4197. ( sym: 285; act: 29 ),
  4198. ( sym: 286; act: 30 ),
  4199. ( sym: 314; act: 111 ),
  4200. ( sym: 316; act: 112 ),
  4201. ( sym: 321; act: 113 ),
  4202. ( sym: 327; act: 32 ),
  4203. { 197: }
  4204. ( sym: 269; act: 243 ),
  4205. { 198: }
  4206. ( sym: 268; act: 107 ),
  4207. ( sym: 277; act: 23 ),
  4208. ( sym: 278; act: 108 ),
  4209. ( sym: 279; act: 109 ),
  4210. ( sym: 280; act: 24 ),
  4211. ( sym: 281; act: 25 ),
  4212. ( sym: 282; act: 26 ),
  4213. ( sym: 283; act: 27 ),
  4214. ( sym: 284; act: 28 ),
  4215. ( sym: 285; act: 29 ),
  4216. ( sym: 286; act: 30 ),
  4217. ( sym: 314; act: 111 ),
  4218. ( sym: 316; act: 112 ),
  4219. ( sym: 321; act: 113 ),
  4220. ( sym: 327; act: 32 ),
  4221. { 199: }
  4222. ( sym: 268; act: 107 ),
  4223. ( sym: 277; act: 23 ),
  4224. ( sym: 278; act: 108 ),
  4225. ( sym: 279; act: 109 ),
  4226. ( sym: 280; act: 24 ),
  4227. ( sym: 281; act: 25 ),
  4228. ( sym: 282; act: 26 ),
  4229. ( sym: 283; act: 27 ),
  4230. ( sym: 284; act: 28 ),
  4231. ( sym: 285; act: 29 ),
  4232. ( sym: 286; act: 30 ),
  4233. ( sym: 314; act: 111 ),
  4234. ( sym: 316; act: 112 ),
  4235. ( sym: 321; act: 113 ),
  4236. ( sym: 327; act: 32 ),
  4237. { 200: }
  4238. ( sym: 268; act: 107 ),
  4239. ( sym: 277; act: 23 ),
  4240. ( sym: 278; act: 108 ),
  4241. ( sym: 279; act: 109 ),
  4242. ( sym: 280; act: 24 ),
  4243. ( sym: 281; act: 25 ),
  4244. ( sym: 282; act: 26 ),
  4245. ( sym: 283; act: 27 ),
  4246. ( sym: 284; act: 28 ),
  4247. ( sym: 285; act: 29 ),
  4248. ( sym: 286; act: 30 ),
  4249. ( sym: 314; act: 111 ),
  4250. ( sym: 316; act: 112 ),
  4251. ( sym: 321; act: 113 ),
  4252. ( sym: 327; act: 32 ),
  4253. { 201: }
  4254. ( sym: 268; act: 107 ),
  4255. ( sym: 277; act: 23 ),
  4256. ( sym: 278; act: 108 ),
  4257. ( sym: 279; act: 109 ),
  4258. ( sym: 280; act: 24 ),
  4259. ( sym: 281; act: 25 ),
  4260. ( sym: 282; act: 26 ),
  4261. ( sym: 283; act: 27 ),
  4262. ( sym: 284; act: 28 ),
  4263. ( sym: 285; act: 29 ),
  4264. ( sym: 286; act: 30 ),
  4265. ( sym: 314; act: 111 ),
  4266. ( sym: 316; act: 112 ),
  4267. ( sym: 321; act: 113 ),
  4268. ( sym: 327; act: 32 ),
  4269. { 202: }
  4270. ( sym: 268; act: 107 ),
  4271. ( sym: 277; act: 23 ),
  4272. ( sym: 278; act: 108 ),
  4273. ( sym: 279; act: 109 ),
  4274. ( sym: 280; act: 24 ),
  4275. ( sym: 281; act: 25 ),
  4276. ( sym: 282; act: 26 ),
  4277. ( sym: 283; act: 27 ),
  4278. ( sym: 284; act: 28 ),
  4279. ( sym: 285; act: 29 ),
  4280. ( sym: 286; act: 30 ),
  4281. ( sym: 314; act: 111 ),
  4282. ( sym: 316; act: 112 ),
  4283. ( sym: 321; act: 113 ),
  4284. ( sym: 327; act: 32 ),
  4285. { 203: }
  4286. ( sym: 268; act: 107 ),
  4287. ( sym: 277; act: 23 ),
  4288. ( sym: 278; act: 108 ),
  4289. ( sym: 279; act: 109 ),
  4290. ( sym: 280; act: 24 ),
  4291. ( sym: 281; act: 25 ),
  4292. ( sym: 282; act: 26 ),
  4293. ( sym: 283; act: 27 ),
  4294. ( sym: 284; act: 28 ),
  4295. ( sym: 285; act: 29 ),
  4296. ( sym: 286; act: 30 ),
  4297. ( sym: 314; act: 111 ),
  4298. ( sym: 316; act: 112 ),
  4299. ( sym: 321; act: 113 ),
  4300. ( sym: 327; act: 32 ),
  4301. { 204: }
  4302. ( sym: 268; act: 107 ),
  4303. ( sym: 277; act: 23 ),
  4304. ( sym: 278; act: 108 ),
  4305. ( sym: 279; act: 109 ),
  4306. ( sym: 280; act: 24 ),
  4307. ( sym: 281; act: 25 ),
  4308. ( sym: 282; act: 26 ),
  4309. ( sym: 283; act: 27 ),
  4310. ( sym: 284; act: 28 ),
  4311. ( sym: 285; act: 29 ),
  4312. ( sym: 286; act: 30 ),
  4313. ( sym: 314; act: 111 ),
  4314. ( sym: 316; act: 112 ),
  4315. ( sym: 321; act: 113 ),
  4316. ( sym: 327; act: 32 ),
  4317. { 205: }
  4318. ( sym: 268; act: 107 ),
  4319. ( sym: 277; act: 23 ),
  4320. ( sym: 278; act: 108 ),
  4321. ( sym: 279; act: 109 ),
  4322. ( sym: 280; act: 24 ),
  4323. ( sym: 281; act: 25 ),
  4324. ( sym: 282; act: 26 ),
  4325. ( sym: 283; act: 27 ),
  4326. ( sym: 284; act: 28 ),
  4327. ( sym: 285; act: 29 ),
  4328. ( sym: 286; act: 30 ),
  4329. ( sym: 314; act: 111 ),
  4330. ( sym: 316; act: 112 ),
  4331. ( sym: 321; act: 113 ),
  4332. ( sym: 327; act: 32 ),
  4333. { 206: }
  4334. ( sym: 268; act: 107 ),
  4335. ( sym: 277; act: 23 ),
  4336. ( sym: 278; act: 108 ),
  4337. ( sym: 279; act: 109 ),
  4338. ( sym: 280; act: 24 ),
  4339. ( sym: 281; act: 25 ),
  4340. ( sym: 282; act: 26 ),
  4341. ( sym: 283; act: 27 ),
  4342. ( sym: 284; act: 28 ),
  4343. ( sym: 285; act: 29 ),
  4344. ( sym: 286; act: 30 ),
  4345. ( sym: 314; act: 111 ),
  4346. ( sym: 316; act: 112 ),
  4347. ( sym: 321; act: 113 ),
  4348. ( sym: 327; act: 32 ),
  4349. { 207: }
  4350. ( sym: 268; act: 107 ),
  4351. ( sym: 277; act: 23 ),
  4352. ( sym: 278; act: 108 ),
  4353. ( sym: 279; act: 109 ),
  4354. ( sym: 280; act: 24 ),
  4355. ( sym: 281; act: 25 ),
  4356. ( sym: 282; act: 26 ),
  4357. ( sym: 283; act: 27 ),
  4358. ( sym: 284; act: 28 ),
  4359. ( sym: 285; act: 29 ),
  4360. ( sym: 286; act: 30 ),
  4361. ( sym: 314; act: 111 ),
  4362. ( sym: 316; act: 112 ),
  4363. ( sym: 321; act: 113 ),
  4364. ( sym: 327; act: 32 ),
  4365. { 208: }
  4366. ( sym: 268; act: 107 ),
  4367. ( sym: 277; act: 23 ),
  4368. ( sym: 278; act: 108 ),
  4369. ( sym: 279; act: 109 ),
  4370. ( sym: 280; act: 24 ),
  4371. ( sym: 281; act: 25 ),
  4372. ( sym: 282; act: 26 ),
  4373. ( sym: 283; act: 27 ),
  4374. ( sym: 284; act: 28 ),
  4375. ( sym: 285; act: 29 ),
  4376. ( sym: 286; act: 30 ),
  4377. ( sym: 314; act: 111 ),
  4378. ( sym: 316; act: 112 ),
  4379. ( sym: 321; act: 113 ),
  4380. ( sym: 327; act: 32 ),
  4381. { 209: }
  4382. ( sym: 268; act: 107 ),
  4383. ( sym: 277; act: 23 ),
  4384. ( sym: 278; act: 108 ),
  4385. ( sym: 279; act: 109 ),
  4386. ( sym: 280; act: 24 ),
  4387. ( sym: 281; act: 25 ),
  4388. ( sym: 282; act: 26 ),
  4389. ( sym: 283; act: 27 ),
  4390. ( sym: 284; act: 28 ),
  4391. ( sym: 285; act: 29 ),
  4392. ( sym: 286; act: 30 ),
  4393. ( sym: 314; act: 111 ),
  4394. ( sym: 316; act: 112 ),
  4395. ( sym: 321; act: 113 ),
  4396. ( sym: 327; act: 32 ),
  4397. { 210: }
  4398. ( sym: 268; act: 107 ),
  4399. ( sym: 277; act: 23 ),
  4400. ( sym: 278; act: 108 ),
  4401. ( sym: 279; act: 109 ),
  4402. ( sym: 280; act: 24 ),
  4403. ( sym: 281; act: 25 ),
  4404. ( sym: 282; act: 26 ),
  4405. ( sym: 283; act: 27 ),
  4406. ( sym: 284; act: 28 ),
  4407. ( sym: 285; act: 29 ),
  4408. ( sym: 286; act: 30 ),
  4409. ( sym: 314; act: 111 ),
  4410. ( sym: 316; act: 112 ),
  4411. ( sym: 321; act: 113 ),
  4412. ( sym: 327; act: 32 ),
  4413. { 211: }
  4414. ( sym: 268; act: 107 ),
  4415. ( sym: 277; act: 23 ),
  4416. ( sym: 278; act: 108 ),
  4417. ( sym: 279; act: 109 ),
  4418. ( sym: 280; act: 24 ),
  4419. ( sym: 281; act: 25 ),
  4420. ( sym: 282; act: 26 ),
  4421. ( sym: 283; act: 27 ),
  4422. ( sym: 284; act: 28 ),
  4423. ( sym: 285; act: 29 ),
  4424. ( sym: 286; act: 30 ),
  4425. ( sym: 314; act: 111 ),
  4426. ( sym: 316; act: 112 ),
  4427. ( sym: 321; act: 113 ),
  4428. ( sym: 327; act: 32 ),
  4429. { 212: }
  4430. ( sym: 268; act: 107 ),
  4431. ( sym: 277; act: 23 ),
  4432. ( sym: 278; act: 108 ),
  4433. ( sym: 279; act: 109 ),
  4434. ( sym: 280; act: 24 ),
  4435. ( sym: 281; act: 25 ),
  4436. ( sym: 282; act: 26 ),
  4437. ( sym: 283; act: 27 ),
  4438. ( sym: 284; act: 28 ),
  4439. ( sym: 285; act: 29 ),
  4440. ( sym: 286; act: 30 ),
  4441. ( sym: 314; act: 111 ),
  4442. ( sym: 316; act: 112 ),
  4443. ( sym: 321; act: 113 ),
  4444. ( sym: 327; act: 32 ),
  4445. { 213: }
  4446. ( sym: 268; act: 107 ),
  4447. ( sym: 277; act: 23 ),
  4448. ( sym: 278; act: 108 ),
  4449. ( sym: 279; act: 109 ),
  4450. ( sym: 280; act: 24 ),
  4451. ( sym: 281; act: 25 ),
  4452. ( sym: 282; act: 26 ),
  4453. ( sym: 283; act: 27 ),
  4454. ( sym: 284; act: 28 ),
  4455. ( sym: 285; act: 29 ),
  4456. ( sym: 286; act: 30 ),
  4457. ( sym: 314; act: 111 ),
  4458. ( sym: 316; act: 112 ),
  4459. ( sym: 321; act: 113 ),
  4460. ( sym: 327; act: 32 ),
  4461. { 214: }
  4462. ( sym: 268; act: 107 ),
  4463. ( sym: 277; act: 23 ),
  4464. ( sym: 278; act: 108 ),
  4465. ( sym: 279; act: 109 ),
  4466. ( sym: 280; act: 24 ),
  4467. ( sym: 281; act: 25 ),
  4468. ( sym: 282; act: 26 ),
  4469. ( sym: 283; act: 27 ),
  4470. ( sym: 284; act: 28 ),
  4471. ( sym: 285; act: 29 ),
  4472. ( sym: 286; act: 30 ),
  4473. ( sym: 314; act: 111 ),
  4474. ( sym: 316; act: 112 ),
  4475. ( sym: 321; act: 113 ),
  4476. ( sym: 327; act: 32 ),
  4477. { 215: }
  4478. ( sym: 268; act: 107 ),
  4479. ( sym: 277; act: 23 ),
  4480. ( sym: 278; act: 108 ),
  4481. ( sym: 279; act: 109 ),
  4482. ( sym: 280; act: 24 ),
  4483. ( sym: 281; act: 25 ),
  4484. ( sym: 282; act: 26 ),
  4485. ( sym: 283; act: 27 ),
  4486. ( sym: 284; act: 28 ),
  4487. ( sym: 285; act: 29 ),
  4488. ( sym: 286; act: 30 ),
  4489. ( sym: 314; act: 111 ),
  4490. ( sym: 316; act: 112 ),
  4491. ( sym: 321; act: 113 ),
  4492. ( sym: 327; act: 32 ),
  4493. ( sym: 265; act: -138 ),
  4494. ( sym: 266; act: -138 ),
  4495. ( sym: 267; act: -138 ),
  4496. ( sym: 269; act: -138 ),
  4497. ( sym: 270; act: -138 ),
  4498. ( sym: 271; act: -138 ),
  4499. ( sym: 272; act: -138 ),
  4500. ( sym: 273; act: -138 ),
  4501. ( sym: 291; act: -138 ),
  4502. ( sym: 301; act: -138 ),
  4503. ( sym: 304; act: -138 ),
  4504. ( sym: 306; act: -138 ),
  4505. ( sym: 307; act: -138 ),
  4506. ( sym: 308; act: -138 ),
  4507. ( sym: 309; act: -138 ),
  4508. ( sym: 310; act: -138 ),
  4509. ( sym: 311; act: -138 ),
  4510. ( sym: 312; act: -138 ),
  4511. ( sym: 313; act: -138 ),
  4512. ( sym: 315; act: -138 ),
  4513. ( sym: 317; act: -138 ),
  4514. ( sym: 318; act: -138 ),
  4515. ( sym: 319; act: -138 ),
  4516. ( sym: 320; act: -138 ),
  4517. ( sym: 324; act: -138 ),
  4518. ( sym: 325; act: -138 ),
  4519. { 216: }
  4520. ( sym: 269; act: 264 ),
  4521. ( sym: 324; act: 144 ),
  4522. ( sym: 325; act: 145 ),
  4523. { 217: }
  4524. ( sym: 274; act: 20 ),
  4525. ( sym: 275; act: 21 ),
  4526. ( sym: 276; act: 22 ),
  4527. ( sym: 277; act: 23 ),
  4528. ( sym: 280; act: 24 ),
  4529. ( sym: 281; act: 25 ),
  4530. ( sym: 282; act: 26 ),
  4531. ( sym: 283; act: 27 ),
  4532. ( sym: 284; act: 28 ),
  4533. ( sym: 285; act: 29 ),
  4534. ( sym: 286; act: 30 ),
  4535. ( sym: 287; act: 31 ),
  4536. ( sym: 303; act: 165 ),
  4537. ( sym: 327; act: 32 ),
  4538. ( sym: 269; act: -90 ),
  4539. { 218: }
  4540. { 219: }
  4541. ( sym: 319; act: 266 ),
  4542. { 220: }
  4543. ( sym: 268; act: 268 ),
  4544. ( sym: 270; act: 269 ),
  4545. ( sym: 267; act: -86 ),
  4546. ( sym: 269; act: -86 ),
  4547. { 221: }
  4548. ( sym: 268; act: 118 ),
  4549. ( sym: 270; act: 270 ),
  4550. ( sym: 267; act: -84 ),
  4551. ( sym: 269; act: -84 ),
  4552. { 222: }
  4553. ( sym: 268; act: 222 ),
  4554. ( sym: 277; act: 23 ),
  4555. ( sym: 287; act: 223 ),
  4556. ( sym: 288; act: 83 ),
  4557. ( sym: 289; act: 84 ),
  4558. ( sym: 290; act: 85 ),
  4559. ( sym: 314; act: 86 ),
  4560. ( sym: 319; act: 273 ),
  4561. ( sym: 269; act: -116 ),
  4562. ( sym: 270; act: -116 ),
  4563. { 223: }
  4564. ( sym: 268; act: 222 ),
  4565. ( sym: 277; act: 23 ),
  4566. ( sym: 287; act: 223 ),
  4567. ( sym: 288; act: 83 ),
  4568. ( sym: 289; act: 84 ),
  4569. ( sym: 290; act: 85 ),
  4570. ( sym: 314; act: 86 ),
  4571. ( sym: 319; act: 273 ),
  4572. ( sym: 267; act: -116 ),
  4573. ( sym: 269; act: -116 ),
  4574. ( sym: 270; act: -116 ),
  4575. { 224: }
  4576. ( sym: 268; act: 222 ),
  4577. ( sym: 277; act: 23 ),
  4578. ( sym: 287; act: 223 ),
  4579. ( sym: 288; act: 83 ),
  4580. ( sym: 289; act: 84 ),
  4581. ( sym: 290; act: 85 ),
  4582. ( sym: 314; act: 86 ),
  4583. ( sym: 319; act: 273 ),
  4584. ( sym: 267; act: -116 ),
  4585. ( sym: 269; act: -116 ),
  4586. ( sym: 270; act: -116 ),
  4587. { 225: }
  4588. { 226: }
  4589. { 227: }
  4590. { 228: }
  4591. { 229: }
  4592. { 230: }
  4593. ( sym: 268; act: 107 ),
  4594. ( sym: 277; act: 23 ),
  4595. ( sym: 278; act: 108 ),
  4596. ( sym: 279; act: 109 ),
  4597. ( sym: 280; act: 24 ),
  4598. ( sym: 281; act: 25 ),
  4599. ( sym: 282; act: 26 ),
  4600. ( sym: 283; act: 27 ),
  4601. ( sym: 284; act: 28 ),
  4602. ( sym: 285; act: 29 ),
  4603. ( sym: 286; act: 30 ),
  4604. ( sym: 314; act: 111 ),
  4605. ( sym: 316; act: 112 ),
  4606. ( sym: 321; act: 113 ),
  4607. ( sym: 327; act: 32 ),
  4608. { 231: }
  4609. ( sym: 269; act: 279 ),
  4610. { 232: }
  4611. { 233: }
  4612. ( sym: 268; act: 280 ),
  4613. { 234: }
  4614. { 235: }
  4615. { 236: }
  4616. ( sym: 268; act: 107 ),
  4617. ( sym: 277; act: 23 ),
  4618. ( sym: 278; act: 108 ),
  4619. ( sym: 279; act: 109 ),
  4620. ( sym: 280; act: 24 ),
  4621. ( sym: 281; act: 25 ),
  4622. ( sym: 282; act: 26 ),
  4623. ( sym: 283; act: 27 ),
  4624. ( sym: 284; act: 28 ),
  4625. ( sym: 285; act: 29 ),
  4626. ( sym: 286; act: 30 ),
  4627. ( sym: 314; act: 111 ),
  4628. ( sym: 316; act: 112 ),
  4629. ( sym: 321; act: 113 ),
  4630. ( sym: 327; act: 32 ),
  4631. { 237: }
  4632. { 238: }
  4633. ( sym: 268; act: 107 ),
  4634. ( sym: 277; act: 23 ),
  4635. ( sym: 278; act: 108 ),
  4636. ( sym: 279; act: 109 ),
  4637. ( sym: 280; act: 24 ),
  4638. ( sym: 281; act: 25 ),
  4639. ( sym: 282; act: 26 ),
  4640. ( sym: 283; act: 27 ),
  4641. ( sym: 284; act: 28 ),
  4642. ( sym: 285; act: 29 ),
  4643. ( sym: 286; act: 30 ),
  4644. ( sym: 314; act: 111 ),
  4645. ( sym: 316; act: 112 ),
  4646. ( sym: 321; act: 113 ),
  4647. ( sym: 327; act: 32 ),
  4648. ( sym: 269; act: -166 ),
  4649. ( sym: 271; act: -166 ),
  4650. { 239: }
  4651. { 240: }
  4652. { 241: }
  4653. ( sym: 269; act: 283 ),
  4654. { 242: }
  4655. ( sym: 324; act: 144 ),
  4656. ( sym: 325; act: 145 ),
  4657. ( sym: 265; act: -149 ),
  4658. ( sym: 266; act: -149 ),
  4659. ( sym: 267; act: -149 ),
  4660. ( sym: 268; act: -149 ),
  4661. ( sym: 269; act: -149 ),
  4662. ( sym: 270; act: -149 ),
  4663. ( sym: 271; act: -149 ),
  4664. ( sym: 272; act: -149 ),
  4665. ( sym: 273; act: -149 ),
  4666. ( sym: 291; act: -149 ),
  4667. ( sym: 301; act: -149 ),
  4668. ( sym: 304; act: -149 ),
  4669. ( sym: 306; act: -149 ),
  4670. ( sym: 307; act: -149 ),
  4671. ( sym: 308; act: -149 ),
  4672. ( sym: 309; act: -149 ),
  4673. ( sym: 310; act: -149 ),
  4674. ( sym: 311; act: -149 ),
  4675. ( sym: 312; act: -149 ),
  4676. ( sym: 313; act: -149 ),
  4677. ( sym: 314; act: -149 ),
  4678. ( sym: 315; act: -149 ),
  4679. ( sym: 316; act: -149 ),
  4680. ( sym: 317; act: -149 ),
  4681. ( sym: 318; act: -149 ),
  4682. ( sym: 319; act: -149 ),
  4683. ( sym: 320; act: -149 ),
  4684. ( sym: 321; act: -149 ),
  4685. { 243: }
  4686. ( sym: 268; act: 107 ),
  4687. ( sym: 277; act: 23 ),
  4688. ( sym: 278; act: 108 ),
  4689. ( sym: 279; act: 109 ),
  4690. ( sym: 280; act: 24 ),
  4691. ( sym: 281; act: 25 ),
  4692. ( sym: 282; act: 26 ),
  4693. ( sym: 283; act: 27 ),
  4694. ( sym: 284; act: 28 ),
  4695. ( sym: 285; act: 29 ),
  4696. ( sym: 286; act: 30 ),
  4697. ( sym: 314; act: 111 ),
  4698. ( sym: 316; act: 112 ),
  4699. ( sym: 321; act: 113 ),
  4700. ( sym: 327; act: 32 ),
  4701. { 244: }
  4702. ( sym: 304; act: 198 ),
  4703. ( sym: 306; act: 199 ),
  4704. ( sym: 307; act: 200 ),
  4705. ( sym: 308; act: 201 ),
  4706. ( sym: 309; act: 202 ),
  4707. ( sym: 310; act: 203 ),
  4708. ( sym: 311; act: 204 ),
  4709. ( sym: 312; act: 205 ),
  4710. ( sym: 313; act: 206 ),
  4711. ( sym: 314; act: 207 ),
  4712. ( sym: 315; act: 208 ),
  4713. ( sym: 316; act: 209 ),
  4714. ( sym: 317; act: 210 ),
  4715. ( sym: 318; act: 211 ),
  4716. ( sym: 319; act: 212 ),
  4717. ( sym: 320; act: 213 ),
  4718. ( sym: 321; act: 214 ),
  4719. ( sym: 265; act: -118 ),
  4720. ( sym: 266; act: -118 ),
  4721. ( sym: 267; act: -118 ),
  4722. ( sym: 268; act: -118 ),
  4723. ( sym: 269; act: -118 ),
  4724. ( sym: 270; act: -118 ),
  4725. ( sym: 271; act: -118 ),
  4726. ( sym: 272; act: -118 ),
  4727. ( sym: 273; act: -118 ),
  4728. ( sym: 291; act: -118 ),
  4729. ( sym: 301; act: -118 ),
  4730. ( sym: 324; act: -118 ),
  4731. ( sym: 325; act: -118 ),
  4732. { 245: }
  4733. ( sym: 312; act: 205 ),
  4734. ( sym: 313; act: 206 ),
  4735. ( sym: 314; act: 207 ),
  4736. ( sym: 315; act: 208 ),
  4737. ( sym: 316; act: 209 ),
  4738. ( sym: 317; act: 210 ),
  4739. ( sym: 318; act: 211 ),
  4740. ( sym: 319; act: 212 ),
  4741. ( sym: 320; act: 213 ),
  4742. ( sym: 321; act: 214 ),
  4743. ( sym: 265; act: -119 ),
  4744. ( sym: 266; act: -119 ),
  4745. ( sym: 267; act: -119 ),
  4746. ( sym: 268; act: -119 ),
  4747. ( sym: 269; act: -119 ),
  4748. ( sym: 270; act: -119 ),
  4749. ( sym: 271; act: -119 ),
  4750. ( sym: 272; act: -119 ),
  4751. ( sym: 273; act: -119 ),
  4752. ( sym: 291; act: -119 ),
  4753. ( sym: 301; act: -119 ),
  4754. ( sym: 304; act: -119 ),
  4755. ( sym: 306; act: -119 ),
  4756. ( sym: 307; act: -119 ),
  4757. ( sym: 308; act: -119 ),
  4758. ( sym: 309; act: -119 ),
  4759. ( sym: 310; act: -119 ),
  4760. ( sym: 311; act: -119 ),
  4761. ( sym: 324; act: -119 ),
  4762. ( sym: 325; act: -119 ),
  4763. { 246: }
  4764. ( sym: 312; act: 205 ),
  4765. ( sym: 313; act: 206 ),
  4766. ( sym: 314; act: 207 ),
  4767. ( sym: 315; act: 208 ),
  4768. ( sym: 316; act: 209 ),
  4769. ( sym: 317; act: 210 ),
  4770. ( sym: 318; act: 211 ),
  4771. ( sym: 319; act: 212 ),
  4772. ( sym: 320; act: 213 ),
  4773. ( sym: 321; act: 214 ),
  4774. ( sym: 265; act: -120 ),
  4775. ( sym: 266; act: -120 ),
  4776. ( sym: 267; act: -120 ),
  4777. ( sym: 268; act: -120 ),
  4778. ( sym: 269; act: -120 ),
  4779. ( sym: 270; act: -120 ),
  4780. ( sym: 271; act: -120 ),
  4781. ( sym: 272; act: -120 ),
  4782. ( sym: 273; act: -120 ),
  4783. ( sym: 291; act: -120 ),
  4784. ( sym: 301; act: -120 ),
  4785. ( sym: 304; act: -120 ),
  4786. ( sym: 306; act: -120 ),
  4787. ( sym: 307; act: -120 ),
  4788. ( sym: 308; act: -120 ),
  4789. ( sym: 309; act: -120 ),
  4790. ( sym: 310; act: -120 ),
  4791. ( sym: 311; act: -120 ),
  4792. ( sym: 324; act: -120 ),
  4793. ( sym: 325; act: -120 ),
  4794. { 247: }
  4795. ( sym: 312; act: 205 ),
  4796. ( sym: 313; act: 206 ),
  4797. ( sym: 314; act: 207 ),
  4798. ( sym: 315; act: 208 ),
  4799. ( sym: 316; act: 209 ),
  4800. ( sym: 317; act: 210 ),
  4801. ( sym: 318; act: 211 ),
  4802. ( sym: 319; act: 212 ),
  4803. ( sym: 320; act: 213 ),
  4804. ( sym: 321; act: 214 ),
  4805. ( sym: 265; act: -121 ),
  4806. ( sym: 266; act: -121 ),
  4807. ( sym: 267; act: -121 ),
  4808. ( sym: 268; act: -121 ),
  4809. ( sym: 269; act: -121 ),
  4810. ( sym: 270; act: -121 ),
  4811. ( sym: 271; act: -121 ),
  4812. ( sym: 272; act: -121 ),
  4813. ( sym: 273; act: -121 ),
  4814. ( sym: 291; act: -121 ),
  4815. ( sym: 301; act: -121 ),
  4816. ( sym: 304; act: -121 ),
  4817. ( sym: 306; act: -121 ),
  4818. ( sym: 307; act: -121 ),
  4819. ( sym: 308; act: -121 ),
  4820. ( sym: 309; act: -121 ),
  4821. ( sym: 310; act: -121 ),
  4822. ( sym: 311; act: -121 ),
  4823. ( sym: 324; act: -121 ),
  4824. ( sym: 325; act: -121 ),
  4825. { 248: }
  4826. ( sym: 312; act: 205 ),
  4827. ( sym: 313; act: 206 ),
  4828. ( sym: 314; act: 207 ),
  4829. ( sym: 315; act: 208 ),
  4830. ( sym: 316; act: 209 ),
  4831. ( sym: 317; act: 210 ),
  4832. ( sym: 318; act: 211 ),
  4833. ( sym: 319; act: 212 ),
  4834. ( sym: 320; act: 213 ),
  4835. ( sym: 321; act: 214 ),
  4836. ( sym: 265; act: -123 ),
  4837. ( sym: 266; act: -123 ),
  4838. ( sym: 267; act: -123 ),
  4839. ( sym: 268; act: -123 ),
  4840. ( sym: 269; act: -123 ),
  4841. ( sym: 270; act: -123 ),
  4842. ( sym: 271; act: -123 ),
  4843. ( sym: 272; act: -123 ),
  4844. ( sym: 273; act: -123 ),
  4845. ( sym: 291; act: -123 ),
  4846. ( sym: 301; act: -123 ),
  4847. ( sym: 304; act: -123 ),
  4848. ( sym: 306; act: -123 ),
  4849. ( sym: 307; act: -123 ),
  4850. ( sym: 308; act: -123 ),
  4851. ( sym: 309; act: -123 ),
  4852. ( sym: 310; act: -123 ),
  4853. ( sym: 311; act: -123 ),
  4854. ( sym: 324; act: -123 ),
  4855. ( sym: 325; act: -123 ),
  4856. { 249: }
  4857. ( sym: 312; act: 205 ),
  4858. ( sym: 313; act: 206 ),
  4859. ( sym: 314; act: 207 ),
  4860. ( sym: 315; act: 208 ),
  4861. ( sym: 316; act: 209 ),
  4862. ( sym: 317; act: 210 ),
  4863. ( sym: 318; act: 211 ),
  4864. ( sym: 319; act: 212 ),
  4865. ( sym: 320; act: 213 ),
  4866. ( sym: 321; act: 214 ),
  4867. ( sym: 265; act: -122 ),
  4868. ( sym: 266; act: -122 ),
  4869. ( sym: 267; act: -122 ),
  4870. ( sym: 268; act: -122 ),
  4871. ( sym: 269; act: -122 ),
  4872. ( sym: 270; act: -122 ),
  4873. ( sym: 271; act: -122 ),
  4874. ( sym: 272; act: -122 ),
  4875. ( sym: 273; act: -122 ),
  4876. ( sym: 291; act: -122 ),
  4877. ( sym: 301; act: -122 ),
  4878. ( sym: 304; act: -122 ),
  4879. ( sym: 306; act: -122 ),
  4880. ( sym: 307; act: -122 ),
  4881. ( sym: 308; act: -122 ),
  4882. ( sym: 309; act: -122 ),
  4883. ( sym: 310; act: -122 ),
  4884. ( sym: 311; act: -122 ),
  4885. ( sym: 324; act: -122 ),
  4886. ( sym: 325; act: -122 ),
  4887. { 250: }
  4888. ( sym: 312; act: 205 ),
  4889. ( sym: 313; act: 206 ),
  4890. ( sym: 314; act: 207 ),
  4891. ( sym: 315; act: 208 ),
  4892. ( sym: 316; act: 209 ),
  4893. ( sym: 317; act: 210 ),
  4894. ( sym: 318; act: 211 ),
  4895. ( sym: 319; act: 212 ),
  4896. ( sym: 320; act: 213 ),
  4897. ( sym: 321; act: 214 ),
  4898. ( sym: 265; act: -124 ),
  4899. ( sym: 266; act: -124 ),
  4900. ( sym: 267; act: -124 ),
  4901. ( sym: 268; act: -124 ),
  4902. ( sym: 269; act: -124 ),
  4903. ( sym: 270; act: -124 ),
  4904. ( sym: 271; act: -124 ),
  4905. ( sym: 272; act: -124 ),
  4906. ( sym: 273; act: -124 ),
  4907. ( sym: 291; act: -124 ),
  4908. ( sym: 301; act: -124 ),
  4909. ( sym: 304; act: -124 ),
  4910. ( sym: 306; act: -124 ),
  4911. ( sym: 307; act: -124 ),
  4912. ( sym: 308; act: -124 ),
  4913. ( sym: 309; act: -124 ),
  4914. ( sym: 310; act: -124 ),
  4915. ( sym: 311; act: -124 ),
  4916. ( sym: 324; act: -124 ),
  4917. ( sym: 325; act: -124 ),
  4918. { 251: }
  4919. { 252: }
  4920. ( sym: 265; act: 285 ),
  4921. ( sym: 304; act: 198 ),
  4922. ( sym: 306; act: 199 ),
  4923. ( sym: 307; act: 200 ),
  4924. ( sym: 308; act: 201 ),
  4925. ( sym: 309; act: 202 ),
  4926. ( sym: 310; act: 203 ),
  4927. ( sym: 311; act: 204 ),
  4928. ( sym: 312; act: 205 ),
  4929. ( sym: 313; act: 206 ),
  4930. ( sym: 314; act: 207 ),
  4931. ( sym: 315; act: 208 ),
  4932. ( sym: 316; act: 209 ),
  4933. ( sym: 317; act: 210 ),
  4934. ( sym: 318; act: 211 ),
  4935. ( sym: 319; act: 212 ),
  4936. ( sym: 320; act: 213 ),
  4937. ( sym: 321; act: 214 ),
  4938. { 253: }
  4939. ( sym: 314; act: 207 ),
  4940. ( sym: 315; act: 208 ),
  4941. ( sym: 316; act: 209 ),
  4942. ( sym: 317; act: 210 ),
  4943. ( sym: 318; act: 211 ),
  4944. ( sym: 319; act: 212 ),
  4945. ( sym: 320; act: 213 ),
  4946. ( sym: 321; act: 214 ),
  4947. ( sym: 265; act: -129 ),
  4948. ( sym: 266; act: -129 ),
  4949. ( sym: 267; act: -129 ),
  4950. ( sym: 268; act: -129 ),
  4951. ( sym: 269; act: -129 ),
  4952. ( sym: 270; act: -129 ),
  4953. ( sym: 271; act: -129 ),
  4954. ( sym: 272; act: -129 ),
  4955. ( sym: 273; act: -129 ),
  4956. ( sym: 291; act: -129 ),
  4957. ( sym: 301; act: -129 ),
  4958. ( sym: 304; act: -129 ),
  4959. ( sym: 306; act: -129 ),
  4960. ( sym: 307; act: -129 ),
  4961. ( sym: 308; act: -129 ),
  4962. ( sym: 309; act: -129 ),
  4963. ( sym: 310; act: -129 ),
  4964. ( sym: 311; act: -129 ),
  4965. ( sym: 312; act: -129 ),
  4966. ( sym: 313; act: -129 ),
  4967. ( sym: 324; act: -129 ),
  4968. ( sym: 325; act: -129 ),
  4969. { 254: }
  4970. ( sym: 315; act: 208 ),
  4971. ( sym: 316; act: 209 ),
  4972. ( sym: 317; act: 210 ),
  4973. ( sym: 318; act: 211 ),
  4974. ( sym: 319; act: 212 ),
  4975. ( sym: 320; act: 213 ),
  4976. ( sym: 321; act: 214 ),
  4977. ( sym: 265; act: -130 ),
  4978. ( sym: 266; act: -130 ),
  4979. ( sym: 267; act: -130 ),
  4980. ( sym: 268; act: -130 ),
  4981. ( sym: 269; act: -130 ),
  4982. ( sym: 270; act: -130 ),
  4983. ( sym: 271; act: -130 ),
  4984. ( sym: 272; act: -130 ),
  4985. ( sym: 273; act: -130 ),
  4986. ( sym: 291; act: -130 ),
  4987. ( sym: 301; act: -130 ),
  4988. ( sym: 304; act: -130 ),
  4989. ( sym: 306; act: -130 ),
  4990. ( sym: 307; act: -130 ),
  4991. ( sym: 308; act: -130 ),
  4992. ( sym: 309; act: -130 ),
  4993. ( sym: 310; act: -130 ),
  4994. ( sym: 311; act: -130 ),
  4995. ( sym: 312; act: -130 ),
  4996. ( sym: 313; act: -130 ),
  4997. ( sym: 314; act: -130 ),
  4998. ( sym: 324; act: -130 ),
  4999. ( sym: 325; act: -130 ),
  5000. { 255: }
  5001. ( sym: 317; act: 210 ),
  5002. ( sym: 318; act: 211 ),
  5003. ( sym: 319; act: 212 ),
  5004. ( sym: 320; act: 213 ),
  5005. ( sym: 321; act: 214 ),
  5006. ( sym: 265; act: -125 ),
  5007. ( sym: 266; act: -125 ),
  5008. ( sym: 267; act: -125 ),
  5009. ( sym: 268; act: -125 ),
  5010. ( sym: 269; act: -125 ),
  5011. ( sym: 270; act: -125 ),
  5012. ( sym: 271; act: -125 ),
  5013. ( sym: 272; act: -125 ),
  5014. ( sym: 273; act: -125 ),
  5015. ( sym: 291; act: -125 ),
  5016. ( sym: 301; act: -125 ),
  5017. ( sym: 304; act: -125 ),
  5018. ( sym: 306; act: -125 ),
  5019. ( sym: 307; act: -125 ),
  5020. ( sym: 308; act: -125 ),
  5021. ( sym: 309; act: -125 ),
  5022. ( sym: 310; act: -125 ),
  5023. ( sym: 311; act: -125 ),
  5024. ( sym: 312; act: -125 ),
  5025. ( sym: 313; act: -125 ),
  5026. ( sym: 314; act: -125 ),
  5027. ( sym: 315; act: -125 ),
  5028. ( sym: 316; act: -125 ),
  5029. ( sym: 324; act: -125 ),
  5030. ( sym: 325; act: -125 ),
  5031. { 256: }
  5032. ( sym: 317; act: 210 ),
  5033. ( sym: 318; act: 211 ),
  5034. ( sym: 319; act: 212 ),
  5035. ( sym: 320; act: 213 ),
  5036. ( sym: 321; act: 214 ),
  5037. ( sym: 265; act: -126 ),
  5038. ( sym: 266; act: -126 ),
  5039. ( sym: 267; act: -126 ),
  5040. ( sym: 268; act: -126 ),
  5041. ( sym: 269; act: -126 ),
  5042. ( sym: 270; act: -126 ),
  5043. ( sym: 271; act: -126 ),
  5044. ( sym: 272; act: -126 ),
  5045. ( sym: 273; act: -126 ),
  5046. ( sym: 291; act: -126 ),
  5047. ( sym: 301; act: -126 ),
  5048. ( sym: 304; act: -126 ),
  5049. ( sym: 306; act: -126 ),
  5050. ( sym: 307; act: -126 ),
  5051. ( sym: 308; act: -126 ),
  5052. ( sym: 309; act: -126 ),
  5053. ( sym: 310; act: -126 ),
  5054. ( sym: 311; act: -126 ),
  5055. ( sym: 312; act: -126 ),
  5056. ( sym: 313; act: -126 ),
  5057. ( sym: 314; act: -126 ),
  5058. ( sym: 315; act: -126 ),
  5059. ( sym: 316; act: -126 ),
  5060. ( sym: 324; act: -126 ),
  5061. ( sym: 325; act: -126 ),
  5062. { 257: }
  5063. ( sym: 319; act: 212 ),
  5064. ( sym: 320; act: 213 ),
  5065. ( sym: 321; act: 214 ),
  5066. ( sym: 265; act: -133 ),
  5067. ( sym: 266; act: -133 ),
  5068. ( sym: 267; act: -133 ),
  5069. ( sym: 268; act: -133 ),
  5070. ( sym: 269; act: -133 ),
  5071. ( sym: 270; act: -133 ),
  5072. ( sym: 271; act: -133 ),
  5073. ( sym: 272; act: -133 ),
  5074. ( sym: 273; act: -133 ),
  5075. ( sym: 291; act: -133 ),
  5076. ( sym: 301; act: -133 ),
  5077. ( sym: 304; act: -133 ),
  5078. ( sym: 306; act: -133 ),
  5079. ( sym: 307; act: -133 ),
  5080. ( sym: 308; act: -133 ),
  5081. ( sym: 309; act: -133 ),
  5082. ( sym: 310; act: -133 ),
  5083. ( sym: 311; act: -133 ),
  5084. ( sym: 312; act: -133 ),
  5085. ( sym: 313; act: -133 ),
  5086. ( sym: 314; act: -133 ),
  5087. ( sym: 315; act: -133 ),
  5088. ( sym: 316; act: -133 ),
  5089. ( sym: 317; act: -133 ),
  5090. ( sym: 318; act: -133 ),
  5091. ( sym: 324; act: -133 ),
  5092. ( sym: 325; act: -133 ),
  5093. { 258: }
  5094. ( sym: 319; act: 212 ),
  5095. ( sym: 320; act: 213 ),
  5096. ( sym: 321; act: 214 ),
  5097. ( sym: 265; act: -132 ),
  5098. ( sym: 266; act: -132 ),
  5099. ( sym: 267; act: -132 ),
  5100. ( sym: 268; act: -132 ),
  5101. ( sym: 269; act: -132 ),
  5102. ( sym: 270; act: -132 ),
  5103. ( sym: 271; act: -132 ),
  5104. ( sym: 272; act: -132 ),
  5105. ( sym: 273; act: -132 ),
  5106. ( sym: 291; act: -132 ),
  5107. ( sym: 301; act: -132 ),
  5108. ( sym: 304; act: -132 ),
  5109. ( sym: 306; act: -132 ),
  5110. ( sym: 307; act: -132 ),
  5111. ( sym: 308; act: -132 ),
  5112. ( sym: 309; act: -132 ),
  5113. ( sym: 310; act: -132 ),
  5114. ( sym: 311; act: -132 ),
  5115. ( sym: 312; act: -132 ),
  5116. ( sym: 313; act: -132 ),
  5117. ( sym: 314; act: -132 ),
  5118. ( sym: 315; act: -132 ),
  5119. ( sym: 316; act: -132 ),
  5120. ( sym: 317; act: -132 ),
  5121. ( sym: 318; act: -132 ),
  5122. ( sym: 324; act: -132 ),
  5123. ( sym: 325; act: -132 ),
  5124. { 259: }
  5125. ( sym: 321; act: 214 ),
  5126. ( sym: 265; act: -127 ),
  5127. ( sym: 266; act: -127 ),
  5128. ( sym: 267; act: -127 ),
  5129. ( sym: 268; act: -127 ),
  5130. ( sym: 269; act: -127 ),
  5131. ( sym: 270; act: -127 ),
  5132. ( sym: 271; act: -127 ),
  5133. ( sym: 272; act: -127 ),
  5134. ( sym: 273; act: -127 ),
  5135. ( sym: 291; act: -127 ),
  5136. ( sym: 301; act: -127 ),
  5137. ( sym: 304; act: -127 ),
  5138. ( sym: 306; act: -127 ),
  5139. ( sym: 307; act: -127 ),
  5140. ( sym: 308; act: -127 ),
  5141. ( sym: 309; act: -127 ),
  5142. ( sym: 310; act: -127 ),
  5143. ( sym: 311; act: -127 ),
  5144. ( sym: 312; act: -127 ),
  5145. ( sym: 313; act: -127 ),
  5146. ( sym: 314; act: -127 ),
  5147. ( sym: 315; act: -127 ),
  5148. ( sym: 316; act: -127 ),
  5149. ( sym: 317; act: -127 ),
  5150. ( sym: 318; act: -127 ),
  5151. ( sym: 319; act: -127 ),
  5152. ( sym: 320; act: -127 ),
  5153. ( sym: 324; act: -127 ),
  5154. ( sym: 325; act: -127 ),
  5155. { 260: }
  5156. ( sym: 321; act: 214 ),
  5157. ( sym: 265; act: -128 ),
  5158. ( sym: 266; act: -128 ),
  5159. ( sym: 267; act: -128 ),
  5160. ( sym: 268; act: -128 ),
  5161. ( sym: 269; act: -128 ),
  5162. ( sym: 270; act: -128 ),
  5163. ( sym: 271; act: -128 ),
  5164. ( sym: 272; act: -128 ),
  5165. ( sym: 273; act: -128 ),
  5166. ( sym: 291; act: -128 ),
  5167. ( sym: 301; act: -128 ),
  5168. ( sym: 304; act: -128 ),
  5169. ( sym: 306; act: -128 ),
  5170. ( sym: 307; act: -128 ),
  5171. ( sym: 308; act: -128 ),
  5172. ( sym: 309; act: -128 ),
  5173. ( sym: 310; act: -128 ),
  5174. ( sym: 311; act: -128 ),
  5175. ( sym: 312; act: -128 ),
  5176. ( sym: 313; act: -128 ),
  5177. ( sym: 314; act: -128 ),
  5178. ( sym: 315; act: -128 ),
  5179. ( sym: 316; act: -128 ),
  5180. ( sym: 317; act: -128 ),
  5181. ( sym: 318; act: -128 ),
  5182. ( sym: 319; act: -128 ),
  5183. ( sym: 320; act: -128 ),
  5184. ( sym: 324; act: -128 ),
  5185. ( sym: 325; act: -128 ),
  5186. { 261: }
  5187. ( sym: 321; act: 214 ),
  5188. ( sym: 265; act: -131 ),
  5189. ( sym: 266; act: -131 ),
  5190. ( sym: 267; act: -131 ),
  5191. ( sym: 268; act: -131 ),
  5192. ( sym: 269; act: -131 ),
  5193. ( sym: 270; act: -131 ),
  5194. ( sym: 271; act: -131 ),
  5195. ( sym: 272; act: -131 ),
  5196. ( sym: 273; act: -131 ),
  5197. ( sym: 291; act: -131 ),
  5198. ( sym: 301; act: -131 ),
  5199. ( sym: 304; act: -131 ),
  5200. ( sym: 306; act: -131 ),
  5201. ( sym: 307; act: -131 ),
  5202. ( sym: 308; act: -131 ),
  5203. ( sym: 309; act: -131 ),
  5204. ( sym: 310; act: -131 ),
  5205. ( sym: 311; act: -131 ),
  5206. ( sym: 312; act: -131 ),
  5207. ( sym: 313; act: -131 ),
  5208. ( sym: 314; act: -131 ),
  5209. ( sym: 315; act: -131 ),
  5210. ( sym: 316; act: -131 ),
  5211. ( sym: 317; act: -131 ),
  5212. ( sym: 318; act: -131 ),
  5213. ( sym: 319; act: -131 ),
  5214. ( sym: 320; act: -131 ),
  5215. ( sym: 324; act: -131 ),
  5216. ( sym: 325; act: -131 ),
  5217. { 262: }
  5218. { 263: }
  5219. ( sym: 324; act: 144 ),
  5220. ( sym: 325; act: 145 ),
  5221. ( sym: 265; act: -137 ),
  5222. ( sym: 266; act: -137 ),
  5223. ( sym: 267; act: -137 ),
  5224. ( sym: 268; act: -137 ),
  5225. ( sym: 269; act: -137 ),
  5226. ( sym: 270; act: -137 ),
  5227. ( sym: 271; act: -137 ),
  5228. ( sym: 272; act: -137 ),
  5229. ( sym: 273; act: -137 ),
  5230. ( sym: 291; act: -137 ),
  5231. ( sym: 301; act: -137 ),
  5232. ( sym: 304; act: -137 ),
  5233. ( sym: 306; act: -137 ),
  5234. ( sym: 307; act: -137 ),
  5235. ( sym: 308; act: -137 ),
  5236. ( sym: 309; act: -137 ),
  5237. ( sym: 310; act: -137 ),
  5238. ( sym: 311; act: -137 ),
  5239. ( sym: 312; act: -137 ),
  5240. ( sym: 313; act: -137 ),
  5241. ( sym: 314; act: -137 ),
  5242. ( sym: 315; act: -137 ),
  5243. ( sym: 316; act: -137 ),
  5244. ( sym: 317; act: -137 ),
  5245. ( sym: 318; act: -137 ),
  5246. ( sym: 319; act: -137 ),
  5247. ( sym: 320; act: -137 ),
  5248. ( sym: 321; act: -137 ),
  5249. { 264: }
  5250. ( sym: 292; act: 234 ),
  5251. ( sym: 268; act: -3 ),
  5252. { 265: }
  5253. { 266: }
  5254. ( sym: 268; act: 222 ),
  5255. ( sym: 277; act: 23 ),
  5256. ( sym: 287; act: 223 ),
  5257. ( sym: 288; act: 83 ),
  5258. ( sym: 289; act: 84 ),
  5259. ( sym: 290; act: 85 ),
  5260. ( sym: 314; act: 86 ),
  5261. ( sym: 319; act: 273 ),
  5262. ( sym: 267; act: -116 ),
  5263. ( sym: 269; act: -116 ),
  5264. ( sym: 270; act: -116 ),
  5265. { 267: }
  5266. { 268: }
  5267. ( sym: 269; act: 163 ),
  5268. ( sym: 274; act: 20 ),
  5269. ( sym: 275; act: 21 ),
  5270. ( sym: 276; act: 22 ),
  5271. ( sym: 277; act: 23 ),
  5272. ( sym: 280; act: 24 ),
  5273. ( sym: 281; act: 25 ),
  5274. ( sym: 282; act: 26 ),
  5275. ( sym: 283; act: 27 ),
  5276. ( sym: 284; act: 28 ),
  5277. ( sym: 285; act: 29 ),
  5278. ( sym: 286; act: 164 ),
  5279. ( sym: 287; act: 31 ),
  5280. ( sym: 303; act: 165 ),
  5281. ( sym: 327; act: 32 ),
  5282. { 269: }
  5283. ( sym: 268; act: 107 ),
  5284. ( sym: 277; act: 23 ),
  5285. ( sym: 278; act: 108 ),
  5286. ( sym: 279; act: 109 ),
  5287. ( sym: 280; act: 24 ),
  5288. ( sym: 281; act: 25 ),
  5289. ( sym: 282; act: 26 ),
  5290. ( sym: 283; act: 27 ),
  5291. ( sym: 284; act: 28 ),
  5292. ( sym: 285; act: 29 ),
  5293. ( sym: 286; act: 30 ),
  5294. ( sym: 314; act: 111 ),
  5295. ( sym: 316; act: 112 ),
  5296. ( sym: 321; act: 113 ),
  5297. ( sym: 327; act: 32 ),
  5298. { 270: }
  5299. ( sym: 268; act: 107 ),
  5300. ( sym: 271; act: 291 ),
  5301. ( sym: 277; act: 23 ),
  5302. ( sym: 278; act: 108 ),
  5303. ( sym: 279; act: 109 ),
  5304. ( sym: 280; act: 24 ),
  5305. ( sym: 281; act: 25 ),
  5306. ( sym: 282; act: 26 ),
  5307. ( sym: 283; act: 27 ),
  5308. ( sym: 284; act: 28 ),
  5309. ( sym: 285; act: 29 ),
  5310. ( sym: 286; act: 30 ),
  5311. ( sym: 314; act: 111 ),
  5312. ( sym: 316; act: 112 ),
  5313. ( sym: 321; act: 113 ),
  5314. ( sym: 327; act: 32 ),
  5315. { 271: }
  5316. ( sym: 268; act: 268 ),
  5317. ( sym: 269; act: 292 ),
  5318. ( sym: 270; act: 269 ),
  5319. { 272: }
  5320. ( sym: 268; act: 118 ),
  5321. ( sym: 269; act: 180 ),
  5322. ( sym: 270; act: 270 ),
  5323. { 273: }
  5324. ( sym: 268; act: 222 ),
  5325. ( sym: 277; act: 23 ),
  5326. ( sym: 287; act: 223 ),
  5327. ( sym: 288; act: 83 ),
  5328. ( sym: 289; act: 84 ),
  5329. ( sym: 290; act: 85 ),
  5330. ( sym: 314; act: 86 ),
  5331. ( sym: 319; act: 273 ),
  5332. ( sym: 267; act: -116 ),
  5333. ( sym: 269; act: -116 ),
  5334. ( sym: 270; act: -116 ),
  5335. { 274: }
  5336. ( sym: 268; act: 268 ),
  5337. ( sym: 270; act: 269 ),
  5338. ( sym: 267; act: -108 ),
  5339. ( sym: 269; act: -108 ),
  5340. { 275: }
  5341. ( sym: 268; act: 118 ),
  5342. ( sym: 270; act: 270 ),
  5343. ( sym: 267; act: -94 ),
  5344. ( sym: 269; act: -94 ),
  5345. { 276: }
  5346. ( sym: 270; act: 269 ),
  5347. ( sym: 267; act: -110 ),
  5348. ( sym: 268; act: -110 ),
  5349. ( sym: 269; act: -110 ),
  5350. { 277: }
  5351. ( sym: 268; act: 118 ),
  5352. ( sym: 270; act: 270 ),
  5353. ( sym: 267; act: -85 ),
  5354. ( sym: 269; act: -85 ),
  5355. { 278: }
  5356. ( sym: 269; act: 294 ),
  5357. ( sym: 304; act: 198 ),
  5358. ( sym: 306; act: 199 ),
  5359. ( sym: 307; act: 200 ),
  5360. ( sym: 308; act: 201 ),
  5361. ( sym: 309; act: 202 ),
  5362. ( sym: 310; act: 203 ),
  5363. ( sym: 311; act: 204 ),
  5364. ( sym: 312; act: 205 ),
  5365. ( sym: 313; act: 206 ),
  5366. ( sym: 314; act: 207 ),
  5367. ( sym: 315; act: 208 ),
  5368. ( sym: 316; act: 209 ),
  5369. ( sym: 317; act: 210 ),
  5370. ( sym: 318; act: 211 ),
  5371. ( sym: 319; act: 212 ),
  5372. ( sym: 320; act: 213 ),
  5373. ( sym: 321; act: 214 ),
  5374. { 279: }
  5375. { 280: }
  5376. ( sym: 274; act: 20 ),
  5377. ( sym: 275; act: 21 ),
  5378. ( sym: 276; act: 22 ),
  5379. ( sym: 277; act: 23 ),
  5380. ( sym: 280; act: 24 ),
  5381. ( sym: 281; act: 25 ),
  5382. ( sym: 282; act: 26 ),
  5383. ( sym: 283; act: 27 ),
  5384. ( sym: 284; act: 28 ),
  5385. ( sym: 285; act: 29 ),
  5386. ( sym: 286; act: 30 ),
  5387. ( sym: 287; act: 31 ),
  5388. ( sym: 303; act: 165 ),
  5389. ( sym: 327; act: 32 ),
  5390. ( sym: 269; act: -90 ),
  5391. { 281: }
  5392. ( sym: 269; act: 296 ),
  5393. { 282: }
  5394. { 283: }
  5395. ( sym: 268; act: 107 ),
  5396. ( sym: 277; act: 23 ),
  5397. ( sym: 278; act: 108 ),
  5398. ( sym: 279; act: 109 ),
  5399. ( sym: 280; act: 24 ),
  5400. ( sym: 281; act: 25 ),
  5401. ( sym: 282; act: 26 ),
  5402. ( sym: 283; act: 27 ),
  5403. ( sym: 284; act: 28 ),
  5404. ( sym: 285; act: 29 ),
  5405. ( sym: 286; act: 30 ),
  5406. ( sym: 314; act: 111 ),
  5407. ( sym: 316; act: 112 ),
  5408. ( sym: 321; act: 113 ),
  5409. ( sym: 327; act: 32 ),
  5410. { 284: }
  5411. ( sym: 324; act: 144 ),
  5412. ( sym: 325; act: 145 ),
  5413. ( sym: 265; act: -150 ),
  5414. ( sym: 266; act: -150 ),
  5415. ( sym: 267; act: -150 ),
  5416. ( sym: 268; act: -150 ),
  5417. ( sym: 269; act: -150 ),
  5418. ( sym: 270; act: -150 ),
  5419. ( sym: 271; act: -150 ),
  5420. ( sym: 272; act: -150 ),
  5421. ( sym: 273; act: -150 ),
  5422. ( sym: 291; act: -150 ),
  5423. ( sym: 301; act: -150 ),
  5424. ( sym: 304; act: -150 ),
  5425. ( sym: 306; act: -150 ),
  5426. ( sym: 307; act: -150 ),
  5427. ( sym: 308; act: -150 ),
  5428. ( sym: 309; act: -150 ),
  5429. ( sym: 310; act: -150 ),
  5430. ( sym: 311; act: -150 ),
  5431. ( sym: 312; act: -150 ),
  5432. ( sym: 313; act: -150 ),
  5433. ( sym: 314; act: -150 ),
  5434. ( sym: 315; act: -150 ),
  5435. ( sym: 316; act: -150 ),
  5436. ( sym: 317; act: -150 ),
  5437. ( sym: 318; act: -150 ),
  5438. ( sym: 319; act: -150 ),
  5439. ( sym: 320; act: -150 ),
  5440. ( sym: 321; act: -150 ),
  5441. { 285: }
  5442. ( sym: 268; act: 107 ),
  5443. ( sym: 277; act: 23 ),
  5444. ( sym: 278; act: 108 ),
  5445. ( sym: 279; act: 109 ),
  5446. ( sym: 280; act: 24 ),
  5447. ( sym: 281; act: 25 ),
  5448. ( sym: 282; act: 26 ),
  5449. ( sym: 283; act: 27 ),
  5450. ( sym: 284; act: 28 ),
  5451. ( sym: 285; act: 29 ),
  5452. ( sym: 286; act: 30 ),
  5453. ( sym: 314; act: 111 ),
  5454. ( sym: 316; act: 112 ),
  5455. ( sym: 321; act: 113 ),
  5456. ( sym: 327; act: 32 ),
  5457. { 286: }
  5458. ( sym: 268; act: 299 ),
  5459. { 287: }
  5460. ( sym: 268; act: 268 ),
  5461. ( sym: 270; act: 269 ),
  5462. ( sym: 267; act: -109 ),
  5463. ( sym: 269; act: -109 ),
  5464. { 288: }
  5465. ( sym: 268; act: 118 ),
  5466. ( sym: 270; act: 270 ),
  5467. ( sym: 267; act: -95 ),
  5468. ( sym: 269; act: -95 ),
  5469. { 289: }
  5470. ( sym: 269; act: 300 ),
  5471. { 290: }
  5472. ( sym: 271; act: 301 ),
  5473. ( sym: 304; act: 198 ),
  5474. ( sym: 306; act: 199 ),
  5475. ( sym: 307; act: 200 ),
  5476. ( sym: 308; act: 201 ),
  5477. ( sym: 309; act: 202 ),
  5478. ( sym: 310; act: 203 ),
  5479. ( sym: 311; act: 204 ),
  5480. ( sym: 312; act: 205 ),
  5481. ( sym: 313; act: 206 ),
  5482. ( sym: 314; act: 207 ),
  5483. ( sym: 315; act: 208 ),
  5484. ( sym: 316; act: 209 ),
  5485. ( sym: 317; act: 210 ),
  5486. ( sym: 318; act: 211 ),
  5487. ( sym: 319; act: 212 ),
  5488. ( sym: 320; act: 213 ),
  5489. ( sym: 321; act: 214 ),
  5490. { 291: }
  5491. { 292: }
  5492. { 293: }
  5493. ( sym: 268; act: 118 ),
  5494. ( sym: 270; act: 270 ),
  5495. ( sym: 267; act: -96 ),
  5496. ( sym: 269; act: -96 ),
  5497. { 294: }
  5498. ( sym: 257; act: 174 ),
  5499. ( sym: 266; act: 175 ),
  5500. ( sym: 268; act: 107 ),
  5501. ( sym: 277; act: 23 ),
  5502. ( sym: 278; act: 108 ),
  5503. ( sym: 279; act: 109 ),
  5504. ( sym: 280; act: 24 ),
  5505. ( sym: 281; act: 25 ),
  5506. ( sym: 282; act: 26 ),
  5507. ( sym: 283; act: 27 ),
  5508. ( sym: 284; act: 28 ),
  5509. ( sym: 285; act: 29 ),
  5510. ( sym: 286; act: 30 ),
  5511. ( sym: 314; act: 111 ),
  5512. ( sym: 316; act: 112 ),
  5513. ( sym: 321; act: 113 ),
  5514. ( sym: 327; act: 32 ),
  5515. ( sym: 273; act: -26 ),
  5516. { 295: }
  5517. ( sym: 269; act: 303 ),
  5518. { 296: }
  5519. { 297: }
  5520. ( sym: 324; act: 144 ),
  5521. ( sym: 325; act: 145 ),
  5522. ( sym: 265; act: -151 ),
  5523. ( sym: 266; act: -151 ),
  5524. ( sym: 267; act: -151 ),
  5525. ( sym: 268; act: -151 ),
  5526. ( sym: 269; act: -151 ),
  5527. ( sym: 270; act: -151 ),
  5528. ( sym: 271; act: -151 ),
  5529. ( sym: 272; act: -151 ),
  5530. ( sym: 273; act: -151 ),
  5531. ( sym: 291; act: -151 ),
  5532. ( sym: 301; act: -151 ),
  5533. ( sym: 304; act: -151 ),
  5534. ( sym: 306; act: -151 ),
  5535. ( sym: 307; act: -151 ),
  5536. ( sym: 308; act: -151 ),
  5537. ( sym: 309; act: -151 ),
  5538. ( sym: 310; act: -151 ),
  5539. ( sym: 311; act: -151 ),
  5540. ( sym: 312; act: -151 ),
  5541. ( sym: 313; act: -151 ),
  5542. ( sym: 314; act: -151 ),
  5543. ( sym: 315; act: -151 ),
  5544. ( sym: 316; act: -151 ),
  5545. ( sym: 317; act: -151 ),
  5546. ( sym: 318; act: -151 ),
  5547. ( sym: 319; act: -151 ),
  5548. ( sym: 320; act: -151 ),
  5549. ( sym: 321; act: -151 ),
  5550. { 298: }
  5551. ( sym: 313; act: 206 ),
  5552. ( sym: 314; act: 207 ),
  5553. ( sym: 315; act: 208 ),
  5554. ( sym: 316; act: 209 ),
  5555. ( sym: 317; act: 210 ),
  5556. ( sym: 318; act: 211 ),
  5557. ( sym: 319; act: 212 ),
  5558. ( sym: 320; act: 213 ),
  5559. ( sym: 321; act: 214 ),
  5560. ( sym: 265; act: -136 ),
  5561. ( sym: 266; act: -136 ),
  5562. ( sym: 267; act: -136 ),
  5563. ( sym: 268; act: -136 ),
  5564. ( sym: 269; act: -136 ),
  5565. ( sym: 270; act: -136 ),
  5566. ( sym: 271; act: -136 ),
  5567. ( sym: 272; act: -136 ),
  5568. ( sym: 273; act: -136 ),
  5569. ( sym: 291; act: -136 ),
  5570. ( sym: 301; act: -136 ),
  5571. ( sym: 304; act: -136 ),
  5572. ( sym: 306; act: -136 ),
  5573. ( sym: 307; act: -136 ),
  5574. ( sym: 308; act: -136 ),
  5575. ( sym: 309; act: -136 ),
  5576. ( sym: 310; act: -136 ),
  5577. ( sym: 311; act: -136 ),
  5578. ( sym: 312; act: -136 ),
  5579. ( sym: 324; act: -136 ),
  5580. ( sym: 325; act: -136 ),
  5581. { 299: }
  5582. ( sym: 268; act: 107 ),
  5583. ( sym: 277; act: 23 ),
  5584. ( sym: 278; act: 108 ),
  5585. ( sym: 279; act: 109 ),
  5586. ( sym: 280; act: 24 ),
  5587. ( sym: 281; act: 25 ),
  5588. ( sym: 282; act: 26 ),
  5589. ( sym: 283; act: 27 ),
  5590. ( sym: 284; act: 28 ),
  5591. ( sym: 285; act: 29 ),
  5592. ( sym: 286; act: 30 ),
  5593. ( sym: 314; act: 111 ),
  5594. ( sym: 316; act: 112 ),
  5595. ( sym: 321; act: 113 ),
  5596. ( sym: 327; act: 32 ),
  5597. ( sym: 269; act: -166 ),
  5598. { 300: }
  5599. { 301: }
  5600. { 302: }
  5601. { 303: }
  5602. ( sym: 266; act: 305 ),
  5603. { 304: }
  5604. ( sym: 269; act: 306 )
  5605. { 305: }
  5606. { 306: }
  5607. );
  5608. yyg : array [1..yyngotos] of YYARec = (
  5609. { 0: }
  5610. ( sym: -18; act: 1 ),
  5611. ( sym: -8; act: 2 ),
  5612. ( sym: -7; act: 3 ),
  5613. ( sym: -6; act: 4 ),
  5614. ( sym: -3; act: 5 ),
  5615. ( sym: -2; act: 6 ),
  5616. { 1: }
  5617. { 2: }
  5618. ( sym: -29; act: 15 ),
  5619. ( sym: -27; act: 16 ),
  5620. ( sym: -18; act: 17 ),
  5621. ( sym: -16; act: 18 ),
  5622. ( sym: -11; act: 19 ),
  5623. { 3: }
  5624. { 4: }
  5625. { 5: }
  5626. ( sym: -18; act: 1 ),
  5627. ( sym: -8; act: 2 ),
  5628. ( sym: -7; act: 33 ),
  5629. ( sym: -6; act: 34 ),
  5630. { 6: }
  5631. { 7: }
  5632. ( sym: -5; act: 35 ),
  5633. { 8: }
  5634. ( sym: -29; act: 15 ),
  5635. ( sym: -27; act: 16 ),
  5636. ( sym: -18; act: 17 ),
  5637. ( sym: -16; act: 36 ),
  5638. ( sym: -11; act: 37 ),
  5639. { 9: }
  5640. ( sym: -11; act: 39 ),
  5641. { 10: }
  5642. ( sym: -11; act: 40 ),
  5643. { 11: }
  5644. ( sym: -11; act: 41 ),
  5645. { 12: }
  5646. ( sym: -11; act: 42 ),
  5647. { 13: }
  5648. { 14: }
  5649. { 15: }
  5650. { 16: }
  5651. { 17: }
  5652. { 18: }
  5653. ( sym: -9; act: 43 ),
  5654. { 19: }
  5655. { 20: }
  5656. ( sym: -24; act: 51 ),
  5657. ( sym: -11; act: 40 ),
  5658. { 21: }
  5659. ( sym: -24; act: 54 ),
  5660. ( sym: -11; act: 41 ),
  5661. { 22: }
  5662. ( sym: -26; act: 55 ),
  5663. ( sym: -11; act: 42 ),
  5664. { 23: }
  5665. { 24: }
  5666. { 25: }
  5667. ( sym: -29; act: 59 ),
  5668. { 26: }
  5669. { 27: }
  5670. { 28: }
  5671. { 29: }
  5672. { 30: }
  5673. { 31: }
  5674. ( sym: -29; act: 15 ),
  5675. ( sym: -27; act: 16 ),
  5676. ( sym: -18; act: 17 ),
  5677. ( sym: -16; act: 62 ),
  5678. ( sym: -11; act: 19 ),
  5679. { 32: }
  5680. ( sym: -29; act: 63 ),
  5681. { 33: }
  5682. { 34: }
  5683. { 35: }
  5684. { 36: }
  5685. ( sym: -9; act: 66 ),
  5686. { 37: }
  5687. { 38: }
  5688. ( sym: -24; act: 51 ),
  5689. ( sym: -11; act: 69 ),
  5690. { 39: }
  5691. { 40: }
  5692. ( sym: -24; act: 73 ),
  5693. { 41: }
  5694. ( sym: -24; act: 74 ),
  5695. { 42: }
  5696. ( sym: -26; act: 75 ),
  5697. { 43: }
  5698. ( sym: -32; act: 76 ),
  5699. ( sym: -19; act: 77 ),
  5700. ( sym: -17; act: 78 ),
  5701. ( sym: -11; act: 79 ),
  5702. { 44: }
  5703. { 45: }
  5704. { 46: }
  5705. { 47: }
  5706. { 48: }
  5707. { 49: }
  5708. { 50: }
  5709. { 51: }
  5710. { 52: }
  5711. ( sym: -5; act: 89 ),
  5712. { 53: }
  5713. ( sym: -29; act: 15 ),
  5714. ( sym: -28; act: 90 ),
  5715. ( sym: -27; act: 16 ),
  5716. ( sym: -25; act: 91 ),
  5717. ( sym: -18; act: 17 ),
  5718. ( sym: -16; act: 92 ),
  5719. ( sym: -11; act: 19 ),
  5720. { 54: }
  5721. { 55: }
  5722. { 56: }
  5723. ( sym: -5; act: 94 ),
  5724. { 57: }
  5725. ( sym: -40; act: 95 ),
  5726. ( sym: -21; act: 96 ),
  5727. ( sym: -11; act: 97 ),
  5728. { 58: }
  5729. { 59: }
  5730. { 60: }
  5731. { 61: }
  5732. { 62: }
  5733. { 63: }
  5734. { 64: }
  5735. { 65: }
  5736. { 66: }
  5737. ( sym: -32; act: 76 ),
  5738. ( sym: -19; act: 77 ),
  5739. ( sym: -17; act: 99 ),
  5740. ( sym: -11; act: 79 ),
  5741. { 67: }
  5742. ( sym: -9; act: 100 ),
  5743. { 68: }
  5744. { 69: }
  5745. ( sym: -24; act: 73 ),
  5746. ( sym: -11; act: 101 ),
  5747. { 70: }
  5748. ( sym: -40; act: 95 ),
  5749. ( sym: -21; act: 102 ),
  5750. ( sym: -11; act: 97 ),
  5751. { 71: }
  5752. { 72: }
  5753. ( sym: -37; act: 103 ),
  5754. ( sym: -29; act: 104 ),
  5755. ( sym: -23; act: 105 ),
  5756. ( sym: -11; act: 106 ),
  5757. { 73: }
  5758. { 74: }
  5759. { 75: }
  5760. { 76: }
  5761. { 77: }
  5762. ( sym: -34; act: 117 ),
  5763. { 78: }
  5764. ( sym: -15; act: 120 ),
  5765. ( sym: -10; act: 121 ),
  5766. { 79: }
  5767. ( sym: -33; act: 125 ),
  5768. { 80: }
  5769. ( sym: -5; act: 127 ),
  5770. { 81: }
  5771. ( sym: -32; act: 76 ),
  5772. ( sym: -19; act: 128 ),
  5773. ( sym: -11; act: 79 ),
  5774. { 82: }
  5775. ( sym: -32; act: 76 ),
  5776. ( sym: -19; act: 129 ),
  5777. ( sym: -11; act: 79 ),
  5778. { 83: }
  5779. { 84: }
  5780. { 85: }
  5781. { 86: }
  5782. ( sym: -32; act: 76 ),
  5783. ( sym: -19; act: 130 ),
  5784. ( sym: -11; act: 79 ),
  5785. { 87: }
  5786. ( sym: -32; act: 76 ),
  5787. ( sym: -19; act: 131 ),
  5788. ( sym: -11; act: 79 ),
  5789. { 88: }
  5790. { 89: }
  5791. { 90: }
  5792. ( sym: -29; act: 15 ),
  5793. ( sym: -28; act: 90 ),
  5794. ( sym: -27; act: 16 ),
  5795. ( sym: -25; act: 133 ),
  5796. ( sym: -18; act: 17 ),
  5797. ( sym: -16; act: 92 ),
  5798. ( sym: -11; act: 19 ),
  5799. { 91: }
  5800. { 92: }
  5801. ( sym: -32; act: 76 ),
  5802. ( sym: -19; act: 77 ),
  5803. ( sym: -17; act: 135 ),
  5804. ( sym: -11; act: 79 ),
  5805. { 93: }
  5806. { 94: }
  5807. { 95: }
  5808. { 96: }
  5809. { 97: }
  5810. { 98: }
  5811. { 99: }
  5812. { 100: }
  5813. ( sym: -32; act: 76 ),
  5814. ( sym: -19; act: 141 ),
  5815. ( sym: -11; act: 79 ),
  5816. { 101: }
  5817. { 102: }
  5818. { 103: }
  5819. { 104: }
  5820. { 105: }
  5821. { 106: }
  5822. { 107: }
  5823. ( sym: -37; act: 149 ),
  5824. ( sym: -35; act: 150 ),
  5825. ( sym: -29; act: 151 ),
  5826. ( sym: -27; act: 16 ),
  5827. ( sym: -18; act: 17 ),
  5828. ( sym: -16; act: 152 ),
  5829. ( sym: -13; act: 153 ),
  5830. ( sym: -11; act: 154 ),
  5831. { 108: }
  5832. { 109: }
  5833. { 110: }
  5834. { 111: }
  5835. ( sym: -37; act: 156 ),
  5836. ( sym: -29; act: 104 ),
  5837. ( sym: -11; act: 106 ),
  5838. { 112: }
  5839. ( sym: -37; act: 157 ),
  5840. ( sym: -29; act: 104 ),
  5841. ( sym: -11; act: 106 ),
  5842. { 113: }
  5843. ( sym: -37; act: 158 ),
  5844. ( sym: -29; act: 104 ),
  5845. ( sym: -11; act: 106 ),
  5846. { 114: }
  5847. { 115: }
  5848. { 116: }
  5849. ( sym: -32; act: 76 ),
  5850. ( sym: -19; act: 159 ),
  5851. ( sym: -11; act: 79 ),
  5852. { 117: }
  5853. { 118: }
  5854. ( sym: -30; act: 160 ),
  5855. ( sym: -29; act: 15 ),
  5856. ( sym: -27; act: 16 ),
  5857. ( sym: -20; act: 161 ),
  5858. ( sym: -18; act: 17 ),
  5859. ( sym: -16; act: 162 ),
  5860. ( sym: -11; act: 19 ),
  5861. { 119: }
  5862. ( sym: -37; act: 149 ),
  5863. ( sym: -35; act: 166 ),
  5864. ( sym: -29; act: 104 ),
  5865. ( sym: -13; act: 167 ),
  5866. ( sym: -11; act: 106 ),
  5867. { 120: }
  5868. { 121: }
  5869. { 122: }
  5870. ( sym: -32; act: 76 ),
  5871. ( sym: -19; act: 170 ),
  5872. ( sym: -11; act: 79 ),
  5873. { 123: }
  5874. ( sym: -37; act: 149 ),
  5875. ( sym: -35; act: 166 ),
  5876. ( sym: -29; act: 104 ),
  5877. ( sym: -14; act: 171 ),
  5878. ( sym: -13; act: 172 ),
  5879. ( sym: -12; act: 173 ),
  5880. ( sym: -11; act: 106 ),
  5881. { 124: }
  5882. { 125: }
  5883. ( sym: -37; act: 149 ),
  5884. ( sym: -35; act: 166 ),
  5885. ( sym: -29; act: 104 ),
  5886. ( sym: -13; act: 177 ),
  5887. ( sym: -11; act: 106 ),
  5888. { 126: }
  5889. ( sym: -37; act: 149 ),
  5890. ( sym: -35; act: 166 ),
  5891. ( sym: -29; act: 104 ),
  5892. ( sym: -13; act: 178 ),
  5893. ( sym: -11; act: 106 ),
  5894. { 127: }
  5895. { 128: }
  5896. ( sym: -34; act: 117 ),
  5897. { 129: }
  5898. ( sym: -34; act: 117 ),
  5899. { 130: }
  5900. ( sym: -34; act: 117 ),
  5901. { 131: }
  5902. ( sym: -34; act: 117 ),
  5903. { 132: }
  5904. { 133: }
  5905. { 134: }
  5906. { 135: }
  5907. { 136: }
  5908. { 137: }
  5909. ( sym: -40; act: 95 ),
  5910. ( sym: -21; act: 182 ),
  5911. ( sym: -11; act: 97 ),
  5912. { 138: }
  5913. { 139: }
  5914. ( sym: -37; act: 149 ),
  5915. ( sym: -35; act: 166 ),
  5916. ( sym: -29; act: 104 ),
  5917. ( sym: -13; act: 183 ),
  5918. ( sym: -11; act: 106 ),
  5919. { 140: }
  5920. { 141: }
  5921. ( sym: -34; act: 117 ),
  5922. { 142: }
  5923. { 143: }
  5924. ( sym: -22; act: 185 ),
  5925. ( sym: -4; act: 186 ),
  5926. { 144: }
  5927. ( sym: -37; act: 149 ),
  5928. ( sym: -35; act: 166 ),
  5929. ( sym: -29; act: 104 ),
  5930. ( sym: -13; act: 188 ),
  5931. ( sym: -11; act: 106 ),
  5932. { 145: }
  5933. ( sym: -37; act: 149 ),
  5934. ( sym: -35; act: 166 ),
  5935. ( sym: -29; act: 104 ),
  5936. ( sym: -13; act: 189 ),
  5937. ( sym: -11; act: 106 ),
  5938. { 146: }
  5939. { 147: }
  5940. ( sym: -41; act: 190 ),
  5941. ( sym: -39; act: 191 ),
  5942. ( sym: -37; act: 149 ),
  5943. ( sym: -35; act: 166 ),
  5944. ( sym: -29; act: 104 ),
  5945. ( sym: -13; act: 192 ),
  5946. ( sym: -11; act: 106 ),
  5947. { 148: }
  5948. ( sym: -41; act: 190 ),
  5949. ( sym: -39; act: 193 ),
  5950. ( sym: -37; act: 149 ),
  5951. ( sym: -35; act: 166 ),
  5952. ( sym: -29; act: 104 ),
  5953. ( sym: -13; act: 192 ),
  5954. ( sym: -11; act: 106 ),
  5955. { 149: }
  5956. { 150: }
  5957. { 151: }
  5958. { 152: }
  5959. ( sym: -32; act: 195 ),
  5960. { 153: }
  5961. { 154: }
  5962. { 155: }
  5963. ( sym: -37; act: 216 ),
  5964. ( sym: -29; act: 104 ),
  5965. ( sym: -11; act: 106 ),
  5966. { 156: }
  5967. { 157: }
  5968. { 158: }
  5969. { 159: }
  5970. ( sym: -34; act: 117 ),
  5971. { 160: }
  5972. { 161: }
  5973. { 162: }
  5974. ( sym: -32; act: 219 ),
  5975. ( sym: -31; act: 220 ),
  5976. ( sym: -19; act: 221 ),
  5977. ( sym: -11; act: 79 ),
  5978. { 163: }
  5979. { 164: }
  5980. { 165: }
  5981. { 166: }
  5982. { 167: }
  5983. { 168: }
  5984. { 169: }
  5985. { 170: }
  5986. ( sym: -34; act: 117 ),
  5987. { 171: }
  5988. { 172: }
  5989. { 173: }
  5990. ( sym: -37; act: 149 ),
  5991. ( sym: -35; act: 166 ),
  5992. ( sym: -29; act: 104 ),
  5993. ( sym: -14; act: 229 ),
  5994. ( sym: -13; act: 172 ),
  5995. ( sym: -12; act: 173 ),
  5996. ( sym: -11; act: 106 ),
  5997. { 174: }
  5998. { 175: }
  5999. { 176: }
  6000. ( sym: -11; act: 231 ),
  6001. { 177: }
  6002. { 178: }
  6003. { 179: }
  6004. ( sym: -32; act: 76 ),
  6005. ( sym: -19; act: 77 ),
  6006. ( sym: -17; act: 232 ),
  6007. ( sym: -11; act: 79 ),
  6008. { 180: }
  6009. { 181: }
  6010. { 182: }
  6011. { 183: }
  6012. { 184: }
  6013. ( sym: -4; act: 233 ),
  6014. { 185: }
  6015. { 186: }
  6016. { 187: }
  6017. ( sym: -37; act: 103 ),
  6018. ( sym: -29; act: 104 ),
  6019. ( sym: -23; act: 237 ),
  6020. ( sym: -11; act: 106 ),
  6021. { 188: }
  6022. { 189: }
  6023. { 190: }
  6024. { 191: }
  6025. { 192: }
  6026. { 193: }
  6027. { 194: }
  6028. { 195: }
  6029. { 196: }
  6030. ( sym: -37; act: 242 ),
  6031. ( sym: -29; act: 104 ),
  6032. ( sym: -11; act: 106 ),
  6033. { 197: }
  6034. { 198: }
  6035. ( sym: -37; act: 149 ),
  6036. ( sym: -35; act: 166 ),
  6037. ( sym: -29; act: 104 ),
  6038. ( sym: -13; act: 244 ),
  6039. ( sym: -11; act: 106 ),
  6040. { 199: }
  6041. ( sym: -37; act: 149 ),
  6042. ( sym: -35; act: 166 ),
  6043. ( sym: -29; act: 104 ),
  6044. ( sym: -13; act: 245 ),
  6045. ( sym: -11; act: 106 ),
  6046. { 200: }
  6047. ( sym: -37; act: 149 ),
  6048. ( sym: -35; act: 166 ),
  6049. ( sym: -29; act: 104 ),
  6050. ( sym: -13; act: 246 ),
  6051. ( sym: -11; act: 106 ),
  6052. { 201: }
  6053. ( sym: -37; act: 149 ),
  6054. ( sym: -35; act: 166 ),
  6055. ( sym: -29; act: 104 ),
  6056. ( sym: -13; act: 247 ),
  6057. ( sym: -11; act: 106 ),
  6058. { 202: }
  6059. ( sym: -37; act: 149 ),
  6060. ( sym: -35; act: 166 ),
  6061. ( sym: -29; act: 104 ),
  6062. ( sym: -13; act: 248 ),
  6063. ( sym: -11; act: 106 ),
  6064. { 203: }
  6065. ( sym: -37; act: 149 ),
  6066. ( sym: -35; act: 166 ),
  6067. ( sym: -29; act: 104 ),
  6068. ( sym: -13; act: 249 ),
  6069. ( sym: -11; act: 106 ),
  6070. { 204: }
  6071. ( sym: -37; act: 149 ),
  6072. ( sym: -35; act: 166 ),
  6073. ( sym: -29; act: 104 ),
  6074. ( sym: -13; act: 250 ),
  6075. ( sym: -11; act: 106 ),
  6076. { 205: }
  6077. ( sym: -37; act: 149 ),
  6078. ( sym: -36; act: 251 ),
  6079. ( sym: -35; act: 166 ),
  6080. ( sym: -29; act: 104 ),
  6081. ( sym: -13; act: 252 ),
  6082. ( sym: -11; act: 106 ),
  6083. { 206: }
  6084. ( sym: -37; act: 149 ),
  6085. ( sym: -35; act: 166 ),
  6086. ( sym: -29; act: 104 ),
  6087. ( sym: -13; act: 253 ),
  6088. ( sym: -11; act: 106 ),
  6089. { 207: }
  6090. ( sym: -37; act: 149 ),
  6091. ( sym: -35; act: 166 ),
  6092. ( sym: -29; act: 104 ),
  6093. ( sym: -13; act: 254 ),
  6094. ( sym: -11; act: 106 ),
  6095. { 208: }
  6096. ( sym: -37; act: 149 ),
  6097. ( sym: -35; act: 166 ),
  6098. ( sym: -29; act: 104 ),
  6099. ( sym: -13; act: 255 ),
  6100. ( sym: -11; act: 106 ),
  6101. { 209: }
  6102. ( sym: -37; act: 149 ),
  6103. ( sym: -35; act: 166 ),
  6104. ( sym: -29; act: 104 ),
  6105. ( sym: -13; act: 256 ),
  6106. ( sym: -11; act: 106 ),
  6107. { 210: }
  6108. ( sym: -37; act: 149 ),
  6109. ( sym: -35; act: 166 ),
  6110. ( sym: -29; act: 104 ),
  6111. ( sym: -13; act: 257 ),
  6112. ( sym: -11; act: 106 ),
  6113. { 211: }
  6114. ( sym: -37; act: 149 ),
  6115. ( sym: -35; act: 166 ),
  6116. ( sym: -29; act: 104 ),
  6117. ( sym: -13; act: 258 ),
  6118. ( sym: -11; act: 106 ),
  6119. { 212: }
  6120. ( sym: -37; act: 149 ),
  6121. ( sym: -35; act: 166 ),
  6122. ( sym: -29; act: 104 ),
  6123. ( sym: -13; act: 259 ),
  6124. ( sym: -11; act: 106 ),
  6125. { 213: }
  6126. ( sym: -37; act: 149 ),
  6127. ( sym: -35; act: 166 ),
  6128. ( sym: -29; act: 104 ),
  6129. ( sym: -13; act: 260 ),
  6130. ( sym: -11; act: 106 ),
  6131. { 214: }
  6132. ( sym: -37; act: 149 ),
  6133. ( sym: -35; act: 166 ),
  6134. ( sym: -29; act: 104 ),
  6135. ( sym: -13; act: 261 ),
  6136. ( sym: -11; act: 106 ),
  6137. { 215: }
  6138. ( sym: -38; act: 262 ),
  6139. ( sym: -37; act: 263 ),
  6140. ( sym: -29; act: 104 ),
  6141. ( sym: -11; act: 106 ),
  6142. { 216: }
  6143. { 217: }
  6144. ( sym: -30; act: 160 ),
  6145. ( sym: -29; act: 15 ),
  6146. ( sym: -27; act: 16 ),
  6147. ( sym: -20; act: 265 ),
  6148. ( sym: -18; act: 17 ),
  6149. ( sym: -16; act: 162 ),
  6150. ( sym: -11; act: 19 ),
  6151. { 218: }
  6152. { 219: }
  6153. { 220: }
  6154. ( sym: -34; act: 267 ),
  6155. { 221: }
  6156. ( sym: -34; act: 117 ),
  6157. { 222: }
  6158. ( sym: -32; act: 219 ),
  6159. ( sym: -31; act: 271 ),
  6160. ( sym: -19; act: 272 ),
  6161. ( sym: -11; act: 79 ),
  6162. { 223: }
  6163. ( sym: -32; act: 219 ),
  6164. ( sym: -31; act: 274 ),
  6165. ( sym: -19; act: 275 ),
  6166. ( sym: -11; act: 79 ),
  6167. { 224: }
  6168. ( sym: -32; act: 219 ),
  6169. ( sym: -31; act: 276 ),
  6170. ( sym: -19; act: 277 ),
  6171. ( sym: -11; act: 79 ),
  6172. { 225: }
  6173. { 226: }
  6174. { 227: }
  6175. { 228: }
  6176. { 229: }
  6177. { 230: }
  6178. ( sym: -37; act: 149 ),
  6179. ( sym: -35; act: 166 ),
  6180. ( sym: -29; act: 104 ),
  6181. ( sym: -13; act: 278 ),
  6182. ( sym: -11; act: 106 ),
  6183. { 231: }
  6184. { 232: }
  6185. { 233: }
  6186. { 234: }
  6187. { 235: }
  6188. { 236: }
  6189. ( sym: -37; act: 103 ),
  6190. ( sym: -29; act: 104 ),
  6191. ( sym: -23; act: 281 ),
  6192. ( sym: -11; act: 106 ),
  6193. { 237: }
  6194. { 238: }
  6195. ( sym: -41; act: 190 ),
  6196. ( sym: -39; act: 282 ),
  6197. ( sym: -37; act: 149 ),
  6198. ( sym: -35; act: 166 ),
  6199. ( sym: -29; act: 104 ),
  6200. ( sym: -13; act: 192 ),
  6201. ( sym: -11; act: 106 ),
  6202. { 239: }
  6203. { 240: }
  6204. { 241: }
  6205. { 242: }
  6206. { 243: }
  6207. ( sym: -37; act: 284 ),
  6208. ( sym: -29; act: 104 ),
  6209. ( sym: -11; act: 106 ),
  6210. { 244: }
  6211. { 245: }
  6212. { 246: }
  6213. { 247: }
  6214. { 248: }
  6215. { 249: }
  6216. { 250: }
  6217. { 251: }
  6218. { 252: }
  6219. { 253: }
  6220. { 254: }
  6221. { 255: }
  6222. { 256: }
  6223. { 257: }
  6224. { 258: }
  6225. { 259: }
  6226. { 260: }
  6227. { 261: }
  6228. { 262: }
  6229. { 263: }
  6230. { 264: }
  6231. ( sym: -4; act: 286 ),
  6232. { 265: }
  6233. { 266: }
  6234. ( sym: -32; act: 219 ),
  6235. ( sym: -31; act: 287 ),
  6236. ( sym: -19; act: 288 ),
  6237. ( sym: -11; act: 79 ),
  6238. { 267: }
  6239. { 268: }
  6240. ( sym: -30; act: 160 ),
  6241. ( sym: -29; act: 15 ),
  6242. ( sym: -27; act: 16 ),
  6243. ( sym: -20; act: 289 ),
  6244. ( sym: -18; act: 17 ),
  6245. ( sym: -16; act: 162 ),
  6246. ( sym: -11; act: 19 ),
  6247. { 269: }
  6248. ( sym: -37; act: 149 ),
  6249. ( sym: -35; act: 166 ),
  6250. ( sym: -29; act: 104 ),
  6251. ( sym: -13; act: 290 ),
  6252. ( sym: -11; act: 106 ),
  6253. { 270: }
  6254. ( sym: -37; act: 149 ),
  6255. ( sym: -35; act: 166 ),
  6256. ( sym: -29; act: 104 ),
  6257. ( sym: -13; act: 167 ),
  6258. ( sym: -11; act: 106 ),
  6259. { 271: }
  6260. ( sym: -34; act: 267 ),
  6261. { 272: }
  6262. ( sym: -34; act: 117 ),
  6263. { 273: }
  6264. ( sym: -32; act: 219 ),
  6265. ( sym: -31; act: 276 ),
  6266. ( sym: -19; act: 293 ),
  6267. ( sym: -11; act: 79 ),
  6268. { 274: }
  6269. ( sym: -34; act: 267 ),
  6270. { 275: }
  6271. ( sym: -34; act: 117 ),
  6272. { 276: }
  6273. ( sym: -34; act: 267 ),
  6274. { 277: }
  6275. ( sym: -34; act: 117 ),
  6276. { 278: }
  6277. { 279: }
  6278. { 280: }
  6279. ( sym: -30; act: 160 ),
  6280. ( sym: -29; act: 15 ),
  6281. ( sym: -27; act: 16 ),
  6282. ( sym: -20; act: 295 ),
  6283. ( sym: -18; act: 17 ),
  6284. ( sym: -16; act: 162 ),
  6285. ( sym: -11; act: 19 ),
  6286. { 281: }
  6287. { 282: }
  6288. { 283: }
  6289. ( sym: -37; act: 297 ),
  6290. ( sym: -29; act: 104 ),
  6291. ( sym: -11; act: 106 ),
  6292. { 284: }
  6293. { 285: }
  6294. ( sym: -37; act: 149 ),
  6295. ( sym: -35; act: 166 ),
  6296. ( sym: -29; act: 104 ),
  6297. ( sym: -13; act: 298 ),
  6298. ( sym: -11; act: 106 ),
  6299. { 286: }
  6300. { 287: }
  6301. ( sym: -34; act: 267 ),
  6302. { 288: }
  6303. ( sym: -34; act: 117 ),
  6304. { 289: }
  6305. { 290: }
  6306. { 291: }
  6307. { 292: }
  6308. { 293: }
  6309. ( sym: -34; act: 117 ),
  6310. { 294: }
  6311. ( sym: -37; act: 149 ),
  6312. ( sym: -35; act: 166 ),
  6313. ( sym: -29; act: 104 ),
  6314. ( sym: -14; act: 302 ),
  6315. ( sym: -13; act: 172 ),
  6316. ( sym: -12; act: 173 ),
  6317. ( sym: -11; act: 106 ),
  6318. { 295: }
  6319. { 296: }
  6320. { 297: }
  6321. { 298: }
  6322. { 299: }
  6323. ( sym: -41; act: 190 ),
  6324. ( sym: -39; act: 304 ),
  6325. ( sym: -37; act: 149 ),
  6326. ( sym: -35; act: 166 ),
  6327. ( sym: -29; act: 104 ),
  6328. ( sym: -13; act: 192 ),
  6329. ( sym: -11; act: 106 )
  6330. { 300: }
  6331. { 301: }
  6332. { 302: }
  6333. { 303: }
  6334. { 304: }
  6335. { 305: }
  6336. { 306: }
  6337. );
  6338. yyd : array [0..yynstates-1] of Integer = (
  6339. { 0: } 0,
  6340. { 1: } 0,
  6341. { 2: } 0,
  6342. { 3: } -8,
  6343. { 4: } -7,
  6344. { 5: } 0,
  6345. { 6: } 0,
  6346. { 7: } -4,
  6347. { 8: } 0,
  6348. { 9: } 0,
  6349. { 10: } 0,
  6350. { 11: } 0,
  6351. { 12: } 0,
  6352. { 13: } -9,
  6353. { 14: } -30,
  6354. { 15: } -78,
  6355. { 16: } -60,
  6356. { 17: } -59,
  6357. { 18: } 0,
  6358. { 19: } -79,
  6359. { 20: } 0,
  6360. { 21: } 0,
  6361. { 22: } 0,
  6362. { 23: } -64,
  6363. { 24: } 0,
  6364. { 25: } 0,
  6365. { 26: } 0,
  6366. { 27: } -67,
  6367. { 28: } -74,
  6368. { 29: } -76,
  6369. { 30: } -75,
  6370. { 31: } 0,
  6371. { 32: } 0,
  6372. { 33: } -6,
  6373. { 34: } -5,
  6374. { 35: } 0,
  6375. { 36: } 0,
  6376. { 37: } 0,
  6377. { 38: } 0,
  6378. { 39: } 0,
  6379. { 40: } 0,
  6380. { 41: } 0,
  6381. { 42: } 0,
  6382. { 43: } 0,
  6383. { 44: } -11,
  6384. { 45: } -12,
  6385. { 46: } -13,
  6386. { 47: } -14,
  6387. { 48: } -15,
  6388. { 49: } -16,
  6389. { 50: } -17,
  6390. { 51: } 0,
  6391. { 52: } -4,
  6392. { 53: } 0,
  6393. { 54: } 0,
  6394. { 55: } -58,
  6395. { 56: } -4,
  6396. { 57: } 0,
  6397. { 58: } -73,
  6398. { 59: } -66,
  6399. { 60: } 0,
  6400. { 61: } -69,
  6401. { 62: } -53,
  6402. { 63: } -65,
  6403. { 64: } -35,
  6404. { 65: } -40,
  6405. { 66: } 0,
  6406. { 67: } 0,
  6407. { 68: } -34,
  6408. { 69: } 0,
  6409. { 70: } 0,
  6410. { 71: } -38,
  6411. { 72: } 0,
  6412. { 73: } 0,
  6413. { 74: } 0,
  6414. { 75: } -51,
  6415. { 76: } 0,
  6416. { 77: } 0,
  6417. { 78: } 0,
  6418. { 79: } 0,
  6419. { 80: } -4,
  6420. { 81: } 0,
  6421. { 82: } 0,
  6422. { 83: } -91,
  6423. { 84: } -93,
  6424. { 85: } -92,
  6425. { 86: } 0,
  6426. { 87: } 0,
  6427. { 88: } -56,
  6428. { 89: } 0,
  6429. { 90: } 0,
  6430. { 91: } 0,
  6431. { 92: } 0,
  6432. { 93: } -54,
  6433. { 94: } 0,
  6434. { 95: } 0,
  6435. { 96: } 0,
  6436. { 97: } 0,
  6437. { 98: } -71,
  6438. { 99: } 0,
  6439. { 100: } 0,
  6440. { 101: } 0,
  6441. { 102: } 0,
  6442. { 103: } 0,
  6443. { 104: } -140,
  6444. { 105: } 0,
  6445. { 106: } 0,
  6446. { 107: } 0,
  6447. { 108: } -142,
  6448. { 109: } -141,
  6449. { 110: } -37,
  6450. { 111: } 0,
  6451. { 112: } 0,
  6452. { 113: } 0,
  6453. { 114: } -45,
  6454. { 115: } -47,
  6455. { 116: } 0,
  6456. { 117: } -102,
  6457. { 118: } 0,
  6458. { 119: } 0,
  6459. { 120: } -28,
  6460. { 121: } 0,
  6461. { 122: } 0,
  6462. { 123: } 0,
  6463. { 124: } 0,
  6464. { 125: } 0,
  6465. { 126: } 0,
  6466. { 127: } 0,
  6467. { 128: } 0,
  6468. { 129: } 0,
  6469. { 130: } 0,
  6470. { 131: } 0,
  6471. { 132: } -42,
  6472. { 133: } -61,
  6473. { 134: } -41,
  6474. { 135: } 0,
  6475. { 136: } -44,
  6476. { 137: } 0,
  6477. { 138: } -43,
  6478. { 139: } 0,
  6479. { 140: } -33,
  6480. { 141: } 0,
  6481. { 142: } -31,
  6482. { 143: } 0,
  6483. { 144: } 0,
  6484. { 145: } 0,
  6485. { 146: } -39,
  6486. { 147: } 0,
  6487. { 148: } 0,
  6488. { 149: } 0,
  6489. { 150: } 0,
  6490. { 151: } 0,
  6491. { 152: } 0,
  6492. { 153: } 0,
  6493. { 154: } 0,
  6494. { 155: } 0,
  6495. { 156: } 0,
  6496. { 157: } 0,
  6497. { 158: } 0,
  6498. { 159: } 0,
  6499. { 160: } 0,
  6500. { 161: } 0,
  6501. { 162: } 0,
  6502. { 163: } -106,
  6503. { 164: } 0,
  6504. { 165: } -89,
  6505. { 166: } -117,
  6506. { 167: } 0,
  6507. { 168: } -104,
  6508. { 169: } -29,
  6509. { 170: } 0,
  6510. { 171: } 0,
  6511. { 172: } 0,
  6512. { 173: } 0,
  6513. { 174: } 0,
  6514. { 175: } -25,
  6515. { 176: } 0,
  6516. { 177: } 0,
  6517. { 178: } 0,
  6518. { 179: } 0,
  6519. { 180: } -105,
  6520. { 181: } -63,
  6521. { 182: } -156,
  6522. { 183: } 0,
  6523. { 184: } 0,
  6524. { 185: } 0,
  6525. { 186: } 0,
  6526. { 187: } 0,
  6527. { 188: } -143,
  6528. { 189: } -144,
  6529. { 190: } 0,
  6530. { 191: } 0,
  6531. { 192: } 0,
  6532. { 193: } 0,
  6533. { 194: } -153,
  6534. { 195: } 0,
  6535. { 196: } 0,
  6536. { 197: } 0,
  6537. { 198: } 0,
  6538. { 199: } 0,
  6539. { 200: } 0,
  6540. { 201: } 0,
  6541. { 202: } 0,
  6542. { 203: } 0,
  6543. { 204: } 0,
  6544. { 205: } 0,
  6545. { 206: } 0,
  6546. { 207: } 0,
  6547. { 208: } 0,
  6548. { 209: } 0,
  6549. { 210: } 0,
  6550. { 211: } 0,
  6551. { 212: } 0,
  6552. { 213: } 0,
  6553. { 214: } 0,
  6554. { 215: } 0,
  6555. { 216: } 0,
  6556. { 217: } 0,
  6557. { 218: } -101,
  6558. { 219: } 0,
  6559. { 220: } 0,
  6560. { 221: } 0,
  6561. { 222: } 0,
  6562. { 223: } 0,
  6563. { 224: } 0,
  6564. { 225: } -107,
  6565. { 226: } -103,
  6566. { 227: } -27,
  6567. { 228: } -21,
  6568. { 229: } -23,
  6569. { 230: } 0,
  6570. { 231: } 0,
  6571. { 232: } -81,
  6572. { 233: } 0,
  6573. { 234: } -2,
  6574. { 235: } -36,
  6575. { 236: } 0,
  6576. { 237: } -162,
  6577. { 238: } 0,
  6578. { 239: } -152,
  6579. { 240: } -155,
  6580. { 241: } 0,
  6581. { 242: } 0,
  6582. { 243: } 0,
  6583. { 244: } 0,
  6584. { 245: } 0,
  6585. { 246: } 0,
  6586. { 247: } 0,
  6587. { 248: } 0,
  6588. { 249: } 0,
  6589. { 250: } 0,
  6590. { 251: } -134,
  6591. { 252: } 0,
  6592. { 253: } 0,
  6593. { 254: } 0,
  6594. { 255: } 0,
  6595. { 256: } 0,
  6596. { 257: } 0,
  6597. { 258: } 0,
  6598. { 259: } 0,
  6599. { 260: } 0,
  6600. { 261: } 0,
  6601. { 262: } -148,
  6602. { 263: } 0,
  6603. { 264: } 0,
  6604. { 265: } -88,
  6605. { 266: } 0,
  6606. { 267: } -112,
  6607. { 268: } 0,
  6608. { 269: } 0,
  6609. { 270: } 0,
  6610. { 271: } 0,
  6611. { 272: } 0,
  6612. { 273: } 0,
  6613. { 274: } 0,
  6614. { 275: } 0,
  6615. { 276: } 0,
  6616. { 277: } 0,
  6617. { 278: } 0,
  6618. { 279: } -19,
  6619. { 280: } 0,
  6620. { 281: } 0,
  6621. { 282: } -164,
  6622. { 283: } 0,
  6623. { 284: } 0,
  6624. { 285: } 0,
  6625. { 286: } 0,
  6626. { 287: } 0,
  6627. { 288: } 0,
  6628. { 289: } 0,
  6629. { 290: } 0,
  6630. { 291: } -104,
  6631. { 292: } -115,
  6632. { 293: } 0,
  6633. { 294: } 0,
  6634. { 295: } 0,
  6635. { 296: } -163,
  6636. { 297: } 0,
  6637. { 298: } 0,
  6638. { 299: } 0,
  6639. { 300: } -111,
  6640. { 301: } -113,
  6641. { 302: } -22,
  6642. { 303: } 0,
  6643. { 304: } 0,
  6644. { 305: } -32,
  6645. { 306: } -154
  6646. );
  6647. yyal : array [0..yynstates-1] of Integer = (
  6648. { 0: } 1,
  6649. { 1: } 18,
  6650. { 2: } 19,
  6651. { 3: } 32,
  6652. { 4: } 32,
  6653. { 5: } 32,
  6654. { 6: } 50,
  6655. { 7: } 51,
  6656. { 8: } 51,
  6657. { 9: } 64,
  6658. { 10: } 65,
  6659. { 11: } 66,
  6660. { 12: } 67,
  6661. { 13: } 68,
  6662. { 14: } 68,
  6663. { 15: } 68,
  6664. { 16: } 68,
  6665. { 17: } 68,
  6666. { 18: } 68,
  6667. { 19: } 84,
  6668. { 20: } 84,
  6669. { 21: } 87,
  6670. { 22: } 90,
  6671. { 23: } 93,
  6672. { 24: } 93,
  6673. { 25: } 137,
  6674. { 26: } 188,
  6675. { 27: } 233,
  6676. { 28: } 233,
  6677. { 29: } 233,
  6678. { 30: } 233,
  6679. { 31: } 233,
  6680. { 32: } 246,
  6681. { 33: } 254,
  6682. { 34: } 254,
  6683. { 35: } 254,
  6684. { 36: } 256,
  6685. { 37: } 272,
  6686. { 38: } 289,
  6687. { 39: } 292,
  6688. { 40: } 295,
  6689. { 41: } 316,
  6690. { 42: } 337,
  6691. { 43: } 358,
  6692. { 44: } 367,
  6693. { 45: } 367,
  6694. { 46: } 367,
  6695. { 47: } 367,
  6696. { 48: } 367,
  6697. { 49: } 367,
  6698. { 50: } 367,
  6699. { 51: } 367,
  6700. { 52: } 387,
  6701. { 53: } 387,
  6702. { 54: } 400,
  6703. { 55: } 420,
  6704. { 56: } 420,
  6705. { 57: } 420,
  6706. { 58: } 422,
  6707. { 59: } 422,
  6708. { 60: } 422,
  6709. { 61: } 466,
  6710. { 62: } 466,
  6711. { 63: } 466,
  6712. { 64: } 466,
  6713. { 65: } 466,
  6714. { 66: } 466,
  6715. { 67: } 475,
  6716. { 68: } 490,
  6717. { 69: } 490,
  6718. { 70: } 507,
  6719. { 71: } 509,
  6720. { 72: } 509,
  6721. { 73: } 525,
  6722. { 74: } 546,
  6723. { 75: } 567,
  6724. { 76: } 567,
  6725. { 77: } 568,
  6726. { 78: } 574,
  6727. { 79: } 578,
  6728. { 80: } 586,
  6729. { 81: } 586,
  6730. { 82: } 594,
  6731. { 83: } 602,
  6732. { 84: } 602,
  6733. { 85: } 602,
  6734. { 86: } 602,
  6735. { 87: } 610,
  6736. { 88: } 618,
  6737. { 89: } 618,
  6738. { 90: } 619,
  6739. { 91: } 633,
  6740. { 92: } 634,
  6741. { 93: } 643,
  6742. { 94: } 643,
  6743. { 95: } 644,
  6744. { 96: } 647,
  6745. { 97: } 648,
  6746. { 98: } 652,
  6747. { 99: } 652,
  6748. { 100: } 654,
  6749. { 101: } 662,
  6750. { 102: } 663,
  6751. { 103: } 664,
  6752. { 104: } 668,
  6753. { 105: } 668,
  6754. { 106: } 669,
  6755. { 107: } 699,
  6756. { 108: } 719,
  6757. { 109: } 719,
  6758. { 110: } 719,
  6759. { 111: } 719,
  6760. { 112: } 734,
  6761. { 113: } 749,
  6762. { 114: } 764,
  6763. { 115: } 764,
  6764. { 116: } 764,
  6765. { 117: } 772,
  6766. { 118: } 772,
  6767. { 119: } 787,
  6768. { 120: } 803,
  6769. { 121: } 803,
  6770. { 122: } 804,
  6771. { 123: } 812,
  6772. { 124: } 830,
  6773. { 125: } 831,
  6774. { 126: } 846,
  6775. { 127: } 861,
  6776. { 128: } 865,
  6777. { 129: } 868,
  6778. { 130: } 875,
  6779. { 131: } 882,
  6780. { 132: } 889,
  6781. { 133: } 889,
  6782. { 134: } 889,
  6783. { 135: } 889,
  6784. { 136: } 891,
  6785. { 137: } 891,
  6786. { 138: } 894,
  6787. { 139: } 894,
  6788. { 140: } 909,
  6789. { 141: } 909,
  6790. { 142: } 912,
  6791. { 143: } 912,
  6792. { 144: } 914,
  6793. { 145: } 929,
  6794. { 146: } 944,
  6795. { 147: } 944,
  6796. { 148: } 960,
  6797. { 149: } 976,
  6798. { 150: } 1006,
  6799. { 151: } 1024,
  6800. { 152: } 1047,
  6801. { 153: } 1052,
  6802. { 154: } 1069,
  6803. { 155: } 1094,
  6804. { 156: } 1109,
  6805. { 157: } 1139,
  6806. { 158: } 1169,
  6807. { 159: } 1199,
  6808. { 160: } 1206,
  6809. { 161: } 1208,
  6810. { 162: } 1209,
  6811. { 163: } 1220,
  6812. { 164: } 1220,
  6813. { 165: } 1231,
  6814. { 166: } 1231,
  6815. { 167: } 1231,
  6816. { 168: } 1249,
  6817. { 169: } 1249,
  6818. { 170: } 1249,
  6819. { 171: } 1255,
  6820. { 172: } 1256,
  6821. { 173: } 1274,
  6822. { 174: } 1292,
  6823. { 175: } 1293,
  6824. { 176: } 1293,
  6825. { 177: } 1294,
  6826. { 178: } 1318,
  6827. { 179: } 1342,
  6828. { 180: } 1351,
  6829. { 181: } 1351,
  6830. { 182: } 1351,
  6831. { 183: } 1351,
  6832. { 184: } 1371,
  6833. { 185: } 1373,
  6834. { 186: } 1374,
  6835. { 187: } 1375,
  6836. { 188: } 1390,
  6837. { 189: } 1390,
  6838. { 190: } 1390,
  6839. { 191: } 1393,
  6840. { 192: } 1394,
  6841. { 193: } 1414,
  6842. { 194: } 1415,
  6843. { 195: } 1415,
  6844. { 196: } 1416,
  6845. { 197: } 1431,
  6846. { 198: } 1432,
  6847. { 199: } 1447,
  6848. { 200: } 1462,
  6849. { 201: } 1477,
  6850. { 202: } 1492,
  6851. { 203: } 1507,
  6852. { 204: } 1522,
  6853. { 205: } 1537,
  6854. { 206: } 1552,
  6855. { 207: } 1567,
  6856. { 208: } 1582,
  6857. { 209: } 1597,
  6858. { 210: } 1612,
  6859. { 211: } 1627,
  6860. { 212: } 1642,
  6861. { 213: } 1657,
  6862. { 214: } 1672,
  6863. { 215: } 1687,
  6864. { 216: } 1728,
  6865. { 217: } 1731,
  6866. { 218: } 1746,
  6867. { 219: } 1746,
  6868. { 220: } 1747,
  6869. { 221: } 1751,
  6870. { 222: } 1755,
  6871. { 223: } 1765,
  6872. { 224: } 1776,
  6873. { 225: } 1787,
  6874. { 226: } 1787,
  6875. { 227: } 1787,
  6876. { 228: } 1787,
  6877. { 229: } 1787,
  6878. { 230: } 1787,
  6879. { 231: } 1802,
  6880. { 232: } 1803,
  6881. { 233: } 1803,
  6882. { 234: } 1804,
  6883. { 235: } 1804,
  6884. { 236: } 1804,
  6885. { 237: } 1819,
  6886. { 238: } 1819,
  6887. { 239: } 1836,
  6888. { 240: } 1836,
  6889. { 241: } 1836,
  6890. { 242: } 1837,
  6891. { 243: } 1867,
  6892. { 244: } 1882,
  6893. { 245: } 1912,
  6894. { 246: } 1942,
  6895. { 247: } 1972,
  6896. { 248: } 2002,
  6897. { 249: } 2032,
  6898. { 250: } 2062,
  6899. { 251: } 2092,
  6900. { 252: } 2092,
  6901. { 253: } 2110,
  6902. { 254: } 2140,
  6903. { 255: } 2170,
  6904. { 256: } 2200,
  6905. { 257: } 2230,
  6906. { 258: } 2260,
  6907. { 259: } 2290,
  6908. { 260: } 2320,
  6909. { 261: } 2350,
  6910. { 262: } 2380,
  6911. { 263: } 2380,
  6912. { 264: } 2410,
  6913. { 265: } 2412,
  6914. { 266: } 2412,
  6915. { 267: } 2423,
  6916. { 268: } 2423,
  6917. { 269: } 2438,
  6918. { 270: } 2453,
  6919. { 271: } 2469,
  6920. { 272: } 2472,
  6921. { 273: } 2475,
  6922. { 274: } 2486,
  6923. { 275: } 2490,
  6924. { 276: } 2494,
  6925. { 277: } 2498,
  6926. { 278: } 2502,
  6927. { 279: } 2520,
  6928. { 280: } 2520,
  6929. { 281: } 2535,
  6930. { 282: } 2536,
  6931. { 283: } 2536,
  6932. { 284: } 2551,
  6933. { 285: } 2581,
  6934. { 286: } 2596,
  6935. { 287: } 2597,
  6936. { 288: } 2601,
  6937. { 289: } 2605,
  6938. { 290: } 2606,
  6939. { 291: } 2624,
  6940. { 292: } 2624,
  6941. { 293: } 2624,
  6942. { 294: } 2628,
  6943. { 295: } 2646,
  6944. { 296: } 2647,
  6945. { 297: } 2647,
  6946. { 298: } 2677,
  6947. { 299: } 2707,
  6948. { 300: } 2723,
  6949. { 301: } 2723,
  6950. { 302: } 2723,
  6951. { 303: } 2723,
  6952. { 304: } 2724,
  6953. { 305: } 2725,
  6954. { 306: } 2725
  6955. );
  6956. yyah : array [0..yynstates-1] of Integer = (
  6957. { 0: } 17,
  6958. { 1: } 18,
  6959. { 2: } 31,
  6960. { 3: } 31,
  6961. { 4: } 31,
  6962. { 5: } 49,
  6963. { 6: } 50,
  6964. { 7: } 50,
  6965. { 8: } 63,
  6966. { 9: } 64,
  6967. { 10: } 65,
  6968. { 11: } 66,
  6969. { 12: } 67,
  6970. { 13: } 67,
  6971. { 14: } 67,
  6972. { 15: } 67,
  6973. { 16: } 67,
  6974. { 17: } 67,
  6975. { 18: } 83,
  6976. { 19: } 83,
  6977. { 20: } 86,
  6978. { 21: } 89,
  6979. { 22: } 92,
  6980. { 23: } 92,
  6981. { 24: } 136,
  6982. { 25: } 187,
  6983. { 26: } 232,
  6984. { 27: } 232,
  6985. { 28: } 232,
  6986. { 29: } 232,
  6987. { 30: } 232,
  6988. { 31: } 245,
  6989. { 32: } 253,
  6990. { 33: } 253,
  6991. { 34: } 253,
  6992. { 35: } 255,
  6993. { 36: } 271,
  6994. { 37: } 288,
  6995. { 38: } 291,
  6996. { 39: } 294,
  6997. { 40: } 315,
  6998. { 41: } 336,
  6999. { 42: } 357,
  7000. { 43: } 366,
  7001. { 44: } 366,
  7002. { 45: } 366,
  7003. { 46: } 366,
  7004. { 47: } 366,
  7005. { 48: } 366,
  7006. { 49: } 366,
  7007. { 50: } 366,
  7008. { 51: } 386,
  7009. { 52: } 386,
  7010. { 53: } 399,
  7011. { 54: } 419,
  7012. { 55: } 419,
  7013. { 56: } 419,
  7014. { 57: } 421,
  7015. { 58: } 421,
  7016. { 59: } 421,
  7017. { 60: } 465,
  7018. { 61: } 465,
  7019. { 62: } 465,
  7020. { 63: } 465,
  7021. { 64: } 465,
  7022. { 65: } 465,
  7023. { 66: } 474,
  7024. { 67: } 489,
  7025. { 68: } 489,
  7026. { 69: } 506,
  7027. { 70: } 508,
  7028. { 71: } 508,
  7029. { 72: } 524,
  7030. { 73: } 545,
  7031. { 74: } 566,
  7032. { 75: } 566,
  7033. { 76: } 567,
  7034. { 77: } 573,
  7035. { 78: } 577,
  7036. { 79: } 585,
  7037. { 80: } 585,
  7038. { 81: } 593,
  7039. { 82: } 601,
  7040. { 83: } 601,
  7041. { 84: } 601,
  7042. { 85: } 601,
  7043. { 86: } 609,
  7044. { 87: } 617,
  7045. { 88: } 617,
  7046. { 89: } 618,
  7047. { 90: } 632,
  7048. { 91: } 633,
  7049. { 92: } 642,
  7050. { 93: } 642,
  7051. { 94: } 643,
  7052. { 95: } 646,
  7053. { 96: } 647,
  7054. { 97: } 651,
  7055. { 98: } 651,
  7056. { 99: } 653,
  7057. { 100: } 661,
  7058. { 101: } 662,
  7059. { 102: } 663,
  7060. { 103: } 667,
  7061. { 104: } 667,
  7062. { 105: } 668,
  7063. { 106: } 698,
  7064. { 107: } 718,
  7065. { 108: } 718,
  7066. { 109: } 718,
  7067. { 110: } 718,
  7068. { 111: } 733,
  7069. { 112: } 748,
  7070. { 113: } 763,
  7071. { 114: } 763,
  7072. { 115: } 763,
  7073. { 116: } 771,
  7074. { 117: } 771,
  7075. { 118: } 786,
  7076. { 119: } 802,
  7077. { 120: } 802,
  7078. { 121: } 803,
  7079. { 122: } 811,
  7080. { 123: } 829,
  7081. { 124: } 830,
  7082. { 125: } 845,
  7083. { 126: } 860,
  7084. { 127: } 864,
  7085. { 128: } 867,
  7086. { 129: } 874,
  7087. { 130: } 881,
  7088. { 131: } 888,
  7089. { 132: } 888,
  7090. { 133: } 888,
  7091. { 134: } 888,
  7092. { 135: } 890,
  7093. { 136: } 890,
  7094. { 137: } 893,
  7095. { 138: } 893,
  7096. { 139: } 908,
  7097. { 140: } 908,
  7098. { 141: } 911,
  7099. { 142: } 911,
  7100. { 143: } 913,
  7101. { 144: } 928,
  7102. { 145: } 943,
  7103. { 146: } 943,
  7104. { 147: } 959,
  7105. { 148: } 975,
  7106. { 149: } 1005,
  7107. { 150: } 1023,
  7108. { 151: } 1046,
  7109. { 152: } 1051,
  7110. { 153: } 1068,
  7111. { 154: } 1093,
  7112. { 155: } 1108,
  7113. { 156: } 1138,
  7114. { 157: } 1168,
  7115. { 158: } 1198,
  7116. { 159: } 1205,
  7117. { 160: } 1207,
  7118. { 161: } 1208,
  7119. { 162: } 1219,
  7120. { 163: } 1219,
  7121. { 164: } 1230,
  7122. { 165: } 1230,
  7123. { 166: } 1230,
  7124. { 167: } 1248,
  7125. { 168: } 1248,
  7126. { 169: } 1248,
  7127. { 170: } 1254,
  7128. { 171: } 1255,
  7129. { 172: } 1273,
  7130. { 173: } 1291,
  7131. { 174: } 1292,
  7132. { 175: } 1292,
  7133. { 176: } 1293,
  7134. { 177: } 1317,
  7135. { 178: } 1341,
  7136. { 179: } 1350,
  7137. { 180: } 1350,
  7138. { 181: } 1350,
  7139. { 182: } 1350,
  7140. { 183: } 1370,
  7141. { 184: } 1372,
  7142. { 185: } 1373,
  7143. { 186: } 1374,
  7144. { 187: } 1389,
  7145. { 188: } 1389,
  7146. { 189: } 1389,
  7147. { 190: } 1392,
  7148. { 191: } 1393,
  7149. { 192: } 1413,
  7150. { 193: } 1414,
  7151. { 194: } 1414,
  7152. { 195: } 1415,
  7153. { 196: } 1430,
  7154. { 197: } 1431,
  7155. { 198: } 1446,
  7156. { 199: } 1461,
  7157. { 200: } 1476,
  7158. { 201: } 1491,
  7159. { 202: } 1506,
  7160. { 203: } 1521,
  7161. { 204: } 1536,
  7162. { 205: } 1551,
  7163. { 206: } 1566,
  7164. { 207: } 1581,
  7165. { 208: } 1596,
  7166. { 209: } 1611,
  7167. { 210: } 1626,
  7168. { 211: } 1641,
  7169. { 212: } 1656,
  7170. { 213: } 1671,
  7171. { 214: } 1686,
  7172. { 215: } 1727,
  7173. { 216: } 1730,
  7174. { 217: } 1745,
  7175. { 218: } 1745,
  7176. { 219: } 1746,
  7177. { 220: } 1750,
  7178. { 221: } 1754,
  7179. { 222: } 1764,
  7180. { 223: } 1775,
  7181. { 224: } 1786,
  7182. { 225: } 1786,
  7183. { 226: } 1786,
  7184. { 227: } 1786,
  7185. { 228: } 1786,
  7186. { 229: } 1786,
  7187. { 230: } 1801,
  7188. { 231: } 1802,
  7189. { 232: } 1802,
  7190. { 233: } 1803,
  7191. { 234: } 1803,
  7192. { 235: } 1803,
  7193. { 236: } 1818,
  7194. { 237: } 1818,
  7195. { 238: } 1835,
  7196. { 239: } 1835,
  7197. { 240: } 1835,
  7198. { 241: } 1836,
  7199. { 242: } 1866,
  7200. { 243: } 1881,
  7201. { 244: } 1911,
  7202. { 245: } 1941,
  7203. { 246: } 1971,
  7204. { 247: } 2001,
  7205. { 248: } 2031,
  7206. { 249: } 2061,
  7207. { 250: } 2091,
  7208. { 251: } 2091,
  7209. { 252: } 2109,
  7210. { 253: } 2139,
  7211. { 254: } 2169,
  7212. { 255: } 2199,
  7213. { 256: } 2229,
  7214. { 257: } 2259,
  7215. { 258: } 2289,
  7216. { 259: } 2319,
  7217. { 260: } 2349,
  7218. { 261: } 2379,
  7219. { 262: } 2379,
  7220. { 263: } 2409,
  7221. { 264: } 2411,
  7222. { 265: } 2411,
  7223. { 266: } 2422,
  7224. { 267: } 2422,
  7225. { 268: } 2437,
  7226. { 269: } 2452,
  7227. { 270: } 2468,
  7228. { 271: } 2471,
  7229. { 272: } 2474,
  7230. { 273: } 2485,
  7231. { 274: } 2489,
  7232. { 275: } 2493,
  7233. { 276: } 2497,
  7234. { 277: } 2501,
  7235. { 278: } 2519,
  7236. { 279: } 2519,
  7237. { 280: } 2534,
  7238. { 281: } 2535,
  7239. { 282: } 2535,
  7240. { 283: } 2550,
  7241. { 284: } 2580,
  7242. { 285: } 2595,
  7243. { 286: } 2596,
  7244. { 287: } 2600,
  7245. { 288: } 2604,
  7246. { 289: } 2605,
  7247. { 290: } 2623,
  7248. { 291: } 2623,
  7249. { 292: } 2623,
  7250. { 293: } 2627,
  7251. { 294: } 2645,
  7252. { 295: } 2646,
  7253. { 296: } 2646,
  7254. { 297: } 2676,
  7255. { 298: } 2706,
  7256. { 299: } 2722,
  7257. { 300: } 2722,
  7258. { 301: } 2722,
  7259. { 302: } 2722,
  7260. { 303: } 2723,
  7261. { 304: } 2724,
  7262. { 305: } 2724,
  7263. { 306: } 2724
  7264. );
  7265. yygl : array [0..yynstates-1] of Integer = (
  7266. { 0: } 1,
  7267. { 1: } 7,
  7268. { 2: } 7,
  7269. { 3: } 12,
  7270. { 4: } 12,
  7271. { 5: } 12,
  7272. { 6: } 16,
  7273. { 7: } 16,
  7274. { 8: } 17,
  7275. { 9: } 22,
  7276. { 10: } 23,
  7277. { 11: } 24,
  7278. { 12: } 25,
  7279. { 13: } 26,
  7280. { 14: } 26,
  7281. { 15: } 26,
  7282. { 16: } 26,
  7283. { 17: } 26,
  7284. { 18: } 26,
  7285. { 19: } 27,
  7286. { 20: } 27,
  7287. { 21: } 29,
  7288. { 22: } 31,
  7289. { 23: } 33,
  7290. { 24: } 33,
  7291. { 25: } 33,
  7292. { 26: } 34,
  7293. { 27: } 34,
  7294. { 28: } 34,
  7295. { 29: } 34,
  7296. { 30: } 34,
  7297. { 31: } 34,
  7298. { 32: } 39,
  7299. { 33: } 40,
  7300. { 34: } 40,
  7301. { 35: } 40,
  7302. { 36: } 40,
  7303. { 37: } 41,
  7304. { 38: } 41,
  7305. { 39: } 43,
  7306. { 40: } 43,
  7307. { 41: } 44,
  7308. { 42: } 45,
  7309. { 43: } 46,
  7310. { 44: } 50,
  7311. { 45: } 50,
  7312. { 46: } 50,
  7313. { 47: } 50,
  7314. { 48: } 50,
  7315. { 49: } 50,
  7316. { 50: } 50,
  7317. { 51: } 50,
  7318. { 52: } 50,
  7319. { 53: } 51,
  7320. { 54: } 58,
  7321. { 55: } 58,
  7322. { 56: } 58,
  7323. { 57: } 59,
  7324. { 58: } 62,
  7325. { 59: } 62,
  7326. { 60: } 62,
  7327. { 61: } 62,
  7328. { 62: } 62,
  7329. { 63: } 62,
  7330. { 64: } 62,
  7331. { 65: } 62,
  7332. { 66: } 62,
  7333. { 67: } 66,
  7334. { 68: } 67,
  7335. { 69: } 67,
  7336. { 70: } 69,
  7337. { 71: } 72,
  7338. { 72: } 72,
  7339. { 73: } 76,
  7340. { 74: } 76,
  7341. { 75: } 76,
  7342. { 76: } 76,
  7343. { 77: } 76,
  7344. { 78: } 77,
  7345. { 79: } 79,
  7346. { 80: } 80,
  7347. { 81: } 81,
  7348. { 82: } 84,
  7349. { 83: } 87,
  7350. { 84: } 87,
  7351. { 85: } 87,
  7352. { 86: } 87,
  7353. { 87: } 90,
  7354. { 88: } 93,
  7355. { 89: } 93,
  7356. { 90: } 93,
  7357. { 91: } 100,
  7358. { 92: } 100,
  7359. { 93: } 104,
  7360. { 94: } 104,
  7361. { 95: } 104,
  7362. { 96: } 104,
  7363. { 97: } 104,
  7364. { 98: } 104,
  7365. { 99: } 104,
  7366. { 100: } 104,
  7367. { 101: } 107,
  7368. { 102: } 107,
  7369. { 103: } 107,
  7370. { 104: } 107,
  7371. { 105: } 107,
  7372. { 106: } 107,
  7373. { 107: } 107,
  7374. { 108: } 115,
  7375. { 109: } 115,
  7376. { 110: } 115,
  7377. { 111: } 115,
  7378. { 112: } 118,
  7379. { 113: } 121,
  7380. { 114: } 124,
  7381. { 115: } 124,
  7382. { 116: } 124,
  7383. { 117: } 127,
  7384. { 118: } 127,
  7385. { 119: } 134,
  7386. { 120: } 139,
  7387. { 121: } 139,
  7388. { 122: } 139,
  7389. { 123: } 142,
  7390. { 124: } 149,
  7391. { 125: } 149,
  7392. { 126: } 154,
  7393. { 127: } 159,
  7394. { 128: } 159,
  7395. { 129: } 160,
  7396. { 130: } 161,
  7397. { 131: } 162,
  7398. { 132: } 163,
  7399. { 133: } 163,
  7400. { 134: } 163,
  7401. { 135: } 163,
  7402. { 136: } 163,
  7403. { 137: } 163,
  7404. { 138: } 166,
  7405. { 139: } 166,
  7406. { 140: } 171,
  7407. { 141: } 171,
  7408. { 142: } 172,
  7409. { 143: } 172,
  7410. { 144: } 174,
  7411. { 145: } 179,
  7412. { 146: } 184,
  7413. { 147: } 184,
  7414. { 148: } 191,
  7415. { 149: } 198,
  7416. { 150: } 198,
  7417. { 151: } 198,
  7418. { 152: } 198,
  7419. { 153: } 199,
  7420. { 154: } 199,
  7421. { 155: } 199,
  7422. { 156: } 202,
  7423. { 157: } 202,
  7424. { 158: } 202,
  7425. { 159: } 202,
  7426. { 160: } 203,
  7427. { 161: } 203,
  7428. { 162: } 203,
  7429. { 163: } 207,
  7430. { 164: } 207,
  7431. { 165: } 207,
  7432. { 166: } 207,
  7433. { 167: } 207,
  7434. { 168: } 207,
  7435. { 169: } 207,
  7436. { 170: } 207,
  7437. { 171: } 208,
  7438. { 172: } 208,
  7439. { 173: } 208,
  7440. { 174: } 215,
  7441. { 175: } 215,
  7442. { 176: } 215,
  7443. { 177: } 216,
  7444. { 178: } 216,
  7445. { 179: } 216,
  7446. { 180: } 220,
  7447. { 181: } 220,
  7448. { 182: } 220,
  7449. { 183: } 220,
  7450. { 184: } 220,
  7451. { 185: } 221,
  7452. { 186: } 221,
  7453. { 187: } 221,
  7454. { 188: } 225,
  7455. { 189: } 225,
  7456. { 190: } 225,
  7457. { 191: } 225,
  7458. { 192: } 225,
  7459. { 193: } 225,
  7460. { 194: } 225,
  7461. { 195: } 225,
  7462. { 196: } 225,
  7463. { 197: } 228,
  7464. { 198: } 228,
  7465. { 199: } 233,
  7466. { 200: } 238,
  7467. { 201: } 243,
  7468. { 202: } 248,
  7469. { 203: } 253,
  7470. { 204: } 258,
  7471. { 205: } 263,
  7472. { 206: } 269,
  7473. { 207: } 274,
  7474. { 208: } 279,
  7475. { 209: } 284,
  7476. { 210: } 289,
  7477. { 211: } 294,
  7478. { 212: } 299,
  7479. { 213: } 304,
  7480. { 214: } 309,
  7481. { 215: } 314,
  7482. { 216: } 318,
  7483. { 217: } 318,
  7484. { 218: } 325,
  7485. { 219: } 325,
  7486. { 220: } 325,
  7487. { 221: } 326,
  7488. { 222: } 327,
  7489. { 223: } 331,
  7490. { 224: } 335,
  7491. { 225: } 339,
  7492. { 226: } 339,
  7493. { 227: } 339,
  7494. { 228: } 339,
  7495. { 229: } 339,
  7496. { 230: } 339,
  7497. { 231: } 344,
  7498. { 232: } 344,
  7499. { 233: } 344,
  7500. { 234: } 344,
  7501. { 235: } 344,
  7502. { 236: } 344,
  7503. { 237: } 348,
  7504. { 238: } 348,
  7505. { 239: } 355,
  7506. { 240: } 355,
  7507. { 241: } 355,
  7508. { 242: } 355,
  7509. { 243: } 355,
  7510. { 244: } 358,
  7511. { 245: } 358,
  7512. { 246: } 358,
  7513. { 247: } 358,
  7514. { 248: } 358,
  7515. { 249: } 358,
  7516. { 250: } 358,
  7517. { 251: } 358,
  7518. { 252: } 358,
  7519. { 253: } 358,
  7520. { 254: } 358,
  7521. { 255: } 358,
  7522. { 256: } 358,
  7523. { 257: } 358,
  7524. { 258: } 358,
  7525. { 259: } 358,
  7526. { 260: } 358,
  7527. { 261: } 358,
  7528. { 262: } 358,
  7529. { 263: } 358,
  7530. { 264: } 358,
  7531. { 265: } 359,
  7532. { 266: } 359,
  7533. { 267: } 363,
  7534. { 268: } 363,
  7535. { 269: } 370,
  7536. { 270: } 375,
  7537. { 271: } 380,
  7538. { 272: } 381,
  7539. { 273: } 382,
  7540. { 274: } 386,
  7541. { 275: } 387,
  7542. { 276: } 388,
  7543. { 277: } 389,
  7544. { 278: } 390,
  7545. { 279: } 390,
  7546. { 280: } 390,
  7547. { 281: } 397,
  7548. { 282: } 397,
  7549. { 283: } 397,
  7550. { 284: } 400,
  7551. { 285: } 400,
  7552. { 286: } 405,
  7553. { 287: } 405,
  7554. { 288: } 406,
  7555. { 289: } 407,
  7556. { 290: } 407,
  7557. { 291: } 407,
  7558. { 292: } 407,
  7559. { 293: } 407,
  7560. { 294: } 408,
  7561. { 295: } 415,
  7562. { 296: } 415,
  7563. { 297: } 415,
  7564. { 298: } 415,
  7565. { 299: } 415,
  7566. { 300: } 422,
  7567. { 301: } 422,
  7568. { 302: } 422,
  7569. { 303: } 422,
  7570. { 304: } 422,
  7571. { 305: } 422,
  7572. { 306: } 422
  7573. );
  7574. yygh : array [0..yynstates-1] of Integer = (
  7575. { 0: } 6,
  7576. { 1: } 6,
  7577. { 2: } 11,
  7578. { 3: } 11,
  7579. { 4: } 11,
  7580. { 5: } 15,
  7581. { 6: } 15,
  7582. { 7: } 16,
  7583. { 8: } 21,
  7584. { 9: } 22,
  7585. { 10: } 23,
  7586. { 11: } 24,
  7587. { 12: } 25,
  7588. { 13: } 25,
  7589. { 14: } 25,
  7590. { 15: } 25,
  7591. { 16: } 25,
  7592. { 17: } 25,
  7593. { 18: } 26,
  7594. { 19: } 26,
  7595. { 20: } 28,
  7596. { 21: } 30,
  7597. { 22: } 32,
  7598. { 23: } 32,
  7599. { 24: } 32,
  7600. { 25: } 33,
  7601. { 26: } 33,
  7602. { 27: } 33,
  7603. { 28: } 33,
  7604. { 29: } 33,
  7605. { 30: } 33,
  7606. { 31: } 38,
  7607. { 32: } 39,
  7608. { 33: } 39,
  7609. { 34: } 39,
  7610. { 35: } 39,
  7611. { 36: } 40,
  7612. { 37: } 40,
  7613. { 38: } 42,
  7614. { 39: } 42,
  7615. { 40: } 43,
  7616. { 41: } 44,
  7617. { 42: } 45,
  7618. { 43: } 49,
  7619. { 44: } 49,
  7620. { 45: } 49,
  7621. { 46: } 49,
  7622. { 47: } 49,
  7623. { 48: } 49,
  7624. { 49: } 49,
  7625. { 50: } 49,
  7626. { 51: } 49,
  7627. { 52: } 50,
  7628. { 53: } 57,
  7629. { 54: } 57,
  7630. { 55: } 57,
  7631. { 56: } 58,
  7632. { 57: } 61,
  7633. { 58: } 61,
  7634. { 59: } 61,
  7635. { 60: } 61,
  7636. { 61: } 61,
  7637. { 62: } 61,
  7638. { 63: } 61,
  7639. { 64: } 61,
  7640. { 65: } 61,
  7641. { 66: } 65,
  7642. { 67: } 66,
  7643. { 68: } 66,
  7644. { 69: } 68,
  7645. { 70: } 71,
  7646. { 71: } 71,
  7647. { 72: } 75,
  7648. { 73: } 75,
  7649. { 74: } 75,
  7650. { 75: } 75,
  7651. { 76: } 75,
  7652. { 77: } 76,
  7653. { 78: } 78,
  7654. { 79: } 79,
  7655. { 80: } 80,
  7656. { 81: } 83,
  7657. { 82: } 86,
  7658. { 83: } 86,
  7659. { 84: } 86,
  7660. { 85: } 86,
  7661. { 86: } 89,
  7662. { 87: } 92,
  7663. { 88: } 92,
  7664. { 89: } 92,
  7665. { 90: } 99,
  7666. { 91: } 99,
  7667. { 92: } 103,
  7668. { 93: } 103,
  7669. { 94: } 103,
  7670. { 95: } 103,
  7671. { 96: } 103,
  7672. { 97: } 103,
  7673. { 98: } 103,
  7674. { 99: } 103,
  7675. { 100: } 106,
  7676. { 101: } 106,
  7677. { 102: } 106,
  7678. { 103: } 106,
  7679. { 104: } 106,
  7680. { 105: } 106,
  7681. { 106: } 106,
  7682. { 107: } 114,
  7683. { 108: } 114,
  7684. { 109: } 114,
  7685. { 110: } 114,
  7686. { 111: } 117,
  7687. { 112: } 120,
  7688. { 113: } 123,
  7689. { 114: } 123,
  7690. { 115: } 123,
  7691. { 116: } 126,
  7692. { 117: } 126,
  7693. { 118: } 133,
  7694. { 119: } 138,
  7695. { 120: } 138,
  7696. { 121: } 138,
  7697. { 122: } 141,
  7698. { 123: } 148,
  7699. { 124: } 148,
  7700. { 125: } 153,
  7701. { 126: } 158,
  7702. { 127: } 158,
  7703. { 128: } 159,
  7704. { 129: } 160,
  7705. { 130: } 161,
  7706. { 131: } 162,
  7707. { 132: } 162,
  7708. { 133: } 162,
  7709. { 134: } 162,
  7710. { 135: } 162,
  7711. { 136: } 162,
  7712. { 137: } 165,
  7713. { 138: } 165,
  7714. { 139: } 170,
  7715. { 140: } 170,
  7716. { 141: } 171,
  7717. { 142: } 171,
  7718. { 143: } 173,
  7719. { 144: } 178,
  7720. { 145: } 183,
  7721. { 146: } 183,
  7722. { 147: } 190,
  7723. { 148: } 197,
  7724. { 149: } 197,
  7725. { 150: } 197,
  7726. { 151: } 197,
  7727. { 152: } 198,
  7728. { 153: } 198,
  7729. { 154: } 198,
  7730. { 155: } 201,
  7731. { 156: } 201,
  7732. { 157: } 201,
  7733. { 158: } 201,
  7734. { 159: } 202,
  7735. { 160: } 202,
  7736. { 161: } 202,
  7737. { 162: } 206,
  7738. { 163: } 206,
  7739. { 164: } 206,
  7740. { 165: } 206,
  7741. { 166: } 206,
  7742. { 167: } 206,
  7743. { 168: } 206,
  7744. { 169: } 206,
  7745. { 170: } 207,
  7746. { 171: } 207,
  7747. { 172: } 207,
  7748. { 173: } 214,
  7749. { 174: } 214,
  7750. { 175: } 214,
  7751. { 176: } 215,
  7752. { 177: } 215,
  7753. { 178: } 215,
  7754. { 179: } 219,
  7755. { 180: } 219,
  7756. { 181: } 219,
  7757. { 182: } 219,
  7758. { 183: } 219,
  7759. { 184: } 220,
  7760. { 185: } 220,
  7761. { 186: } 220,
  7762. { 187: } 224,
  7763. { 188: } 224,
  7764. { 189: } 224,
  7765. { 190: } 224,
  7766. { 191: } 224,
  7767. { 192: } 224,
  7768. { 193: } 224,
  7769. { 194: } 224,
  7770. { 195: } 224,
  7771. { 196: } 227,
  7772. { 197: } 227,
  7773. { 198: } 232,
  7774. { 199: } 237,
  7775. { 200: } 242,
  7776. { 201: } 247,
  7777. { 202: } 252,
  7778. { 203: } 257,
  7779. { 204: } 262,
  7780. { 205: } 268,
  7781. { 206: } 273,
  7782. { 207: } 278,
  7783. { 208: } 283,
  7784. { 209: } 288,
  7785. { 210: } 293,
  7786. { 211: } 298,
  7787. { 212: } 303,
  7788. { 213: } 308,
  7789. { 214: } 313,
  7790. { 215: } 317,
  7791. { 216: } 317,
  7792. { 217: } 324,
  7793. { 218: } 324,
  7794. { 219: } 324,
  7795. { 220: } 325,
  7796. { 221: } 326,
  7797. { 222: } 330,
  7798. { 223: } 334,
  7799. { 224: } 338,
  7800. { 225: } 338,
  7801. { 226: } 338,
  7802. { 227: } 338,
  7803. { 228: } 338,
  7804. { 229: } 338,
  7805. { 230: } 343,
  7806. { 231: } 343,
  7807. { 232: } 343,
  7808. { 233: } 343,
  7809. { 234: } 343,
  7810. { 235: } 343,
  7811. { 236: } 347,
  7812. { 237: } 347,
  7813. { 238: } 354,
  7814. { 239: } 354,
  7815. { 240: } 354,
  7816. { 241: } 354,
  7817. { 242: } 354,
  7818. { 243: } 357,
  7819. { 244: } 357,
  7820. { 245: } 357,
  7821. { 246: } 357,
  7822. { 247: } 357,
  7823. { 248: } 357,
  7824. { 249: } 357,
  7825. { 250: } 357,
  7826. { 251: } 357,
  7827. { 252: } 357,
  7828. { 253: } 357,
  7829. { 254: } 357,
  7830. { 255: } 357,
  7831. { 256: } 357,
  7832. { 257: } 357,
  7833. { 258: } 357,
  7834. { 259: } 357,
  7835. { 260: } 357,
  7836. { 261: } 357,
  7837. { 262: } 357,
  7838. { 263: } 357,
  7839. { 264: } 358,
  7840. { 265: } 358,
  7841. { 266: } 362,
  7842. { 267: } 362,
  7843. { 268: } 369,
  7844. { 269: } 374,
  7845. { 270: } 379,
  7846. { 271: } 380,
  7847. { 272: } 381,
  7848. { 273: } 385,
  7849. { 274: } 386,
  7850. { 275: } 387,
  7851. { 276: } 388,
  7852. { 277: } 389,
  7853. { 278: } 389,
  7854. { 279: } 389,
  7855. { 280: } 396,
  7856. { 281: } 396,
  7857. { 282: } 396,
  7858. { 283: } 399,
  7859. { 284: } 399,
  7860. { 285: } 404,
  7861. { 286: } 404,
  7862. { 287: } 405,
  7863. { 288: } 406,
  7864. { 289: } 406,
  7865. { 290: } 406,
  7866. { 291: } 406,
  7867. { 292: } 406,
  7868. { 293: } 407,
  7869. { 294: } 414,
  7870. { 295: } 414,
  7871. { 296: } 414,
  7872. { 297: } 414,
  7873. { 298: } 414,
  7874. { 299: } 421,
  7875. { 300: } 421,
  7876. { 301: } 421,
  7877. { 302: } 421,
  7878. { 303: } 421,
  7879. { 304: } 421,
  7880. { 305: } 421,
  7881. { 306: } 421
  7882. );
  7883. yyr : array [1..yynrules] of YYRRec = (
  7884. { 1: } ( len: 1; sym: -2 ),
  7885. { 2: } ( len: 1; sym: -4 ),
  7886. { 3: } ( len: 0; sym: -4 ),
  7887. { 4: } ( len: 0; sym: -5 ),
  7888. { 5: } ( len: 2; sym: -3 ),
  7889. { 6: } ( len: 2; sym: -3 ),
  7890. { 7: } ( len: 1; sym: -3 ),
  7891. { 8: } ( len: 1; sym: -3 ),
  7892. { 9: } ( len: 1; sym: -8 ),
  7893. { 10: } ( len: 0; sym: -8 ),
  7894. { 11: } ( len: 1; sym: -9 ),
  7895. { 12: } ( len: 1; sym: -9 ),
  7896. { 13: } ( len: 1; sym: -9 ),
  7897. { 14: } ( len: 1; sym: -9 ),
  7898. { 15: } ( len: 1; sym: -9 ),
  7899. { 16: } ( len: 1; sym: -9 ),
  7900. { 17: } ( len: 1; sym: -9 ),
  7901. { 18: } ( len: 0; sym: -9 ),
  7902. { 19: } ( len: 4; sym: -10 ),
  7903. { 20: } ( len: 0; sym: -10 ),
  7904. { 21: } ( len: 2; sym: -12 ),
  7905. { 22: } ( len: 5; sym: -12 ),
  7906. { 23: } ( len: 2; sym: -14 ),
  7907. { 24: } ( len: 1; sym: -14 ),
  7908. { 25: } ( len: 1; sym: -14 ),
  7909. { 26: } ( len: 0; sym: -14 ),
  7910. { 27: } ( len: 3; sym: -15 ),
  7911. { 28: } ( len: 5; sym: -6 ),
  7912. { 29: } ( len: 6; sym: -6 ),
  7913. { 30: } ( len: 2; sym: -6 ),
  7914. { 31: } ( len: 5; sym: -6 ),
  7915. { 32: } ( len: 11; sym: -6 ),
  7916. { 33: } ( len: 5; sym: -6 ),
  7917. { 34: } ( len: 3; sym: -6 ),
  7918. { 35: } ( len: 3; sym: -6 ),
  7919. { 36: } ( len: 7; sym: -7 ),
  7920. { 37: } ( len: 4; sym: -7 ),
  7921. { 38: } ( len: 3; sym: -7 ),
  7922. { 39: } ( len: 5; sym: -7 ),
  7923. { 40: } ( len: 3; sym: -7 ),
  7924. { 41: } ( len: 3; sym: -24 ),
  7925. { 42: } ( len: 3; sym: -24 ),
  7926. { 43: } ( len: 3; sym: -26 ),
  7927. { 44: } ( len: 3; sym: -26 ),
  7928. { 45: } ( len: 4; sym: -18 ),
  7929. { 46: } ( len: 3; sym: -18 ),
  7930. { 47: } ( len: 4; sym: -18 ),
  7931. { 48: } ( len: 3; sym: -18 ),
  7932. { 49: } ( len: 2; sym: -18 ),
  7933. { 50: } ( len: 2; sym: -18 ),
  7934. { 51: } ( len: 3; sym: -18 ),
  7935. { 52: } ( len: 2; sym: -18 ),
  7936. { 53: } ( len: 2; sym: -16 ),
  7937. { 54: } ( len: 3; sym: -16 ),
  7938. { 55: } ( len: 2; sym: -16 ),
  7939. { 56: } ( len: 3; sym: -16 ),
  7940. { 57: } ( len: 2; sym: -16 ),
  7941. { 58: } ( len: 2; sym: -16 ),
  7942. { 59: } ( len: 1; sym: -16 ),
  7943. { 60: } ( len: 1; sym: -16 ),
  7944. { 61: } ( len: 2; sym: -25 ),
  7945. { 62: } ( len: 1; sym: -25 ),
  7946. { 63: } ( len: 3; sym: -28 ),
  7947. { 64: } ( len: 1; sym: -11 ),
  7948. { 65: } ( len: 2; sym: -29 ),
  7949. { 66: } ( len: 2; sym: -29 ),
  7950. { 67: } ( len: 1; sym: -29 ),
  7951. { 68: } ( len: 1; sym: -29 ),
  7952. { 69: } ( len: 2; sym: -29 ),
  7953. { 70: } ( len: 2; sym: -29 ),
  7954. { 71: } ( len: 3; sym: -29 ),
  7955. { 72: } ( len: 1; sym: -29 ),
  7956. { 73: } ( len: 2; sym: -29 ),
  7957. { 74: } ( len: 1; sym: -29 ),
  7958. { 75: } ( len: 1; sym: -29 ),
  7959. { 76: } ( len: 1; sym: -29 ),
  7960. { 77: } ( len: 1; sym: -29 ),
  7961. { 78: } ( len: 1; sym: -27 ),
  7962. { 79: } ( len: 1; sym: -27 ),
  7963. { 80: } ( len: 3; sym: -17 ),
  7964. { 81: } ( len: 4; sym: -17 ),
  7965. { 82: } ( len: 2; sym: -17 ),
  7966. { 83: } ( len: 1; sym: -17 ),
  7967. { 84: } ( len: 2; sym: -30 ),
  7968. { 85: } ( len: 3; sym: -30 ),
  7969. { 86: } ( len: 2; sym: -30 ),
  7970. { 87: } ( len: 1; sym: -20 ),
  7971. { 88: } ( len: 3; sym: -20 ),
  7972. { 89: } ( len: 1; sym: -20 ),
  7973. { 90: } ( len: 0; sym: -20 ),
  7974. { 91: } ( len: 1; sym: -32 ),
  7975. { 92: } ( len: 1; sym: -32 ),
  7976. { 93: } ( len: 1; sym: -32 ),
  7977. { 94: } ( len: 2; sym: -19 ),
  7978. { 95: } ( len: 3; sym: -19 ),
  7979. { 96: } ( len: 2; sym: -19 ),
  7980. { 97: } ( len: 2; sym: -19 ),
  7981. { 98: } ( len: 3; sym: -19 ),
  7982. { 99: } ( len: 3; sym: -19 ),
  7983. { 100: } ( len: 1; sym: -19 ),
  7984. { 101: } ( len: 4; sym: -19 ),
  7985. { 102: } ( len: 2; sym: -19 ),
  7986. { 103: } ( len: 4; sym: -19 ),
  7987. { 104: } ( len: 3; sym: -19 ),
  7988. { 105: } ( len: 3; sym: -19 ),
  7989. { 106: } ( len: 2; sym: -34 ),
  7990. { 107: } ( len: 3; sym: -34 ),
  7991. { 108: } ( len: 2; sym: -31 ),
  7992. { 109: } ( len: 3; sym: -31 ),
  7993. { 110: } ( len: 2; sym: -31 ),
  7994. { 111: } ( len: 4; sym: -31 ),
  7995. { 112: } ( len: 2; sym: -31 ),
  7996. { 113: } ( len: 4; sym: -31 ),
  7997. { 114: } ( len: 3; sym: -31 ),
  7998. { 115: } ( len: 3; sym: -31 ),
  7999. { 116: } ( len: 0; sym: -31 ),
  8000. { 117: } ( len: 1; sym: -13 ),
  8001. { 118: } ( len: 3; sym: -35 ),
  8002. { 119: } ( len: 3; sym: -35 ),
  8003. { 120: } ( len: 3; sym: -35 ),
  8004. { 121: } ( len: 3; sym: -35 ),
  8005. { 122: } ( len: 3; sym: -35 ),
  8006. { 123: } ( len: 3; sym: -35 ),
  8007. { 124: } ( len: 3; sym: -35 ),
  8008. { 125: } ( len: 3; sym: -35 ),
  8009. { 126: } ( len: 3; sym: -35 ),
  8010. { 127: } ( len: 3; sym: -35 ),
  8011. { 128: } ( len: 3; sym: -35 ),
  8012. { 129: } ( len: 3; sym: -35 ),
  8013. { 130: } ( len: 3; sym: -35 ),
  8014. { 131: } ( len: 3; sym: -35 ),
  8015. { 132: } ( len: 3; sym: -35 ),
  8016. { 133: } ( len: 3; sym: -35 ),
  8017. { 134: } ( len: 3; sym: -35 ),
  8018. { 135: } ( len: 1; sym: -35 ),
  8019. { 136: } ( len: 3; sym: -36 ),
  8020. { 137: } ( len: 1; sym: -38 ),
  8021. { 138: } ( len: 0; sym: -38 ),
  8022. { 139: } ( len: 1; sym: -37 ),
  8023. { 140: } ( len: 1; sym: -37 ),
  8024. { 141: } ( len: 1; sym: -37 ),
  8025. { 142: } ( len: 1; sym: -37 ),
  8026. { 143: } ( len: 3; sym: -37 ),
  8027. { 144: } ( len: 3; sym: -37 ),
  8028. { 145: } ( len: 2; sym: -37 ),
  8029. { 146: } ( len: 2; sym: -37 ),
  8030. { 147: } ( len: 2; sym: -37 ),
  8031. { 148: } ( len: 4; sym: -37 ),
  8032. { 149: } ( len: 4; sym: -37 ),
  8033. { 150: } ( len: 5; sym: -37 ),
  8034. { 151: } ( len: 6; sym: -37 ),
  8035. { 152: } ( len: 4; sym: -37 ),
  8036. { 153: } ( len: 3; sym: -37 ),
  8037. { 154: } ( len: 8; sym: -37 ),
  8038. { 155: } ( len: 4; sym: -37 ),
  8039. { 156: } ( len: 3; sym: -21 ),
  8040. { 157: } ( len: 1; sym: -21 ),
  8041. { 158: } ( len: 0; sym: -21 ),
  8042. { 159: } ( len: 3; sym: -40 ),
  8043. { 160: } ( len: 1; sym: -40 ),
  8044. { 161: } ( len: 1; sym: -23 ),
  8045. { 162: } ( len: 2; sym: -22 ),
  8046. { 163: } ( len: 4; sym: -22 ),
  8047. { 164: } ( len: 3; sym: -39 ),
  8048. { 165: } ( len: 1; sym: -39 ),
  8049. { 166: } ( len: 0; sym: -39 ),
  8050. { 167: } ( len: 1; sym: -41 )
  8051. );
  8052. const _error = 256; (* error token *)
  8053. function yyact(state, sym : Integer; var act : Integer) : Boolean;
  8054. (* search action table *)
  8055. var k : Integer;
  8056. begin
  8057. k := yyal[state];
  8058. while (k<=yyah[state]) and (yya[k].sym<>sym) do inc(k);
  8059. if k>yyah[state] then
  8060. yyact := false
  8061. else
  8062. begin
  8063. act := yya[k].act;
  8064. yyact := true;
  8065. end;
  8066. end(*yyact*);
  8067. function yygoto(state, sym : Integer; var nstate : Integer) : Boolean;
  8068. (* search goto table *)
  8069. var k : Integer;
  8070. begin
  8071. k := yygl[state];
  8072. while (k<=yygh[state]) and (yyg[k].sym<>sym) do inc(k);
  8073. if k>yygh[state] then
  8074. yygoto := false
  8075. else
  8076. begin
  8077. nstate := yyg[k].act;
  8078. yygoto := true;
  8079. end;
  8080. end(*yygoto*);
  8081. label parse, next, error, errlab, shift, reduce, accept, abort;
  8082. begin(*yyparse*)
  8083. (* initialize: *)
  8084. yystate := 0; yychar := -1; yynerrs := 0; yyerrflag := 0; yysp := 0;
  8085. {$ifdef yydebug}
  8086. yydebug := true;
  8087. {$else}
  8088. yydebug := false;
  8089. {$endif}
  8090. parse:
  8091. (* push state and value: *)
  8092. inc(yysp);
  8093. if yysp>yymaxdepth then
  8094. begin
  8095. yyerror('yyparse stack overflow');
  8096. goto abort;
  8097. end;
  8098. yys[yysp] := yystate; yyv[yysp] := yyval;
  8099. next:
  8100. if (yyd[yystate]=0) and (yychar=-1) then
  8101. (* get next symbol *)
  8102. begin
  8103. yychar := yylex; if yychar<0 then yychar := 0;
  8104. end;
  8105. if yydebug then writeln('state ', yystate, ', char ', yychar);
  8106. (* determine parse action: *)
  8107. yyn := yyd[yystate];
  8108. if yyn<>0 then goto reduce; (* simple state *)
  8109. (* no default action; search parse table *)
  8110. if not yyact(yystate, yychar, yyn) then goto error
  8111. else if yyn>0 then goto shift
  8112. else if yyn<0 then goto reduce
  8113. else goto accept;
  8114. error:
  8115. (* error; start error recovery: *)
  8116. if yyerrflag=0 then yyerror('syntax error');
  8117. errlab:
  8118. if yyerrflag=0 then inc(yynerrs); (* new error *)
  8119. if yyerrflag<=2 then (* incomplete recovery; try again *)
  8120. begin
  8121. yyerrflag := 3;
  8122. (* uncover a state with shift action on error token *)
  8123. while (yysp>0) and not ( yyact(yys[yysp], _error, yyn) and
  8124. (yyn>0) ) do
  8125. begin
  8126. if yydebug then
  8127. if yysp>1 then
  8128. writeln('error recovery pops state ', yys[yysp], ', uncovers ',
  8129. yys[yysp-1])
  8130. else
  8131. writeln('error recovery fails ... abort');
  8132. dec(yysp);
  8133. end;
  8134. if yysp=0 then goto abort; (* parser has fallen from stack; abort *)
  8135. yystate := yyn; (* simulate shift on error *)
  8136. goto parse;
  8137. end
  8138. else (* no shift yet; discard symbol *)
  8139. begin
  8140. if yydebug then writeln('error recovery discards char ', yychar);
  8141. if yychar=0 then goto abort; (* end of input; abort *)
  8142. yychar := -1; goto next; (* clear lookahead char and try again *)
  8143. end;
  8144. shift:
  8145. (* go to new state, clear lookahead character: *)
  8146. yystate := yyn; yychar := -1; yyval := yylval;
  8147. if yyerrflag>0 then dec(yyerrflag);
  8148. goto parse;
  8149. reduce:
  8150. (* execute action, pop rule from stack, and go to next state: *)
  8151. if yydebug then writeln('reduce ', -yyn);
  8152. yyflag := yyfnone; yyaction(-yyn);
  8153. dec(yysp, yyr[-yyn].len);
  8154. if yygoto(yys[yysp], yyr[-yyn].sym, yyn) then yystate := yyn;
  8155. (* handle action calls to yyaccept, yyabort and yyerror: *)
  8156. case yyflag of
  8157. yyfaccept : goto accept;
  8158. yyfabort : goto abort;
  8159. yyferror : goto errlab;
  8160. end;
  8161. goto parse;
  8162. accept:
  8163. yyparse := 0; exit;
  8164. abort:
  8165. yyparse := 1; exit;
  8166. end(*yyparse*);
  8167. function yylex : Integer;
  8168. begin
  8169. yylex:=scan.yylex;
  8170. line_no:=yylineno;
  8171. end;
  8172. procedure WriteFileHeader(var headerfile: Text);
  8173. var
  8174. i: integer;
  8175. originalstr: string;
  8176. begin
  8177. { write unit header }
  8178. if not includefile then
  8179. begin
  8180. if createdynlib then
  8181. writeln(headerfile,'{$mode objfpc}');
  8182. writeln(headerfile,'unit ',unitname,';');
  8183. writeln(headerfile,'interface');
  8184. writeln(headerfile);
  8185. writeln(headerfile,'{');
  8186. writeln(headerfile,' Automatically converted by H2Pas ',version,' from ',inputfilename);
  8187. writeln(headerfile,' The following command line parameters were used:');
  8188. for i:=1 to paramcount do
  8189. writeln(headerfile,' ',paramstr(i));
  8190. writeln(headerfile,'}');
  8191. writeln(headerfile);
  8192. end;
  8193. if UseName then
  8194. begin
  8195. writeln(headerfile,aktspace,'const');
  8196. writeln(headerfile,aktspace,' External_library=''',libfilename,'''; {Setup as you need}');
  8197. writeln(headerfile);
  8198. end;
  8199. if UsePPointers then
  8200. begin
  8201. Writeln(headerfile,aktspace,'{ Pointers to basic pascal types, inserted by h2pas conversion program.}');
  8202. Writeln(headerfile,aktspace,'Type');
  8203. Writeln(headerfile,aktspace,' PLongint = ^Longint;');
  8204. Writeln(headerfile,aktspace,' PSmallInt = ^SmallInt;');
  8205. Writeln(headerfile,aktspace,' PByte = ^Byte;');
  8206. Writeln(headerfile,aktspace,' PWord = ^Word;');
  8207. Writeln(headerfile,aktspace,' PDWord = ^DWord;');
  8208. Writeln(headerfile,aktspace,' PDouble = ^Double;');
  8209. Writeln(headerfile);
  8210. end;
  8211. if PTypeList.count <> 0 then
  8212. Writeln(headerfile,aktspace,'Type');
  8213. for i:=0 to (PTypeList.Count-1) do
  8214. begin
  8215. originalstr:=copy(PTypelist[i],2,length(PTypeList[i]));
  8216. Writeln(headerfile,aktspace,PTypeList[i],' = ^',originalstr,';');
  8217. end;
  8218. if not packrecords then
  8219. begin
  8220. writeln(headerfile,'{$IFDEF FPC}');
  8221. writeln(headerfile,'{$PACKRECORDS C}');
  8222. writeln(headerfile,'{$ENDIF}');
  8223. end;
  8224. writeln(headerfile);
  8225. end;
  8226. var
  8227. SS : string;
  8228. i : longint;
  8229. headerfile: Text;
  8230. finaloutfile: Text;
  8231. begin
  8232. pointerprefix:=false;
  8233. { Initialize }
  8234. PTypeList:=TStringList.Create;
  8235. PTypeList.Sorted := true;
  8236. PTypeList.Duplicates := dupIgnore;
  8237. freedynlibproc:=TStringList.Create;
  8238. loaddynlibproc:=TStringList.Create;
  8239. yydebug:=true;
  8240. aktspace:='';
  8241. block_type:=bt_no;
  8242. IsExtern:=false;
  8243. { Read commandline options }
  8244. ProcessOptions;
  8245. if not CompactMode then
  8246. aktspace:=' ';
  8247. { open input and output files }
  8248. assign(yyinput, inputfilename);
  8249. {$I-}
  8250. reset(yyinput);
  8251. {$I+}
  8252. if ioresult<>0 then
  8253. begin
  8254. writeln('file ',inputfilename,' not found!');
  8255. halt(1);
  8256. end;
  8257. { This is the intermediate output file }
  8258. assign(outfile, 'ext3.tmp');
  8259. {$I-}
  8260. rewrite(outfile);
  8261. {$I+}
  8262. if ioresult<>0 then
  8263. begin
  8264. writeln('file ext3.tmp could not be created!');
  8265. halt(1);
  8266. end;
  8267. writeln(outfile);
  8268. { Open tempfiles }
  8269. { This is where the implementation section of the unit shall be stored }
  8270. Assign(implemfile,'ext.tmp');
  8271. rewrite(implemfile);
  8272. Assign(tempfile,'ext2.tmp');
  8273. rewrite(tempfile);
  8274. { Parse! }
  8275. yyparse;
  8276. { Write implementation if needed }
  8277. if not(includefile) then
  8278. begin
  8279. writeln(outfile);
  8280. writeln(outfile,'implementation');
  8281. writeln(outfile);
  8282. end;
  8283. { here we have a problem if a line is longer than 255 chars !! }
  8284. reset(implemfile);
  8285. while not eof(implemfile) do
  8286. begin
  8287. readln(implemfile,SS);
  8288. writeln(outfile,SS);
  8289. end;
  8290. if createdynlib then
  8291. begin
  8292. writeln(outfile,' uses');
  8293. writeln(outfile,' SysUtils,');
  8294. writeln(outfile,'{$ifdef Win32}');
  8295. writeln(outfile,' Windows;');
  8296. writeln(outfile,'{$else}');
  8297. writeln(outfile,' DLLFuncs;');
  8298. writeln(outfile,'{$endif win32}');
  8299. writeln(outfile);
  8300. writeln(outfile,' var');
  8301. writeln(outfile,' hlib : thandle;');
  8302. writeln(outfile);
  8303. writeln(outfile);
  8304. writeln(outfile,' procedure Free',unitname,';');
  8305. writeln(outfile,' begin');
  8306. writeln(outfile,' FreeLibrary(hlib);');
  8307. for i:=0 to (freedynlibproc.Count-1) do
  8308. Writeln(outfile,' ',freedynlibproc[i]);
  8309. writeln(outfile,' end;');
  8310. writeln(outfile);
  8311. writeln(outfile);
  8312. writeln(outfile,' procedure Load',unitname,'(lib : pchar);');
  8313. writeln(outfile,' begin');
  8314. writeln(outfile,' Free',unitname,';');
  8315. writeln(outfile,' hlib:=LoadLibrary(lib);');
  8316. writeln(outfile,' if hlib=0 then');
  8317. writeln(outfile,' raise Exception.Create(format(''Could not load library: %s'',[lib]));');
  8318. writeln(outfile);
  8319. for i:=0 to (loaddynlibproc.Count-1) do
  8320. Writeln(outfile,' ',loaddynlibproc[i]);
  8321. writeln(outfile,' end;');
  8322. writeln(outfile);
  8323. writeln(outfile);
  8324. writeln(outfile,'initialization');
  8325. writeln(outfile,' Load',unitname,'(''',unitname,''');');
  8326. writeln(outfile,'finalization');
  8327. writeln(outfile,' Free',unitname,';');
  8328. end;
  8329. { write end of file }
  8330. writeln(outfile);
  8331. if not(includefile) then
  8332. writeln(outfile,'end.');
  8333. { close and erase tempfiles }
  8334. close(implemfile);
  8335. erase(implemfile);
  8336. close(tempfile);
  8337. erase(tempfile);
  8338. flush(outfile);
  8339. {**** generate full file ****}
  8340. assign(headerfile, 'ext4.tmp');
  8341. {$I-}
  8342. rewrite(headerfile);
  8343. {$I+}
  8344. if ioresult<>0 then
  8345. begin
  8346. writeln('file ext4.tmp could not be created!');
  8347. halt(1);
  8348. end;
  8349. WriteFileHeader(HeaderFile);
  8350. { Final output filename }
  8351. assign(finaloutfile, outputfilename);
  8352. {$I-}
  8353. rewrite(finaloutfile);
  8354. {$I+}
  8355. if ioresult<>0 then
  8356. begin
  8357. writeln('file ',outputfilename,' could not be created!');
  8358. halt(1);
  8359. end;
  8360. writeln(finaloutfile);
  8361. { Read unit header file }
  8362. reset(headerfile);
  8363. while not eof(headerfile) do
  8364. begin
  8365. readln(headerfile,SS);
  8366. writeln(finaloutfile,SS);
  8367. end;
  8368. { Read interface and implementation file }
  8369. reset(outfile);
  8370. while not eof(outfile) do
  8371. begin
  8372. readln(outfile,SS);
  8373. writeln(finaloutfile,SS);
  8374. end;
  8375. close(HeaderFile);
  8376. close(outfile);
  8377. close(finaloutfile);
  8378. erase(outfile);
  8379. erase(headerfile);
  8380. PTypeList.Free;
  8381. freedynlibproc.free;
  8382. loaddynlibproc.free;
  8383. end.