File: //lib/python3/dist-packages/pygments/lexers/__pycache__/comal.cpython-311.pyc
�
�E�cT � �l � d Z ddlZddlmZmZ ddlmZmZmZm Z m
Z
m Z m Z m
Z
dgZ G d� de� � ZdS )z�
pygments.lexers.comal
~~~~~~~~~~~~~~~~~~~~~
Lexer for COMAL-80.
:copyright: Copyright 2006-2022 by the Pygments team, see AUTHORS.
:license: BSD, see LICENSE for details.
� N)�
RegexLexer�words)�Comment�
Whitespace�Operator�Keyword�String�Number�Name� Punctuation� Comal80Lexerc �� � e Zd ZdZdZdZddgZddgZej Z
dZ d Z d
e
j fd efd efd
e z ej f eg d�e �� � ej f eg d�e �� � ej f eg d�e �� � ej f eg d�e �� � ej f eg d�e �� � ej fdedfe dz ej fe dz efdej fdej fdej fdej fd e fgd efd ej! fded fgd �Z"d!S )"r
z#
For COMAL-80 source code.
zCOMAL-80z#https://en.wikipedia.org/wiki/COMAL�comal�comal80z*.cmlz*.comalu \b(?!['\[\]←£\\])u [a-z]['\[\]←£\\\w]*z//.*\nz\s+u :[=+-]|\<\>|[-+*/^↑<>=]z(and +then|or +else)) �and�bitand�bitor�bitxor�div�in�mod�not�or)�suffix)?�append�at�case�chain�close�copy�create�cursor�data�delete�dir�do�elif�else�end�endcase�endif�endfor�endloop�endtrap�endwhile�exec�exit�file�for�goto�handler�if�input�let�loop�mount�null�of�open� otherwise�output�page�pass�poke�print�random�read�repeat�report�return�rename�restore�select�step�stop�sys�then�to�trap�unitzunit$�until�using�when�while�write�zone)
�closed�dim�endfunc�endproc�external�func�import�proc�ref�use) �abs�atnzchr$�cos�eod�eof�err�errfile�errtext�esc�exp�intzkey$�len�log�ord�peek� randomize�rnd�sgn�sinzspc$�sqrzstatus$zstr$�tab�tan�time�val)�false�pi�true�"�stringz :(?=[ \n/])z[$#]?z%[01]+z \$[0-9a-f]+z\d*\.\d*(e[-+]?\d+)?z\d+z[(),:;]z[^"]+z"[0-9]*"z#pop)�rootr N)#�__name__�
__module__� __qualname__�__doc__�name�url�aliases� filenames�re�
IGNORECASE�flags�_suffix� _identifierr �Singler r �Wordr r �Reserved� Declarationr �Builtin�Constantr �Labelr
�Bin�Hex�Float�Integerr �Escape�tokens� � �7/usr/lib/python3/dist-packages/pygments/lexers/comal.pyr
r
s� � � � � � �� � �D�
/�C�� �"�G��)�$�I� �M�E� &�G�+�K� ��� '�
�Z� �
)�8� 4�
$�w�
.��
� >�
�U� � � � %�(� (� (�)1� �
8� �U� D� D� D� MT�U� U� U� � �
"� �U� &� &� &�.5�7� 7� 7�8?�8K�
M� �U� � � � (/� 0� 0� 0� 26� �
?�
�U�*�*�*�7�
;�
;�
;�W�=M� N�
�6�8� $�
�>�
)�4�:� 6�
�8�
#�T� *�
��
� #�
�V�Z� (�
$�f�l� 3�
�V�^� $�
�� %�E#
�J �v� �
�&�-� (�
�6�6� "�
�K*� *�F�F�Fr� )r� r� �pygments.lexerr r �pygments.tokenr r r r r r
r r �__all__r
r� r� r� �<module>r� s� ��� �
� � � � ,� ,� ,� ,� ,� ,� ,� ,� � � � � � � � � � � � � � � � � � � � � �
��<� <� <� <� <�:� <� <� <� <� <r�