�

�;f�
��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-2024 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
ZdZdZ	de
fd	ed
fde
fdej
d
fdej
d
fded
fgdedfdefdejfdefdefdefdefdejfdejfdedfdefgdedfdefdefdeeej
e��fgdejfg
d �Zd!S)"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.
    �Snobol�snobolz*.snobolz
text/x-snobolz"https://www.regressive.org/snobol4z1.5z\*.*\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�	mimetypes�url�
version_addedrrr	�Labelr�Builtinrr
r�Integer�Floatrr�Heredoc�tokens���I/opt/alt/python311/lib/python3.11/site-packages/pygments/lexers/snobol.pyr
r
sQ
���������D��j�G���I� �!�I�
.�C��M��� �
�{�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'