File: //opt/alt/python311/lib/python3.11/site-packages/pygments/lexers/__pycache__/oberon.cpython-311.pyc
�
�;fr � �p � d Z ddlZddlmZmZmZ ddlmZmZm Z m
Z
m Z m Z m
Z
mZ dgZ G d� de� � ZdS )z�
pygments.lexers.oberon
~~~~~~~~~~~~~~~~~~~~~~
Lexers for Oberon family languages.
:copyright: Copyright 2006-2024 by the Pygments team, see AUTHORS.
:license: BSD, see LICENSE for details.
� N)�
RegexLexer�include�words)�Text�Comment�Operator�Keyword�Name�String�Number� Punctuation�ComponentPascalLexerc �& � e Zd ZdZdZddgZddgZdgZdZd Z e
j e
j z Z
ed
� � ed � � ed � � ed
� � ed� � ed� � ed� � ed� � gdefdefgdej fgdefgdej fdej fdej fdej fdej fgdefd efgd efd efd efd efd!efd"efd#efd$efd%efg d&efg ed'd(�)� � ej f ed*d(�)� � ej fd+ej fgd,� Z d-� Z d.S )/r z+
For Component Pascal source code.
zComponent Pascal�componentpascal�cpz*.cpz*.cpsztext/x-component-pascalz https://blackboxframework.orgz2.1�
whitespace�comments� punctuation� numliterals�strings� operators�builtins� identifiersz\n+z\s+z\(\*([^$].*?)\*\)z[()\[\]{},.:;|]z [0-9A-F]+X\bz[0-9A-F]+[HL]\bz[0-9]+\.[0-9]+E[+-][0-9]+z[0-9]+\.[0-9]+z[0-9]+z '[^\n']*'z "[^\n"]*"z[+-]z[*/]z[=#<>]z\^�&�~z:=z\.\.z\$z([a-zA-Z_$][\w$]*)) �ANYPTR�ANYREC�BOOLEAN�BYTE�CHAR�INTEGER�LONGINT�REAL�SET� SHORTCHAR�SHORTINT� SHORTREALz\b)�suffix)>�ABS�ABSTRACT�ARRAY�ASH�ASSERT�BEGIN�BITS�BY�CAP�CASE�CHR�CLOSE�CONST�DEC�DIV�DO�ELSE�ELSIF�EMPTY�END�ENTIER�EXCL�EXIT�
EXTENSIBLE�FOR�HALT�IF�IMPORT�IN�INC�INCL�IS�LEN�LIMITED�LONG�LOOP�MAX�MIN�MOD�MODULE�NEW�ODD�OF�OR�ORD�OUT�POINTER� PROCEDURE�RECORD�REPEAT�RETURN�SHORTr% r& �SIZE�THEN�TYPE�TO�UNTIL�VAR�WHILE�WITHz(TRUE|FALSE|NIL|INF)\b) �rootr r r r r r r r c �R � d}d| v r|dz
}d| v r|dz
}d| v r|dz
}d| v r|dz
}|S )z�The only other lexer using .cp is the C++ one, so we check if for
a few common Pascal keywords here. Those are unfortunately quite
common across various business languages as well.r r. g{�G�z�?r< rX � )�text�results �I/opt/alt/python311/lib/python3.11/site-packages/pygments/lexers/oberon.py� analyse_textz!ComponentPascalLexer.analyse_textj sX � � �� �d�?�?� �d�N�F� �D�=�=� �d�N�F� �$� � � �d�N�F� �D�=�=� �d�N�F��
� N)!�__name__�
__module__� __qualname__�__doc__�name�aliases� filenames� mimetypes�url�
version_added�re� MULTILINE�DOTALL�flagsr r r � Multiliner
r �Hex�Float�Integerr r r
r r �Type�Reserved�Constant�tokensrk rg rl rj r r s6 � � � � � �� � �D� �$�'�G���!�I�*�+�I�
)�C��M� �L�2�9� $�E�
�G�L� !� !� �G�J� � � �G�M� "� "� �G�M� "� "� �G�I� � � �G�K� � � �G�J� � � �G�M� "� "�
� �T�N�
�T�N�
�
"�7�#4� 5�
�
�� -�
� �f�j� )�
��� ,�
)�6�<� 8�
�� � -�
��� '�
� �6� "�
�6� "�
� �h� �
�h� �
�� !�
�H� �
�8� �
�8� �
�H� �
�h� �
�H� �!
�& #�D� )�
� �U� � �!� !� !� #*�,�
0� �U� � � !� !� !� #*�"2�
4� '��(8� 9�
�mG� G�F�R� � � � rl )rp rw �pygments.lexerr r r �pygments.tokenr r r r r
r r r
�__all__r rg rl rj �<module>r� s� ��� �
� � � � 5� 5� 5� 5� 5� 5� 5� 5� 5� 5�� � � � � � � � � � � � � � � � � � � � "�
"��d� d� d� d� d�:� d� d� d� d� drl