|
Server : Apache System : Linux iad1-shared-b8-43 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64 User : dh_edsupp ( 6597262) PHP Version : 8.2.26 Disable Function : NONE Directory : /lib/python3/dist-packages/pygments/lexers/__pycache__/ |
Upload File : |
o
���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
�Unicon�uniconz*.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�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�;rr � "[^"]+"|\w+�rootrs �\)�\w+�,�(:string|:integer|:real)\b�rv rf r r rs N�%�__name__�
__module__� __qualname__�__doc__r� �aliases� filenames� mimetypes�re� MULTILINE�flagsr r �Singler � Declarationr �Type�PreProc�Constant�Reservedr r �Functionr r
r
� Characterr r r r �Hex�Float�Integer�Variable�tokens� r� r� �8/usr/lib/python3/dist-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
�Icon�iconz*.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/ r0 r1 r2 r3 r5 r6 r7 r8 )�r< r= r> r? r@ rD rE rF rG rH rI rK rL rO rP rQ rR rS rT rU rW rX rY rZ r[ r\ r] r^ r` ra rb rc rd re rf 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/ r0 r1 r2 r4 r5 r7 r8 r9 r: r; r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r_ r` ra rb rc rd re rf zS===|~===|\*\*|\+\+|--|\.|==|~==|<=|>=|=|~=|<<=|<<|>>=|>>|:=:|:=|<->|<-|\+:=|\|\||\|rg rh ri rj rk z<>|=>|[()|:;,.'`{}%\^&?]rl rm rn ro rp rq rt rr ru rv rs rw rx ry rz r{ Nr| r� r� r� r� 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
�ucode)z*.uz*.u1z*.u2rv z(#.*\n))
�con�declendr$ �global�implr. �labr� �local�record�uid�unions�versionr7 r8 )�colm�filen�line�synt)Y�asgn�bang�bscan�cat�ccase�chfail�coactrZ �compl�coretr! re �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)r@ r �endcase�endevery�endif� endifelse� endrepeat�
endsuspend�enduntil�endwhiler( r* �ifelser0 r2 r5 r6 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 r|d7 }d| v r&d| v r&|d7 }d | v r2d
| v r2|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�?� procedurer$ z\selfz/selfg �?r� )�text�resultr� r� r� � analyse_text� s zUcodeLexer.analyse_textN)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 2 sL � �
�� � � � �
�� Fr )r� r� �pygments.lexerr r r r r r �pygments.tokenr r r
r r r
r r �__all__r r r r� r� r� r� �<module> s
(