| Server IP : 127.0.0.1 / Your IP : 216.73.216.109 Web Server : Apache/2.4.54 (Win64) OpenSSL/1.1.1q PHP/8.1.10 System : Windows NT DESKTOP-E5T4RUN 10.0 build 19045 (Windows 10) AMD64 User : SERVERWEB ( 0) PHP Version : 8.1.10 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : C:/cygwin64/lib/python3.9/site-packages/pygments/lexers/__pycache__/ |
Upload File : |
a
SҼaJ� � @ sn d dl Z d dlmZmZ d dlmZmZ d dlmZm Z m
Z
m Z m Z m
Z
mZmZmZ dgZG dd� de�ZdS )� N)�
RegexLexer�include)� get_bool_opt� get_list_opt) �Text�Comment�Operator�Keyword�Name�String�Number� Punctuation�Error� Modula2Lexerc @ s� e Zd ZdZddgZddgZdgZejej B Z
de fde fgd e j
fd
e j
fd e j
fd e j
fd
e j
fde j
fde j
fde j
fgdefgdejfdejfgdejfdejfdejfgdejfdejfdejfgdejfdejfgd efd efd efd efd efd!efd"efd#efd$efd%efg
d&efd'efd(efd)efd*efd+efd,efd-efd.efg d/efd0efd1efd2efd3efd4efd5efgd6efd7efd8efgd9e jfd:e jfd;e jfgd<e jfd=e jfge d>�e d?�e d@�e dA�e dB�e dC�e dD�e dE�e dF�e dG�e dH�e dI�e dJ�g
dK�Z dLZ dMZ dNZ dOZ!dPZ"dQZ#dRZ$dSZ%dTZ&dUZ'dVZ(dWZ)dXZ*dYZ+dZZ,d[Z-d\Z.d]Z/d^Z0d^Z1d_Z2d^Z3d`Z4daZ5d^Z6d^Z7d^Z8dbZ9dcZ:ddZ;deZ<dfZ=dgZ>dhZ?diZ@djZAd^ZBd^ZCd^ZDd^ZEd^ZFdkZGdlZHdmZIdnZJdoZKdpZLdqZMdrZNd^e!fe%fe)fe-fe%fe!fe%fe%fdr� ZOe e"e&e*fe e"fe e&fe e*fe e*e.fe e&e1fe e"e4fe e&e7fe e&e:fdr� ZPe e#e'e+fe e#fe e'fe e+fe e+e/fe e'e2fe e#e5fe e'e8fe e'e;fdr� ZQe e$e(e,fe e$fe e(fe e,fe e,e0fe e(e3fe e$e6fe e(e9fe e(e<fdr� ZRd^d^d^eGfeGfd^d^d^d^dr� ZSd^e=feBfeHeIeGfeHeIfeBfe=feBfeBfdr� ZTd^e>feCfeJfeJfeCfe>feCfeCfdr� ZUd^e?feDfeKfeKfeDfe?feDfeDfdr� ZVd^e@feEfeLfeLfeEfe@feEfeEfdr� ZWd^eAfeFfeMfeMfeFfeAfeFfeFfdr� ZXdsdt� ZYdudv� ZZdwdx� Z[dydz� Z\d{d|� Z]d}S )~r zModula-2Zmodula2Zm2z*.defz*.modztext/x-modula2z\n+z\s+z\(\*!m2pim\*\)z\(\*!m2iso\*\)z\(\*!m2r10\*\)z\(\*!objm2\*\)z\(\*!m2iso\+aglet\*\)z\(\*!m2pim\+gm2\*\)z\(\*!m2iso\+p1\*\)z\(\*!m2iso\+xds\*\)z([a-zA-Z_$][\w$]*)z0b[01]+(\'[01]+)*z 0[ux][0-9A-F]+(\'[0-9A-F]+)*z>[0-9]+(\'[0-9]+)*\.[0-9]+(\'[0-9]+)*[eE][+-]?[0-9]+(\'[0-9]+)*z$[0-9]+(\'[0-9]+)*\.[0-9]+(\'[0-9]+)*z[0-9]+(\'[0-9]+)*z[0-7]+Bz[0-7]+Cz
[0-9A-F]+Hz"(\\\\|\\[^\\]|[^"\\])*"z'(\\\\|\\[^\\]|[^'\\])*'z\*\.z\+>�<>�<=�>=�==�::�:=z\+\+�--z[+-]z[*/]z\\z[=#<>]z\^�@�&�~�`z\.\.�<<�>>�->z\|#�##z\|\*z[()\[\]{},.:;|]�!z\?z^//.*?\nz\(\*([^$].*?)\*\)z /\*(.*?)\*/z <\*.*?\*>z
\(\*\$.*?\*\)�
whitespace� dialecttags�pragmas�comments� identifiers�suffixed_number_literals�prefixed_number_literals�plain_number_literals�string_literals�digraph_punctuation�digraph_operators�unigraph_punctuation�unigraph_operators)r r! r$ r& r' r% r( r* r, r) r+ r# r" �root)%ZANDZARRAYZBEGINZBYZCASEZCONSTZ
DEFINITIONZDIVZDO�ELSEZELSIFZENDZEXITZFORZFROMZIFZIMPLEMENTATIONZIMPORT�INZLOOPZMODZMODULEZNOTZOF�ORZPOINTERZ PROCEDUREZRECORD�REPEATZRETURNZSETZTHENZTOZTYPEZUNTILZVARZWHILE)ZABSZBOOLEAN�CARDINALZCHARZCHRZFALSEZINTEGERZLONGINTZLONGREAL�MAXZMIN�NILZODDZORDZREAL�TRUE)ZADDRESSZBYTEZWORD�ADR)r r r �$�%�?�\r �++r r �*.�+>r r r �|#r )�EXPORT� QUALIFIED�WITH)�BITSET�CAP�DEC�DISPOSE�EXCL�FLOAT�HALT�HIGH�INC�INCL�NEWr4 �PROC�SIZE�TRUNC�VAL)�SYSTEM�PROCESS�TSIZE�
NEWPROCESS�TRANSFER)r r7 r8 r9 r: r r; r r r< r= r r r r> r )ZEXCEPTr? ZFINALLYZFORWARDZ PACKEDSETr@ ZREMZRETRYrA ZABSTRACTZAS�CLASSZGUARDZINHERITZOVERRIDEZREADONLYZREVEALZTRACEDZ
UNSAFEGUARDED) rB rC ZCMPLX�COMPLEXrD rE rF rG rH rI ZIMrJ rK ZINTZ
INTERRUPTIBLE�LENGTHZLFLOAT� LONGCOMPLEXrL rM Z
PROTECTIONZRErN rO ZUNINTERRUBTIBLErP ZCREATEZDESTROY�EMPTYZISMEMBERZSELF):rQ Z
BITSPERLOCZ LOCSPERBYTEZ LOCSPERWORDZLOCZADDADRZSUBADRZDIFADRZMAKEADRr6 ZROTATEZSHIFT�CASTrS Z
COROUTINESZATTACHZ COROUTINEZCURRENTZDETACHZHANDLERZINTERRUPTSOURCEZ
IOTRANSFERZ
IsATTACHEDZLISTENZ NEWCOROUTINEZPROTrU Z
EXCEPTIONSZAllocateSourceZ
CurrentNumberZExceptionNumberZExceptionSourceZ
GetMessageZIsCurrentSourceZIsExceptionalExecutionZRAISEZ TERMINATIONZ
IsTerminatingZ HasHaltedZ M2EXCEPTIONZ M2ExceptionsZ M2ExceptionZ
IsM2ExceptionZindexExceptionZrangeExceptionZcaseSelectExceptionZinvalidLocationZfunctionExceptionZwholeValueExceptionZwholeDivExceptionZrealValueExceptionZrealDivExceptionZcomplexValueExceptionZcomplexDivExceptionZ
protExceptionZ sysExceptionZ coExceptionZ exException)r r r r7 r8 r r )ZALIASZARGLISTZ BLUEPRINTZCOPYZGENLIBZ
INDETERMINATErL ZNONEZOPAQUEZ REFERENTIALZRELEASEZRETAIN�ASMZREG)r2 ZCOUNTrZ ZEXISTSZINSERTrX �LONGCARDZOCTETZPTRZPREDZREADZREADNEWZREMOVEZRETRIEVEZSORTZSTOREZSUBSETZSUCCZTLIMITZTMAXZTMINr5 rS ZUNICHARZWRITEZWRITEF)KZ TPROPERTIESZPROPERTY�LITERALZ TPROPERTYZTLITERALZTBUILTINZTDYNZTREFCZTNILZTBASEZ
TPRECISIONZTMAXEXPZTMINEXPZ
CONVERSIONZTSXFSIZEZSXFrP ZUNSAFEr[ � INTRINSIC�AVAILZADDZSUBZADDCZSUBCZFETCHADDZFETCHSUBZSHLZSHRZASHRZROTLZROTRZROTLCZROTRCZBWNOT�BWAND�BWOR�BWXOR�BWNANDZBWNORZSETBITZTESTBITZLSBITZMSBITZCSBITSZBAILrH ZTODOZFFIZADDRZVARGLISTZVARGCZATOMICr_ r` ZSWAPZCASrJ rD ra rd rb rc ZCOMPILER�DEBUGZMODNAMEZPROCNAMEZLINENUMZDEFAULTZHASHZ ASSEMBLERZREGISTERZSETREGZGETREGZCODE)r r7 r8 r r )ZBYCOPYZBYREFrV ZCONTINUEZCRITICALZINOUTZMETHODZON�OPTIONALZOUTZPRIVATEZ PROTECTEDZPROTOCOLZPUBLICZSUPERZTRY)ZOBJECTZNOZYES� ) �BITSET8�BITSET16�BITSET32� CARDINAL8�
CARDINAL16�
CARDINAL32�INTEGER8� INTEGER16� INTEGER32)
r\ Z
__ATTRIBUTE__Z __BUILTIN__Z
__COLUMN__Z__DATE__Z__FILE__Z __FUNCTION__Z__LINE__Z
__MODULE__ZVOLATILE)rh ri rj rk rl rm �
CARDINAL64Z COMPLEX32Z COMPLEX64Z COMPLEX96Z
COMPLEX128rn ro rp � INTEGER64ZREAL8ZREAL16ZREAL32ZREAL96ZREAL128ZTHROW)�BCD)ZSEQ) ZASH�ASSERTZ DIFFADR_TYPEZENTIERZINDEXZLENr] � SHORTCARD�SHORTINT)rR rT ZBOOL8ZBOOL16ZBOOL32�CARD8�CARD16�CARD32�INT8�INT16�INT32ZREFZMOVEZFILLZGETZPUTZCC�intZunsignedZsize_tZ voidCOMPILERZOPTIONZEQUATION)ZTerminal�
FileSystemZInOutZ RealInOutZMathLib0�Storage) �FlagZFlagSetZResponseZCommand�LockZ
PermissionZ
MediumType�FileZFileProcZ
DirectoryProcZ FileCommandZDirectoryCommand)9ZReadZBusyReadZ ReadAgainZWriteZ WriteStringZWriteLnZCreateZLookupZCloseZDeleteZRenameZSetReadZSetWriteZ SetModifyZSetOpenZDoioZSetPosZGetPosZLengthZResetZAgainZReadWordZ WriteWordZReadCharZ WriteCharZ CreateMediumZ DeleteMediumZ
AssignNameZ DeassignNameZ
ReadMediumZ LookupMediumZ OpenInputZ
OpenOutputZ
CloseInputZ CloseOutputZ
ReadStringZReadIntZReadCardZReadWrdZWriteIntZ WriteCardZWriteOctZWriteHexZWriteWrdZReadRealZ WriteRealZ
WriteFixPtZ WriteRealOctZsqrtZexpZlnZsinZcosZarctanZentier�ALLOCATE�
DEALLOCATE)ZDoneZtermCH�in�out)ZEOL)0rs ZLONGBCDrB Z SHORTBITSETZ
LONGBITSETZLONGLONGBITSETrW rY ru Z LONGLONGCARDrv Z LONGLONGINTZPOSINTZ SHORTPOSINTZ
LONGPOSINTZLONGLONGPOSINTrh ri rj ZBITSET64Z BITSET128ZBS8ZBS16ZBS32ZBS64ZBS128rk rl rm rq Z CARDINAL128rw rx ry ZCARD64ZCARD128rn ro rp rr Z
INTEGER128rz r{ r| ZINT64ZINT128�STRINGZ UNISTRING)Z ProtoRootZProtoComputationalZ ProtoNumericZ ProtoScalarZProtoNonScalarZ
ProtoCardinalZ ProtoIntegerZ ProtoRealZ ProtoComplexZ ProtoVectorZ
ProtoTupleZProtoCompArrayZProtoCollectionZProtoStaticArrayZProtoStaticSetZProtoStaticStringZ
ProtoArrayZ ProtoStringZProtoSetZ
ProtoMultiSetZProtoDictionaryZProtoMultiDictZProtoExtensionZProtoIOZ
ProtoCardMathZ ProtoIntMathZ
ProtoRealMath)�ASCIIZ BooleanIOZCharIOZ UnicharIOZOctetIOZ
CardinalIOZ
LongCardIOZ IntegerIOZ LongIntIOZRealIOZ
LongRealIOZBCDIOZ LongBCDIOZCardMathZ LongCardMathZIntMathZ LongIntMathZRealMathZ LongRealMathZBCDMathZ LongBCDMath�FileIOr~ r Z IOSupport)r� ZStatus)r� r� rN )ZstdInZstdOutZstdErr)ZpiZtau) �unknown�m2pimZm2iso�m2r10�objm2z m2iso+agletz m2pim+gm2zm2iso+p1z m2iso+xdsc K s� t |dg �}|D ]$}|| jdd� v r| �|� q@q| �d� d| _t |dg �}d|v sbd|v rjd | _nd| _t|d
d �| _tj| fi |�� d S ) N�dialect� ���r� FZstyleZalgolZalgol_nuT� treat_stdlib_adts_as_builtins) r �dialects� set_dialect�dialect_set_by_tag�algol_publication_moder r� r �__init__)�self�optionsr� Zdialect_optionZstylesrg rg �;/usr/lib/python3.9/site-packages/pygments/lexers/modula2.pyr� � s
�zModula2Lexer.__init__c C s� || j vrd}n|}t� }| j| D ]}|�t|�� q$t� }| j| D ]}|�t|�� qHt� }| j| D ]}|�t|��|�� qlt� }| j| D ]}|�t|��|�� q�t� }| j| D ]}|�t|��|�� q�t� } | j | D ]}| �t|��|�� q�t� }
| j
| D ]}|
�t|��|�� �qt� } | j | D ]}| �t|��|�� �q@t� } | j | D ]}| �t|��|�� �qlt� }
| j
| D ]}|
�t|��|�� �q�|| _|| _|| _|| _|| _|| _| | _|
| _| | _| | _|
| _d S )Nr� )r� �set�lexemes_to_reject_db�update�reserved_words_db� builtins_db�
difference�pseudo_builtins_db�stdlib_adts_db�stdlib_modules_db�stdlib_types_db�stdlib_procedures_db�stdlib_variables_db�stdlib_constants_dbr� �lexemes_to_reject�reserved_words�builtins�pseudo_builtins�adts�modules�types�
procedures� variables� constants)r� Z
dialect_idr� Zlexemes_to_reject_set�listZ reswords_setZ builtins_setZpseudo_builtins_setZadts_setZ modules_setZ types_setZprocedures_setZ
variables_setZ
constants_setrg rg r� r� sX
zModula2Lexer.set_dialectc
C s� d}d}t |�}t |�}|}| }t |�|| kr�|�|�r�|�|�r�|||� }tdt | j��D ]} || j| krb| S qbdS dS d S )Nz(*!�*)r� r� )�len�
startswith�endswith�ranger� )
r� Z dialect_tagZleft_tag_delimZright_tag_delimZleft_tag_delim_lenZright_tag_delim_lenZindicator_startZ
indicator_endZ indicator�indexrg rg r� � get_dialect_from_dialect_tag| s" ��
z)Modula2Lexer.get_dialect_from_dialect_tagc c s� t �| |�D �]�\}}}| jsJ|tjkrJ| �|�}|dkrJ| �|� d| _|tu �rJ|| jv rtt j
}| j rr|� � }n�|| j
v r�tj}| j r�|� � }n�|| jv r�tjj}| j r�|� � }n�|| jv r�| js�tj}ntjj}| j r�|� � }n`|| jv r�tj}nN|| jv �r tj}n:|| jv �r tj}n&|| jv �r4tj}n|| jv �r�tj }�nt|t v �r�| j dv�r�d|v �s||dd� dv �r�t }nT| j dv �r�|t j u �r�t }n6|t j!u �r�d |v �r�t }n|t j"u �r�d
|v �r�t }n�|tv �rX|tj#u �r�| j dv�r�t }|tj$u �r�|�%d ��r*| j �%d ��r*t }n,|�%d
��r�| j dk�r�| j �%d ��s�tj&}nf|| j'v �rht }| j �r�|dk�r�d}n>|dk�r�d}n.|dk�r�d}n |dk�r�d}n|dk�r�d}|||fV q d S )Nr� T)r� r� r� �'r � )Z0b�0xZ0u)r� r� �H�Ez<*r� z(*$�#u ≠r u ≤r u ≥r u ≡r< u •)(r �get_tokens_unprocessedr� r �Specialr� r� r
r� r ZReservedr� �lowerr� ZBuiltinr� ZPseudor� r� � Namespacer� r� ZClassr� ZFunctionr� ZVariabler� ZConstantr r� r �Oct�Hex�Float�Single�Preprocr� � Multiliner� )r� �textr� �token�valueZindicated_dialectrg rg r� r� � s�
� �
�
z#Modula2Lexer.get_tokens_unprocessedc C sH d| v rd| v rd| v s d S d}t �d| �r4|d7 }t �d| �rDd}|S ) Nz(*r� r r z
\bPROCEDURE\bg333333�?z \bFUNCTION\bg )�re�search)r� �resultrg rg r� � analyse_text s zModula2Lexer.analyse_textN)^�__name__�
__module__� __qualname__�name�aliases� filenamesZ mimetypesr� � MULTILINE�DOTALL�flagsr r r� r
r ZBinr� r� ZIntegerr� r �Doubler� r r
r� r� r �tokensZcommon_reserved_wordsZcommon_builtinsZcommon_pseudo_builtinsZpim_lexemes_to_rejectZ pim_additional_reserved_wordsZpim_additional_builtinsZ pim_additional_pseudo_builtinsZiso_lexemes_to_rejectZ iso_additional_reserved_wordsZiso_additional_builtinsZ iso_additional_pseudo_builtinsZm2r10_lexemes_to_rejectZ m2r10_additional_reserved_wordsZm2r10_additional_builtinsZ m2r10_additional_pseudo_builtinsZobjm2_lexemes_to_rejectZ objm2_additional_reserved_wordsZobjm2_additional_builtinsZ objm2_additional_pseudo_builtinsZ aglet_additional_reserved_wordsZaglet_additional_builtinsZ aglet_additional_pseudo_builtinsZ gm2_additional_reserved_wordsZgm2_additional_builtinsZ gm2_additional_pseudo_builtinsZ p1_additional_reserved_wordsZp1_additional_builtinsZ p1_additional_pseudo_builtinsZ xds_additional_reserved_wordsZxds_additional_builtinsZ xds_additional_pseudo_builtinsZ pim_stdlib_module_identifiersZpim_stdlib_type_identifiersZpim_stdlib_proc_identifiersZpim_stdlib_var_identifiersZ pim_stdlib_const_identifiersZ iso_stdlib_module_identifiersZiso_stdlib_type_identifiersZiso_stdlib_proc_identifiersZiso_stdlib_var_identifiersZ iso_stdlib_const_identifiersZ m2r10_stdlib_adt_identifiersZ"m2r10_stdlib_blueprint_identifiersZ m2r10_stdlib_module_identifiersZ m2r10_stdlib_type_identifiersZ m2r10_stdlib_proc_identifiersZ m2r10_stdlib_var_identifiersZ m2r10_stdlib_const_identifiersr� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� rg rg rg r� r s� ���� ���� �����
�
��� � %
���������+� ���������C� ���������C� ���������B���1���������4���������1���������1���������1���������1&f0n)r� Zpygments.lexerr r Z
pygments.utilr r Zpygments.tokenr r r r r
r r r
r �__all__r rg rg rg r� �<module> s
,