�

�E�c�
��d�dZd
dl
mZmZ
d
dlmZmZmZmZm	Z	m
Z
mZmZ
dg
Z
Gd�de��ZdS)z�
    pygments.lexers.snobol
    ~~~~~~~~~~~~~~~~~~~~~~

    Lexers for the SNOBOL language.

    :copyright: Copyright 2006-2022 by the Pygments team, see AUTHORS.
    :license: BSD, see LICENSE for details.
�)�
RegexLexer�bygroups)�Text�Comment�Operator�Keyword�Name�String�Number�Punctuation�SnobolLexerc
�$
�eZ
dZd
ZdZdg
Zdg
Zdg
Zdefde	dfd	efd
e
jdfde
jdfd
edfgdedfd
efde
j
fde
fdefdefdefdejfdejfde	dfde	fgdedfd
efdefdee	e
je	��fgdejfg
d�ZdS) r
z�
    Lexer for the SNOBOL4 programming language.

    Recognizes the common ASCII equivalents of the original SNOBOL4 operators.
    Does not require spaces around binary operators.

    .. versionadded:: 1.5
    �Snobol�snobolz*.snobolz
text/x-snobolz\*.*\nz[+.] �	statementz-.*\nzEND\s*\n�heredocz[A-Za-z$][\w$]*z\s+z\s*\nz#popz�(?<=[^\w.])(LT|LE|EQ|NE|GE|GT|INTEGER|IDENT|DIFFER|LGT|SIZE|REPLACE|TRIM|DUPL|REMDR|DATE|TIME|EVAL|APPLY|OPSYN|LOAD|UNLOAD|LEN|SPAN|BREAK|ANY|NOTANY|TAB|RTAB|REM|POS|RPOS|FAIL|FENCE|ABORT|ARB|ARBNO|BAL|SUCCEED|INPUT|OUTPUT|TERMINAL)(?=[^\w.])z[A-Za-z][\w.]*z\*\*|[?$.!%*/#+\-@|&\\=]z"[^"]*"z'[^']*'z[0-9]+(?=[^.EeDd])z%[0-9]+(\.[0-9]*)?([EDed][-+]?[0-9]+)?�
:�gotoz[()<>,;]z#pop:2zF|Sz(\()([A-Za-z][\w.]*)(\))z.*\n)�rootrrrN)�__name__�
__module__�__qualname__�__doc__�name�aliases�	filenames�	mimetypesrrr	�Labelr�Builtinrr
r�Integer�Floatrr�Heredoc�tokens���8/usr/lib/python3/dist-packages/pygments/lexers/snobol.pyr
r
sG
���������D��j�G���I� �!�I��� �
�{�K�0�
�w��
�$�*�i�0�
���[�9�
�T�;�'�

��t�V�$�
�T�N�M
��\�	
�
��%�)�(�3�
�� �
�� �#�F�N�3�
5�v�|�D�
�;��'�
�+�&�+
�2�t�X�&�
�T�N�
�W��
(�
�X�k�4�:�{�
;�
;�

=�	
��f�n�%�
�]
1�1�F�F�Fr%N)r�pygments.lexerrr�pygments.tokenrrrrr	r
rr�__all__r
r$r%r&�<module>r*
s��


�
�
�
0�/�/�/�/�/�/�/�

�

�

�

�

�

�

�

�

�

�

�

�

�

�

�

�

�

�

�

��/��@

�@

�@

�@

�@

�*�@

�@

�@

�@

�@

r%