U lu f xã@sœdZddlZddlmZddlmZmZddlmZm Z m Z m Z m Z m Z mZmZmZmZddlmZddlmZdd gZGd d „d eƒZGd d„deƒZdS) zÔ pygments.lexers.pascal ~~~~~~~~~~~~~~~~~~~~~~ Lexers for Pascal family languages. :copyright: Copyright 2006-2023 by the Pygments team, see AUTHORS. :license: BSD, see LICENSE for details. éN)ÚLexer)Ú get_bool_optÚ get_list_opt) ÚTextÚCommentÚOperatorÚKeywordÚNameÚStringÚNumberÚ PunctuationÚErrorÚ Whitespace)ÚScanner)Ú Modula2LexerÚ DelphiLexerÚ PortugolLexerc@s:eZdZdZdZdgZddgZgZdZdd„Z d d „Z d S) rz;For Portugol, a Pascal dialect with keywords in Portuguese.ZPortugolÚportugolz*.algz *.portugolz>https://www.apoioinformatica.inf.br/produtos/visualg/linguagemcKs&tj|f|Žtf|ddi—Ž|_dS)NrT)rÚ__init__rÚlexer)ÚselfÚoptions©rú:/tmp/pip-unpacked-wheel-7eq1ciah/pygments/lexers/pascal.pyr!szPortugolLexer.__init__cCs |j |¡S)N)rÚget_tokens_unprocessed)rÚtextrrrr%sz$PortugolLexer.get_tokens_unprocessedN) Ú__name__Ú __module__Ú __qualname__Ú__doc__ÚnameÚaliasesÚ filenamesÚ mimetypesÚurlrrrrrrrsc@s,eZdZdZdZddddgZddgZd gZd Zd Z d Z d ddddddddddddddddddd d!d"hZ d#d$d%d&d'd(dd)d*d+d,d-d.d/d0d1d2d3d4hZ d5d6d4d7d8d9d:d;dd?d@dAhZ dBdCdDdEdFdGdHdIdJdKdLdMdNdOdPdQdRdSdTdUdVdWdXdYdZd[d\d]d^d_d`dadbdcdddedfdgdhdidjdkdldmdndodpdqdrdsdtdudvdwdxdydzd{d|d}d~dd€dd‚dƒd„d…d†d‡dˆhGZd‰dŠd‹dŒdœZdŽddd‘d’d“d”d•d–d—d˜d™dšd›dœddždŸd d¡d¢d£d¤d¥d¦d§d¨d©dªd«d¬d­d®d¯d°d±d²d³d´dµd¶d·d¸d¹dºd»d¼d½d¾d¿dÀdÁdÂdÃdÄdÅdÆdÇdÈdÉdÊdËdÌdÍdÎdÏdÐhCZdÑdÒdÓdÔdÕdÖd×dØdÙdÚdÛdÜdÝdÞdßdàdádâdãdädådædçdèdédêdëdìdídîdïdðdñdòdódôdõdöd÷dødùdúdûdüdýdþdÿdddddddddd d d d d ddddddddddddddddddd d!d"d#d$d%d&d'd(d)d*d+d,d-d.d/d0d1d2d2d3d4d5d6d7d8d9d:d;d<d=d>d?d@dAdBdCdDdEdFdGdHdIdJdKdLdMdNdOdPdQdRdSdTdUdVdWdXdYdZd[d\d]d^d_d`dadbdcdddedfdgdhdidjdkdldmdndodpdqdrdsdtdudvdwdxdydzd{d|d}d~dd€dd‚dƒd„d…d†d‡dˆd‰dŠd‹dŒddŽddd‘d’d“d”d•d–d—d˜d™dšd›dœddždŸd d¡d¢d£d¤d¥d¦d§d¨d©dªd«d¬d­d®d¯d°d±d²d³d´dµd¶d·d¸d¹dºd»d¼d½d¾d¿dÀdÁdÂdÃdÄdÅdÆdÇdÈdÉdÊdËdÌdÍdÎdÏdÐdÑdÒdÓdÔdÕdÖd×dØdÙdÚdÛdÜdÝdÞdßdàdádâdãdädådædçdèdédêdëdìhZdíZdîdvdïdðhZdñdò„Zdódô„ZdõS(öraF For Delphi (Borland Object Pascal), Turbo Pascal and Free Pascal source code. Additional options accepted: `turbopascal` Highlight Turbo Pascal specific keywords (default: ``True``). `delphi` Highlight Borland Delphi specific keywords (default: ``True``). `freepascal` Highlight Free Pascal specific keywords (default: ``True``). `units` A list of units that should be considered builtin, supported are ``System``, ``SysUtils``, ``Classes`` and ``Math``. Default is to consider all of them builtin. ZDelphiÚdelphiZpasZpascalZ objectpascalz*.pasz*.dprz text/x-pascal)8ÚabsoluteÚandÚarrayÚasmÚbeginÚbreakZcaseÚconstÚ constructorÚcontinueÚ destructorÚdivZdoZdowntoÚelseÚendÚfileÚforÚfunctionÚgotoÚifÚimplementationÚinZ inheritedÚinlineZ interfaceÚlabelÚmodÚnilÚnotÚobjectZofÚonÚoperatorÚorÚpackedÚ procedureÚprogramÚrecordZ reintroduceÚrepeatrÚsetÚshlÚshrÚstringZthenÚtoÚtypeÚunitZuntilÚusesÚvarÚwhileÚwithÚxor)ÚasÚclassÚexceptÚexportsÚ finalizationÚfinallyÚinitializationÚisÚlibraryr@ÚpropertyÚraiseÚ threadvarÚtry)ÚdisposeÚexitÚfalseÚnewÚtruer*rUr,r-r/r2rXr5r8rZr;r\rArDrEr]rFr_rMrNrOrPÚaliasZcdeclÚexportr:Z interruptZ nostackframeÚregisterZsafecallZ softfloatZstdcallÚvarargsr ZdynamicZnearZvirtualZexternalÚoverrideZ assemblerr&ZabstractZcppdeclÚdefaultZfarZfar16ZforwardÚindexZ oldfpccallÚprivateZ protectedZ publishedÚpublicZansicharZ ansistringÚboolÚbooleanÚbyteZbyteboolZcardinalÚcharÚcompÚcurrencyÚdoubleZdwordÚextendedZint64ÚintegerZiunknownZlongboolZlongintZlongwordZ pansicharZ pansistringZpboolZpbooleanZpbyteZ pbytearrayZ pcardinalZpcharZpcompZ pcurrencyZpdateZ pdatetimeZpdoubleZpdwordZ pextendedZphandleZpint64ZpintegerZplongintZ plongwordÚpointerZppointerZ pshortintZ pshortstringZpsingleZ psmallintZpstringZpvariantZ pwidecharZ pwidestringZpwordZ pwordarrayZ pwordboolÚrealZreal48ZshortintZ shortstringZsingleZsmallintrKZtclassZtdateZ tdatetimeZtextfileZthandleZtobjectZttimeÚvariantZwidecharZ widestringÚwordZwordbool)ŠÚabsZacquireexceptionobjectÚaddrZ ansitoutf8ÚappendÚarctanÚassertÚassignedZ assignfileZ beginthreadZ blockreadZ blockwriter+ÚchdirÚchrÚcloseZ closefileZcomptocurrencyZ comptodoubleÚconcatr.ÚcopyÚcosÚdecÚdeleteraZ doubletocompZ endthreadZ enummodulesZenumresourcemodulesÚeofZeolnZeraseZ exceptaddrZ exceptobjectÚexcluderbÚexpÚfileposÚfilesizeZfillcharÚfinalizeZfindclasshinstanceZ findhinstanceZfindresourcehinstanceÚflushÚfracZfreememZ get8087cwZgetdirZ getlasterrorZgetmemZgetmemorymanagerZgetmodulefilenameZgetvariantmanagerZhaltÚhiÚhighÚincÚincludeZ initializeÚinsertÚintZioresultZismemorymanagersetZisvariantmanagersetÚlengthÚlnÚloÚlowÚmkdirÚmoverdZoddZolestrtostringZolestrtostrvarÚordZ paramcountZparamstrÚpiÚposÚpredÚptrZ pucs4charsÚrandomZ randomizeÚreadZreadlnZ reallocmemZreleaseexceptionobjectÚrenameÚresetZrewriteÚrmdirÚroundZrunerrorÚseekZseekeofZseekeolnZ set8087cwZ setlengthZsetlinebreakstyleZsetmemorymanagerZ setstringZ settextbufZsetvariantmanagerÚsinÚsizeofÚsliceZsqrÚsqrtÚstrZ stringofcharZstringtoolestrZstringtowidecharÚsuccZswapÚtruncÚtruncateZtypeinfoZucs4stringtowidestringZ unicodetoutf8Z uniquestringZupcaseZ utf8decodeZ utf8encodeZ utf8toansiZ utf8tounicodeÚvalZ vararrayredimZvarclearZwidecharlentostringZwidecharlentostrvarZwidechartostringZwidechartostrvarZwidestringtoucs4stringÚwriteÚwriteln)ùÚabortZ addexitprocZaddterminateprocZadjustlinebreaksZallocmemZansicomparefilenameZansicomparestrZansicomparetextZansidequotedstrZansiextractquotedstrZ ansilastcharZ ansilowercaseZansilowercasefilenameZansiposZ ansiquotedstrZ ansisamestrZ ansisametextZ ansistrcompZ ansistricompZansistrlastcharZ ansistrlcompZ ansistrlicompZ ansistrlowerZ ansistrposZ ansistrrscanZ ansistrscanZ ansistrupperZ ansiuppercaseZansiuppercasefilenameZ appendstrZ assignstrZbeepZ booltostrZbytetocharindexZ bytetocharlenZbytetypeZcallterminateprocsZ changefileextZ charlengthZchartobyteindexZ chartobytelenZ comparememZ comparestrZ comparetextZ createdirZ createguidZ currentyearZ currtostrZ currtostrfÚdateZdatetimetofiledateZ datetimetostrZdatetimetostringZdatetimetosystemtimeZdatetimetotimestampZ datetostrZ dayofweekZ decodedateZdecodedatefullyZ decodetimeZ deletefileZdirectoryexistsZdiskfreeZdisksizeZ disposestrZ encodedateZ encodetimeZexceptionerrormessageZexcludetrailingbackslashZexcludetrailingpathdelimiterZexpandfilenameZexpandfilenamecaseZexpanduncfilenameZextractfiledirZextractfiledriveZextractfileextZextractfilenameZextractfilepathZextractrelativepathZextractshortpathnameZfileageZ filecloseZ filecreateZfiledatetodatetimeZ fileexistsZ filegetattrZ filegetdateZfileisreadonlyZfileopenZfilereadZ filesearchZfileseekZ filesetattrZ filesetdateZfilesetreadonlyZ filewriteZfinalizepackageZ findcloseZfindcmdlineswitchZ findfirstZfindnextZ floattocurrZfloattodatetimeZfloattodecimalZ floattostrZ floattostrfZ floattotextZfloattotextfmtZ fmtloadstrZfmtstrZforcedirectoriesÚformatZ formatbufZ formatcurrZformatdatetimeZ formatfloatZ freeandnilZ getcurrentdirZgetenvironmentvariableZgetfileversionZgetformatsettingsZgetlocaleformatsettingsÚ getmodulenameZgetpackagedescriptionZgetpackageinfoZgettimeZ guidtostringZ incamonthZincludetrailingbackslashZincludetrailingpathdelimiterZincmonthZinitializepackageZinterlockeddecrementZinterlockedexchangeZinterlockedexchangeaddZinterlockedincrementZinttohexZinttostrZ isdelimiterZ isequalguidZ isleapyearZispathdelimiterZ isvalididentÚ languagesZ lastdelimiterZ loadpackageZloadstrZ lowercaseZmsecstotimestampZnewstrZ nextcharindexÚnowZoutofmemoryerrorZ quotedstrZraiselastoserrorZraiselastwin32errorZ removedirZ renamefileZ replacedateZ replacetimeZsafeloadlibraryZ samefilenameZsametextZ setcurrentdirZ showexceptionÚsleepZstrallocZ strbufsizeZ strbytetypeZstrcatZ strcharlengthZstrcompZstrcopyZ strdisposeZstrecopyZstrendZstrfmtZstricompZ stringreplaceZ stringtoguidZstrlcatZstrlcompZstrlcopyZstrlenZstrlfmtZ strlicompZstrlowerZstrmoveZstrnewZ strnextcharZstrpasZstrpcopyZ strplcopyZstrposZstrrscanZstrscanÚ strtoboolZ strtobooldefZ strtocurrZ strtocurrdefZ strtodateZ strtodatedefZ strtodatetimeZstrtodatetimedefZ strtofloatZ strtofloatdefZstrtointZ strtoint64Z strtoint64defZ strtointdefZ strtotimeZ strtotimedefZstrupperZsupportsZsyserrormessageZsystemtimetodatetimeZ texttofloatÚtimeZtimestamptodatetimeZtimestamptomsecsZ timetostrZtrimZtrimleftZ trimrightZ tryencodedateZ tryencodetimeZtryfloattocurrZtryfloattodatetimeZ trystrtoboolZ trystrtocurrZ trystrtodateZtrystrtodatetimeZ trystrtofloatZ trystrtointZ trystrtoint64Z trystrtotimeZ unloadpackageZ uppercaseZwidecomparestrZwidecomparetextZ widefmtstrZ wideformatZ wideformatbufZ widelowercaseZ widesamestrZ widesametextZ wideuppercaseZ win32checkZwraptext),ZactivateclassgroupZ allocatehwndZbintohexZchecksynchronizeZcollectionsequalZcountgenerationsZdeallocatehwndZ equalrectZextractstringsZ findclassZfindglobalcomponentZgetclassZgroupdescendantswithZhextobinZ identtointZinitinheritedcomponentZ inttoidentZ invalidpointZisuniqueglobalcomponentnameZ linestartZobjectbinarytotextZobjectresourcetotextZobjecttexttobinaryZobjecttexttoresourceZ pointsequalZreadcomponentresZreadcomponentresexZreadcomponentresfileZrectZ registerclassZregisterclassaliasZregisterclassesZregistercomponentsZregisterintegerconstsZregisternoiconZregisternonactivexZ smallpointZstartclassgroupZteststreamformatZunregisterclassZunregisterclassesZunregisterintegerconstsZunregistermoduleclassesZwritecomponentresfile)dÚarccosZarccoshZarccotZarccothZarccscZarccschZarcsecZarcsechZarcsinZarcsinhZarctan2ZarctanhÚceilZ comparevalueZcosecantÚcoshZcotÚcotanZcothZcscZcschZ cycletodegZ cycletogradZ cycletoradZ degtocycleZ degtogradZdegtoradÚdivmodZdoubledecliningbalanceZ ensurerangeÚfloorÚfrexpZ futurevalueZgetexceptionmaskZgetprecisionmodeZ getroundmodeZ gradtocycleZ gradtodegZ gradtoradÚhypotZinrangeZinterestpaymentZ interestrateZinternalrateofreturnZintpowerZ isinfiniteÚisnanZiszeroÚldexpZlnxp1Úlog10Úlog2ÚlognÚmaxZ maxintvalueZmaxvalueZmeanZ meanandstddevÚminZ minintvalueZminvalueZmomentskewkurtosisZnetpresentvalueZnormZnumberofperiodsÚpaymentZ periodpaymentZpolyZ popnstddevZ popnvarianceÚpowerZ presentvalueZ radtocycleZradtodegZ radtogradZrandgZ randomrangeZroundtoZ samevalueÚsecZsecantZsechZsetexceptionmaskZsetprecisionmodeZ setroundmodeÚsignZ simpleroundtoZsincosÚsinhZslndepreciationÚstddevÚsumZsumintZ sumofsquaresZsumsandsquaresZsyddepreciationÚtanÚtanhZ totalvarianceZvariance)ÚSystemZSysUtilsZClassesZMathZahÚalZaxZbhÚblZbpZbxÚchZclZcr0Zcr1Zcr2Zcr3Zcr4ÚcsZcxZdhZdiÚdlZdr0Zdr1Zdr2Zdr3Zdr4Zdr5Zdr6Zdr7ZdsZdxZeaxZebpZebxZecxZediZedxÚesZesiZespÚfsZgsZmm0Zmm1Zmm2Zmm3Zmm4Zmm5Zmm6Zmm7ÚsiÚspÚssZst0Zst1Zst2Zst3Zst4Zst5Zst6Zst7Zxmm0Zxmm1Zxmm2Zxmm3Zxmm4Zxmm5Zxmm6Zxmm7ZaaaZaadZaamZaasZadcÚaddr'ZarplÚboundZbsfZbsrZbswapZbtZbtcZbtrZbtsÚcallZcbwZcdqZclcZcldÚcliZcltsZcmcZcmovaZcmovaeZcmovbZcmovbeZcmovcZcmovcxzZcmoveZcmovgZcmovgeZcmovlZcmovleZcmovnaZcmovnaeZcmovnbZcmovnbeZcmovncZcmovneZcmovngZcmovngeZcmovnlZcmovnleZcmovnoZcmovnpZcmovnsZcmovnzZcmovoZcmovpZcmovpeZcmovpoZcmovsZcmovzÚcmpZcmpsbZcmpsdZcmpswZcmpxchgZ cmpxchg486Z cmpxchg8bZcpuidÚcwdZcwdeZdaaZdasrˆr0ZemmsZenterZhltZibtsZicebpZidivÚimulr9r”ZinsbZinsdZinswr—Zint01Zint03Zint1Zint3ZintoZinvdZinvlpgZiretZiretdZiretwÚjaZjaeZjbZjbeZjcZjcxzZjeZjecxzZjgZjgeZjlZjleZjmpÚjnaZjnaeZjnbZjnbeZjncZjneZjngZjngeZjnlZjnleZjnoZjnpZjnsZjnzZjoZjpZjpeZjpoZjsZjzZlahfZlarZlcallZldsZleaZleaveZlesZlfsZlgdtZlgsZlidtZljmpZlldtZlmswZloadallZ loadall286ÚlockZlodsbZlodsdZlodswZloopZloopeZloopneZloopnzZloopzZlslZlssZltrZmovZmovdZmovqZmovsbZmovsdZmovswZmovsxZmovzxÚmulÚnegZnopr>rBÚoutZoutsbZoutsdZoutswÚpopZpopaZpopadZpopawZpopfZpopfdZpopfwÚpushZpushaZpushadZpushawZpushfZpushfdZpushfwZrclZrcrZrdmsrZrdpmcZrdshrZrdtscÚrepZrepeZrepneZrepnzZrepzÚretZretfZretnZrolZrorZrsdcZrsldtZrsmZsahfZsalZsalcZsarZsbbZscasbZscasdZscaswZsetaZsetaeZsetbZsetbeZsetcZsetcxzZseteZsetgZsetgeZsetlZsetleZsetnaZsetnaeZsetnbZsetnbeZsetncZsetneZsetngZsetngeZsetnlZsetnleZsetnoZsetnpZsetnsZsetnzZsetoZsetpZsetpeZsetpoZsetsZsetzZsgdtrIZshldrJZshrdZsidtZsldtZsmiZsmintZsmintoldZsmswZstcZstdZstiZstosbZstosdZstoswr®ÚsubZsvdcZsvldtZsvtsZsyscallZsysenterZsysexitZsysretÚtestZud1Zud2ZumovZverrZverwÚwaitZwbinvdZwrmsrZwrshrZxaddZxbtsZxchgZxlatZxlatbrS)MZ aleatorioZ algoritmoZarquivoZateZcasoZ cronometroÚdebugÚeZecoZenquantoZentaoZescolhaZescrevaZescrevalZfacaZfalsoZ fimalgoritmoZ fimenquantoZ fimescolhaZ fimfuncaoZfimparaZfimprocedimentoZ fimrepitaZfimseÚfuncaoZinicior—Z interrompaZleiaZ limpatelar<ZnaoZouZ outrocasoÚparaZpassoZpausaÚ procedimentoZrepitaZretorneÚseZsenaoZtimerrPZvetorZ verdadeiroZxour0r<r|r¾Zarcsenrr‡rÁZExpZgraupradr—ÚlogrÊrŸZquadZradpgrauZraizqZrandZrandiZsenZTanZascZcaracZ caracpnumZcomprZcopiaZmaiuscZminuscZ numpcaracr ZinteiroZ caractereZlogicocKsÐtj|f|Žtƒ|_tƒ|_t|ddƒrN|j |j¡|j |j¡d|_ n~d|_ t|ddƒrn|j |j ¡t|ddƒrˆ|j |j ¡t|ddƒr¢|j |j ¡t |dt|jƒƒD]}|j |j|¡q´dS)NrFTZ turbopascalr%Z freepascalZunits)rrrHÚkeywordsÚbuiltinsrÚupdateÚPORTUGOL_KEYWORDSÚPORTUGOL_BUILTIN_TYPESÚ is_portugolÚTURBO_PASCAL_KEYWORDSÚDELPHI_KEYWORDSÚFREE_PASCAL_KEYWORDSrÚlistÚ BUILTIN_UNITS)rrrNrrrrs     zDelphiLexer.__init__ccst|tjtjBtjBƒ}dg}d}d}d}d}d}d} tƒ} ddg} |jst} |ddkr¨| d¡rpt } qÊ|j sž| d¡rž|j   d¡r”t j} nt j} qÊ| d¡r²t j} qÊ|j rÊ| d ¡rÊt} qÊ|j sô| d ¡rôt} | rð|j d krðd} qÊ| d ¡rŽt} d}|s|r¤|j d kr2| dd7<nX|j dkrP| dd8<n:|j dkrn| dd7<n|j dkr¤| dd8<qÊ| d¡rÞ|j  ¡} | dkrºtjj} q¤| |jkr€t} |j ræ| dkr|d}d}n–|sò|r0| |jkr0| ddkr0| ddkr0d}d}ddg} tƒ} | dkr@d} n<| dkrV| d¡n&| dkrjd}d}n| dkrÜd}d}q¤|j s¤|r¤| |jkr¤tj} q¤|j sÊ|rÊ| dkrÊtj} d}q¤|r|j sì| d¡rìtj} n"tj} d}|j rÜ|  |j  ¡¡nÌ|j s*|r*tj } d}n²|j sP| rPtj!} |  |j  ¡¡nŒ| | krbtj!} nz|j r~| |j"kr~tj#} n^|j sš| |j$krštj#} nB|j s¶| |j%kr¶tj} n&|j sØ|sØ| |j&krØtj} nt} nÆ|j r| d¡rt'} | d¡n¢|j s&| d¡r&t'} | d¡n~|j sB| d¡rBt'j(} nb|j s^| d ¡r^t)j*} nF| d!¡rrt)j+} n2| d"¡r†t)j,} nt-|ƒdkrœ| .¡| /¡n"|ddkrd|j r| d#¡rÒt'j0} n<| d¡rìt'} | .¡n"| d$¡rþt'} n| /¡| .¡nP| d#¡r$t'j0} n<| d¡r>t'} | .¡n"| d%¡rPt'} n| /¡| .¡nf|j sÊ|ddkrÊ| d¡rŽt } n<| d&¡rªt} | .¡n | d¡rÔ|j   d¡rÌt j} nt j} nö| d¡rèt j} nâ| d¡rt'} | d¡nÆ| d'¡rtj!} n²| d¡rZ|j  ¡} | |j1kr@t} n| |j2krTtj} nt} np| d(¡rlt} n^| d ¡r~t} nL| d ¡r’t)j*} n8| d!¡r¦t)j+} n$| d"¡rºt)j,} n| /¡| .¡|j sè|j  3¡rè|j d)k}|j4| |j pød*fVqDdS)+NÚinitialFréÿÿÿÿz\s+z\{.*?\}|\(\*.*?\*\)ú$z//.*?$z/(<\-)|(>=)|(<=)|%|<|>|-|\+|\*|\=|(<>)|\/|\.|:|,z[-+*\/=<>:;,.@\^]ú;z [\(\)\[\]]+ú(éú)ú[ú]z[A-Za-z_][A-Za-z_0-9]*Úresult)r÷rùT)r;r6r)r])rDrAr5r-r/)r¤r³z\s*\.\s*z\"rKú'z\#(\d+|\$[0-9A-Fa-f]+)z\$[0-9A-Fa-f]+z\d+(?![eE]|\.[^.])z&\d+(\.\d+([eE][+-]?\d+)?|[eE][+-]?\d+)z''z[^\"]*z[^']*r2z@@[A-Za-z_][A-Za-z_0-9]*z[-+*\/=<>:;,.@\^]+Ú.Ú)5rÚreÚDOTALLÚ MULTILINEÚ IGNORECASErHZeosr ÚscanrrÚmatchÚ startswithrZPreprocZ MultilineÚSinglerr Úlowerr ZBuiltinZPseudorürÚBLOCK_KEYWORDSr~ÚFUNCTION_MODIFIERSróZClassZFunctionráZPropertyZLabelrÚTypeÚ BUILTIN_TYPESÚ DIRECTIVESrýr ÚCharr ZHexZIntegerZFloatÚlenrîZget_charZEscapeÚASM_INSTRUCTIONSÚ ASM_REGISTERSÚstripZ start_pos)rrÚscannerÚstackZin_function_blockZin_property_blockZwas_dotZnext_token_is_functionZnext_token_is_propertyZcollect_labelsZ block_labelsZ brace_balanceÚtokenZlowercase_namerrrr£sf                  ÿ þ ý     ÿ ÿ                                  z"DelphiLexer.get_tokens_unprocessedN)rrrrr r!r"r#rrrrrr!r rr%r$rÿrrrrrrrr)sô  üü ýó!C‹ø Ú)Qÿ )rrZpygments.lexerrZ pygments.utilrrZpygments.tokenrrrrr r r r r rZpygments.scannerrZpygments.lexers.modula2rÚ__all__rrrrrrÚs  0