| 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ҼaPH � @ s� d Z ddlZddlmZmZmZmZmZmZ ddl m
Z
m Z m Z m
Z
mZmZmZmZ g d�ZG dd� de�ZG dd � d e�ZG d
d � d e�ZdS ) z�
pygments.lexers.unicon
~~~~~~~~~~~~~~~~~~~~~~
Lexers for the Icon and Unicon languages, including ucode VM.
:copyright: Copyright 2006-2021 by the Pygments team, see AUTHORS.
:license: BSD, see LICENSE for details.
� N)�
RegexLexer�include�bygroups�words�using�this)�Text�Comment�Operator�Keyword�Name�String�Number� Punctuation)� IconLexer�
UcodeLexer� UniconLexerc @ sl e Zd ZdZdZdgZdgZdgZej Z
de fde j
fde fdejd fd
eeje ej�d fd ejfd
ejfdejfdejfdejfdejfedddd�ejfedddd�ejfed�defdefdejfdefdefd eee e ��fd e fd e fd e fgd e j fd!e j!fd"e j"fgd#e d$fd%e d&fd'ejfed(�gd#e d)fgd*e d&fd+ej#fd,e fd-ejfed(�gd.�Z$d/S )0r z<
For Unicon source code.
.. versionadded:: 2.4
ZUniconZuniconz*.icnz text/unicon�[^\S\n]+�#.*?\n�class|method|procedure�
subprogram�(record)(\s+)(\w+)�type_def�^(#line|\$C|\$Cend|\$define|\$else|\$endif|\$error|\$ifdef|\$ifndef|\$include|\$line|\$undef)\b�(&null|&fail)\b� &allocated|&ascii|&clock|&collections|&column|&col|&control|&cset|¤t|&dateline|&date|&digits|&dump|&errno|&errornumber|&errortext|&errorvalue|&error|&errout|&eventcode|&eventvalue|&eventsource|&e|&features|&file|&host|&input|&interval|&lcase|&letters|&level|&line|&ldrag|&lpress|&lrelease|&main|&mdrag|&meta|&mpress|&mrelease|&now|&output|&phi|&pick|&pi|&pos|&progname|&random|&rdrag|®ions|&resize|&row|&rpress|&rrelease|&shift|&source|&storage|&subject|&time|&trace|&ucase|&version|&window|&x|&y�(by|of|not|to)\bz (global|local|static|abstract)\bzpackage|link|import)�break�case�createZcritical�default�end�all�do�else�every�fail�if�import�initialZ initially� invocable�next�repeat�return�suspend�then�thread�until�while�\b��prefix�suffix(+ ZAbort�abs�acos�Active�Alert�any�AnyZArbZArbno�args�array�asin�atan�atanh�AttribZBal�bal�BgZBreakZBreakx�callout�center�char�chdir�chmod�chown�chrootZ classname�Clip�Clone�close�cofail�collect�Color�
ColorValue�condvar� constructor�copy�CopyArea�cos�Couple�crypt�cset�ctimeZ dbcolumnsZdbdriverZdbkeysZdblimitsZ dbproductZdbtables�delay�delete�detab�display�DrawArc�
DrawCircle�DrawCube� DrawCurve� DrawCylinder�DrawDisk� DrawImage�DrawLine� DrawPoint� DrawPolygon�
DrawRectangle� DrawSegment�
DrawSphere�
DrawString� DrawTorus�dtor�entab� EraseArea�
errorclear�Event� eventmask�EvGet�EvSend�exec�exit�exp�EyeZFail�fcntl�fdupZFence�fetch�Fg�
fieldnamesZfilepair�FillArc�
FillCircle� FillPolygon�
FillRectangle�find�flock�flush�Font�fork� FreeColor� FreeSpace�function�get�getch�getche�getegid�getenv�geteuid�getgidZgetgrZgethost�getpgrp�getpid�getppidZgetpwZ getrusageZgetserv�GetSpace� gettimeofday�getuid� globalnames�GotoRC�GotoXY�gtime�hardlink�iand�icom�IdentityMatrix�image�InPort�insert�Int86�integer�ioctl�ior�ishift�istate�ixor�kbhit�key�keyword�kill�left�Len�list�load�loadfunc�
localnames�lock�log�Lower�lstat�many�map�match�
MatrixMode�max�member� membernames� methodnames�methods�min�mkdir�move�
MultMatrix�mutex�name�NewColor�NormalsZNotAny�numeric�open�opencl�oprec�ord�OutPort� PaletteChars� PaletteColor�
PaletteKey�
paramnames�parent�Pattern�Peek�Pending�pipe�PixelZ PlayAudio�Poke�pop� PopMatrix�Pos�pos�proc�pull�push�
PushMatrix�
PushRotate� PushScale�
PushTranslate�put� QueryPointer�Raise�read� ReadImage�readlink�reads�ready�real�receive�Refresh�Rem�remove�rename�repl�reverse�right�rmdir�Rotate�RposZRtab�rtod�runerr�save�Scale�seek�select�send�seq�serial�set�setenv�setgidZsetgrentZ
sethostent�setpgrpZsetpwentZ
setservent�setuid�signal�sin�sort�sortfZSpan�spawn�sql�sqrt�stat� staticnames�stopZ StopAudio�string� structureZSucceed�Swi�symlink�
sys_errstr�system�syswriteZTab�tab�table�tan�Texcoord�Texture� TextWidth� Translate�trap�trim�truncate�trylock�type�umask�Uncouple�unlock�upto�utime�variableZVAttrib�wait�WAttrib�WDefault�WFlush�where� WinAssociate� WinButton�WinColorDialog�WindowContents�
WinEditRegion�
WinFontDialog�
WinMenuBar�
WinOpenDialog� WinPlayMedia�
WinSaveDialog� WinScrollBar�WinSelectDialog�write�
WriteImage�writes�WSection�WSync�numberszc<@|<<@|>@|>>@|\.>|->|===|~===|\*\*|\+\+|--|\.|~==|~=|<=|>=|==|=|<<=|<<|>>=|>>|:=:|:=|->|<->|\+:=|\|�"(?:[^\\"]|\\.)*"�'(?:[^\\']|\\.)*'�[*<>+=/&!?@~\\-]z\^�(\w+)(\s*|[(,])�[\[\]]z<>|=>|[()|:;,.'`{}%&?]�\n+�3\b([+-]?([2-9]|[12][0-9]|3[0-6])[rR][0-9a-zA-Z]+)\b�'[+-]?[0-9]*\.([0-9]*)([Ee][+-]?[0-9]*)?� \b([+-]?[0-9]+[KMGTPkmgtp]?)\b�\(��#pop� formal_part�;rM � "[^"]+"|\w+�rootrN �\)�\w+�,�(:string|:integer|:real)\b�rQ rA r r rN N�%�__name__�
__module__� __qualname__�__doc__r� �aliases� filenames� mimetypes�re� MULTILINE�flagsr r �Singler � Declarationr �TypeZPreProc�ConstantZReservedr r �Functionr r
r
Z Characterr r r r ZHex�Float�IntegerZVariable�tokens� rj rj �:/usr/lib/python3.9/site-packages/pygments/lexers/unicon.pyr s�
�� � ��=�>�?��l�����r c @ sf e Zd ZdZdZdgZddgZg Zej Z
de fde j
fde fdejd fd
eeje ej�d fd ejfd
ejfdejfdejfdejfdejfedddd�ejfedddd�ejfed�defdefdejfdefdeee e ��fd e fd e fd e fgd e j fd e j!fd!e j"fgd"e d#fd$e d%fd&ejfed'�gd"e d(fgd)e d%fd*ej#fd+e fd,ejfed'�gd-�Z$d.S )/r z4
Lexer for Icon.
.. versionadded:: 1.6
ZIconZiconz*.iconz*.ICONr r r r r r r r r r z(global|local|static)\b�link)r r r r r! r" r# r$ r% r& r' r) r* r+ r, r- r. r/ r1 r2 r3 r4 )�r7 r8 r9 r: r; r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN rO rP rQ rR rS rU rV rW rX rY rZ r[ r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk rl rm rn ro rp rq rr rs rt ru rv rw rx ry rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r r r r r r r r
r r r
r r r r r r r r r r r r r r r r r r r r! r" r# r$ r% r& r' r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r; r< r= r> r? r@ rA zS===|~===|\*\*|\+\+|--|\.|==|~==|<=|>=|=|~=|<<=|<<|>>=|>>|:=:|:=|<->|<-|\+:=|\|\||\|rB rC rD rE rF z<>|=>|[()|:;,.'`{}%\^&?]rG rH rI rJ rK rL rO rM rP rQ rN rR rS rT rU rV NrW rj rj rj rk r � s~
�� � ��:�;�<��h�����r c
@ s� e Zd ZdZdZdgZg d�Zg Zej Z
dde fe dddd�e
jfe d ddd�e fe d
ddd�ejfe d ddd�e
jfd ejfd
ejfdejfdefdefdefg iZdd� ZdS )r z@
Lexer for Icon ucode files.
.. versionadded:: 2.4
Zucode)z*.uz*.u1z*.u2rQ z(#.*\n))
ZconZdeclendr! �global�implr* Zlabrl �local�record�uidZunions�versionr3 r4 )ZcolmZfilen�lineZsynt)YZasgnZbangZbscan�catZccaseZchfailZcoactrO ZcomplZcoretr rZ �diffZdiv�dupZefailZeinitr! ZeqvZeret�errorZescanZesuspZfieldZgoto�init�intZinterZinvokeZkeywdZlconcatZlexeqZlexgeZlexgtZlexleZlexltZlexne�limitZllistZlsuspZmarkZmark0Zminus�modZmult�negZneqvZnonnullZnoopZnullZnumberZnumeqZnumgeZnumgtZnumleZnumltZnumneZpfailZplusZpnullr� ZpowerZpretr� ZpsuspZpush1Zpushn1ZrandomZrasgnZrcvZrcvbkr� ZrefreshZrswapZsdupZsect�sizeZsndZsndbk�strZsubscZswapZtabmatZtallyZtobyZtraceZunmark�value�var)r; r ZendcaseZendeveryZendifZ endifelse� endrepeat�
endsuspendZenduntilZendwhiler% r' Zifelser, r. r1 r2 z\d+(\s*|\.$|$)z[+-]?\d*\.\d+(E[-+]?\d+)?z[+-]?\d+\.\d*(E[-+]?\d+)?z"(<>|=>|[()|:;,.'`]|[{}]|[%^]|[&?])z\s+\bz[\w-]+c C sh d}d| v r|d7 }d| v r$|d7 }d| v r4|d7 }d| v rLd| v rL|d7 }d | v rdd
| v rd|d 7 }|S ) z}endsuspend and endrepeat are unique to this language, and
\self, /self doesn't seem to get used anywhere else either.r r� g�������?r� z:=g{�G�z�?Z procedurer! z\selfz/selfg �?rj )�text�resultrj rj rk � analyse_text� s zUcodeLexer.analyse_textN)rX rY rZ r[ r� r\ r] r^ r_ r` ra r r r rf r rc re r rh rg r r ri r� rj rj rj rk r 2 sJ � �
�� � � � �
��Fr )r[ r_ Zpygments.lexerr r r r r r Zpygments.tokenr r r
r r r
r r �__all__r r r rj rj rj rk �<module> s
(