HOME


Mini Shell 1.0
DIR: /lib/python3/dist-packages/pygments/lexers/__pycache__/
Upload File :
Current File : //lib/python3/dist-packages/pygments/lexers/__pycache__/unicon.cpython-312.pyc
�

|�ePH���dZddlZddlmZmZmZmZmZmZddl	m
Z
mZmZm
Z
mZmZmZmZgd�ZGd�de�ZGd�d	e�ZGd
�de�Zy)z�
    pygments.lexers.unicon
    ~~~~~~~~~~~~~~~~~~~~~~

    Lexers for the Icon and Unicon languages, including ucode VM.

    :copyright: Copyright 2006-2023 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��eZdZdZdZdgZdgZdgZejZ
defdejfdefdejd	fd
eejeej"�dfdej$fd
ej&fdej(fdej(fdej(fdejfeddd��ej(feddd��ej.fed�defdefdej6fdefdefdeeee��fdefdefdefgd ej@fd!ejBfd"ejDfgd#ed$fd%ed&fd'ej.fed(�gd#ed)fgd*ed&fd+ejFfd,efd-ej(fed(�gd.�Z$y/)0rz<
    For Unicon source code.

    .. versionadded:: 2.4
    �Unicon�uniconz*.icnztext/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|&current|&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|&regions|&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�create�critical�default�end�all�do�else�every�fail�if�import�initial�	initially�	invocable�next�repeat�return�suspend�then�thread�until�while�\b��prefix�suffix(+�Abort�abs�acos�Active�Alert�any�Any�Arb�Arbno�args�array�asin�atan�atanh�Attrib�Bal�bal�Bg�Break�Breakx�callout�center�char�chdir�chmod�chown�chroot�	classname�Clip�Clone�close�cofail�collect�Color�
ColorValue�condvar�constructor�copy�CopyArea�cos�Couple�crypt�cset�ctime�	dbcolumns�dbdriver�dbkeys�dblimits�	dbproduct�dbtables�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�Eye�Fail�fcntl�fdup�Fence�fetch�Fg�
fieldnames�filepair�FillArc�
FillCircle�FillPolygon�
FillRectangle�find�flock�flush�Font�fork�	FreeColor�	FreeSpace�function�get�getch�getche�getegid�getenv�geteuid�getgid�getgr�gethost�getpgrp�getpid�getppid�getpw�	getrusage�getserv�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�Normals�NotAny�numeric�open�opencl�oprec�ord�OutPort�PaletteChars�PaletteColor�
PaletteKey�
paramnames�parent�Pattern�Peek�Pending�pipe�Pixel�	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�Rpos�Rtab�rtod�runerr�save�Scale�seek�select�send�seq�serial�set�setenv�setgid�setgrent�
sethostent�setpgrp�setpwent�
setservent�setuid�signal�sin�sort�sortf�Span�spawn�sql�sqrt�stat�staticnames�stop�	StopAudio�string�	structure�Succeed�Swi�symlink�
sys_errstr�system�syswrite�Tab�tab�table�tan�Texcoord�Texture�	TextWidth�	Translate�trap�trim�truncate�trylock�type�umask�Uncouple�unlock�upto�utime�variable�VAttrib�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�;rt�"[^"]+"|\w+�rootru�\)�\w+�,�(:string|:integer|:real)\b�rxrhrrruN�%�__name__�
__module__�__qualname__�__doc__r��aliases�	filenames�	mimetypes�re�	MULTILINE�flagsr	r
�Singler�Declarationr�Type�PreProc�Constant�Reservedrr
�Functionrrr�	Characterrrrr�Hex�Float�Integer�Variable�tokens���8/usr/lib/python3/dist-packages/pygments/lexers/unicon.pyrrsJ����D��j�G��	�I���I��L�L�E��$��
����'�
�$��
&��(;�(;�\�J�
"�
�g�)�)�4����
>�
�
L�5�6=�o�o�
G�
��!1�!1�2�� '�/�/�
1�!�'�"2�"2�3�
0�'�2B�2B�C�
#�W�%8�%8�9�
�4�
=B�%�Q��
�
�

��=�z"'�u�{=6�|�]�]�}>
�~
�I��6�7?�
A�
!�6�*�
!�6�#3�#3�4�
 �(�+�
�H��
��$��d��!<�=�
��$�
&��4�
�T�N�Sj
�XD�V�Z�Z�P�
7����F�
.����?�
��K�!8�9�
�;��'�
�T�]�]�+��F�O�	
��K��/�
��K��(�
�T�]�]�#�
�;��
*�G�,<�,<�=��F�O�
�uA�Fr�rc��eZdZdZdZdgZddgZgZejZ
defdejfdefdejd	fd
eejeej"�dfdej$fd
ej&fdej(fdej(fdej(fdejfeddd��ej(feddd��ej.fed�defdefdej6fdefdeeee��fdefdefdefgdej@fd ejBfd!ejDfgd"ed#fd$ed%fd&ej.fed'�gd"ed(fgd)ed%fd*ejFfd+efd,ej(fed'�gd-�Z$y.)/rz4
    Lexer for Icon.

    .. versionadded:: 1.6
    �Icon�iconz*.iconz*.ICONrrrrrrrrrr z(global|local|static)\b�link)r!r"r#r%r&r'r(r)r*r+r,r.r0r1r2r3r4r5r7r8r9r:)�r>r?r@rArBrFrGrHrIrJrKrMrNrQrRrSrTrUrVrWrYrZr[r\r]r^r_r`rbrcrdrerfrgrhrorprqrrrsrtrurvrwrxryrzr{r|r}r~rr�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�rrrrrrrrrr	r
rrr
rrrrrrrrrrrrrrrrrr r!r"r)r*r+r,r-r/r0r1r2r3r4r6r7r9r:r;r<r=r?r@rArBrCrDrErFrGrHrIrJrKrLrMrNrOrPrRrSrTrUrVrWrXrYrZr[r\r]r^r_r`rarbrcrdrerfrgrhzS===|~===|\*\*|\+\+|--|\.|==|~==|<=|>=|=|~=|<<=|<<|>>=|>>|:=:|:=|<->|<-|\+:=|\|\||\|rirjrkrlrmz<>|=>|[()|:;,.'`{}%\^&?]rnrorprqrrrsrvrtrwrxruryrzr{r|r}Nr~r�r�r�rr�sA���
�D��h�G��8�$�I��I��L�L�E��$��
����'�
�$��
&��(;�(;�\�J�
"�
�g�)�)�4����
>�
�
L�5�6=�o�o�
G�
��!1�!1�2�� '�/�/�
1�!�'�"2�"2�3�
'��)9�)9�:�
�g�)�)�*�
�*�
38��G��
�
�

��:�t"'�u�u:6�v�]�]�w;
�x
�I��+�,4�
6�
!�6�*�
!�6�#3�#3�4�
 �(�+�
��$��d��!<�=�
��$�
(�+�6�
�T�N�Kf
�PD�V�Z�Z�P�
7����F�
.����?�
��K�!8�9�
�;��'�
�T�]�]�+��F�O�	
��K��/�
��K��(�
�T�]�]�#�
�;��
*�G�,<�,<�=��F�O�
�m}�Fr�rc
�N�eZdZdZdZdgZgd�ZgZejZ
ddefeddd��e
jfed	dd��efed
dd��ej feddd��e
j"fdej&fd
ej(fdej(fdefdefdefgiZd�Zy)rz@
    Lexer for Icon ucode files.

    .. versionadded:: 2.4
    �ucode)z*.uz*.u1z*.u2rxz(#.*\n))
�con�declendr&�global�implr0�labr��local�record�uid�unions�versionr9r:)�colm�filen�line�synt)Y�asgn�bang�bscan�cat�ccase�chfail�coactr\�compl�coretr#rg�diff�div�dup�efail�einitr&�eqv�eret�error�escan�esusp�field�goto�init�int�inter�invoke�keywd�lconcat�lexeq�lexge�lexgt�lexle�lexlt�lexne�limit�llist�lsusp�mark�mark0�minus�mod�mult�neg�neqv�nonnull�noop�null�number�numeq�numge�numgt�numle�numlt�numne�pfail�plus�pnullr��power�pretr��psusp�push1�pushn1�random�rasgn�rcv�rcvbkr�refresh�rswap�sdup�sect�size�snd�sndbk�str�subsc�swap�tabmat�tally�toby�trace�unmark�value�var)rBr"�endcase�endevery�endif�	endifelse�	endrepeat�
endsuspend�enduntil�endwhiler*r,�ifelser2r4r7r8z\d+(\s*|\.$|$)z[+-]?\d*\.\d+(E[-+]?\d+)?z[+-]?\d+\.\d*(E[-+]?\d+)?z"(<>|=>|[()|:;,.'`]|[{}]|[%^]|[&?])z\s+\bz[\w-]+c�t�d}d|vr|dz
}d|vr|dz
}d|vr|dz
}d|vr	d|vr|dz
}d	|vr	d
|vr|dz
}|S)z}endsuspend and endrepeat are unique to this language, and
        \self, /self doesn't seem to get used anywhere else either.rrg�������?rz:=g{�G�z�?�	procedurer&z\selfz/selfg�?r�)�text�results  r��analyse_textzUcodeLexer.analyse_text�sq�����4���c�M�F��$���c�M�F��4�<��d�N�F��$��5�D�=��d�N�F�
�t���D� 0��c�M�F��
r�N)rr�r�r�r�r�r�r�r�r�r�r
rr
r�rr�r�rr�r�rr	r�rr�r�r�rr2s���
�D��i�G�'�I��I��L�L�E�	�
��!�
���U�,��]�]�	
��1��U�,��
�� �:).�e�;=�<�
 �
 �=
"�>�
��%�)��]�]�
�����/�
)�6�<�<�8�
)�6�<�<�8�
2�K�@�
�t��
���CB
�D�F�Lr�r)r�r��pygments.lexerrrrrrr�pygments.tokenr	r
rrr
rrr�__all__rrrr�r�r��<module>rsW���
�L�L����5��O�*�O�dI�
�I�Xi��ir�