|
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
���a_0 � @ sp d Z ddlZddlmZmZ ddlmZmZmZm Z m
Z
m Z m Z m
Z
ddgZG dd� de�ZG dd� de�ZdS ) z�
pygments.lexers.prolog
~~~~~~~~~~~~~~~~~~~~~~
Lexers for Prolog and Prolog-like languages.
:copyright: Copyright 2006-2021 by the Pygments team, see AUTHORS.
:license: BSD, see LICENSE for details.
� N)�
RegexLexer�bygroups)�Text�Comment�Operator�Keyword�Name�String�Number� Punctuation� PrologLexer� LogtalkLexerc @ s4 e Zd ZdZdZdgZg d�ZdgZej ej
B Z de j
dfde jfd ejfd
ejfd ejfd ejfd
ejfdejfdejfdefdefdejfdejfdefdefdefdefde e j e�fde e j e e�fde e j e e�fdejfd ejfd e j!fd e fgd e j
d fde j
d!fd"e j
fd#e j
fgd$�Z"d%d&� Z#d'S )(r z!
Lexer for Prolog files.
�Prolog�prolog)z*.eclz*.prologz*.proz*.plz
text/x-prologz/\*�nested-commentz%.*z0\'.�0b[01]+�0o[0-7]+�0x[0-9a-fA-F]+z\d\d?\'[a-zA-Z0-9]+z%(\d+\.\d*|\d*\.\d+)([eE][+-]?[0-9]+)?z\d+z[\[\](){}|.,;!]z:-|-->z`"(?:\\x[0-9a-fA-F]+\\|\\u[0-9a-fA-F]{4}|\\U[0-9a-fA-F]{8}|\\[0-7]+\\|\\["\\abcefnrstv]|[^\\"])*"z'(?:''|[^'])*'zis\bz5(<|>|=<|>=|==|=:=|=|/|//|\*|\+|-)(?=\s|[a-zA-Z0-9\[])z(mod|div|not)\b�_z ([a-z]+)(:)zh([a-z\u00c0-\u1fff\u3040-\ud7ff\ue000-\uffef][\w$\u00c0-\u1fff\u3040-\ud7ff\ue000-\uffef]*)(\s*)(:-|-->)zd([a-z\u00c0-\u1fff\u3040-\ud7ff\ue000-\uffef][\w$\u00c0-\u1fff\u3040-\ud7ff\ue000-\uffef]*)(\s*)(\()zY[a-z\u00c0-\u1fff\u3040-\ud7ff\ue000-\uffef][\w$\u00c0-\u1fff\u3040-\ud7ff\ue000-\uffef]*z/[#&*+\-./:<=>?@\\^~\u00a1-\u00bf\u2010-\u303f]+z [A-Z_]\w*z&\s+|[\u2000-\u200f\ufff0-\ufffe\uffef]z\*/�#popz#pushz[^*/]+z[*/])�rootr c C s d| v S )Nz:-� ��textr r �8/usr/lib/python3/dist-packages/pygments/lexers/prolog.py� analyse_textR s zPrologLexer.analyse_textN)$�__name__�
__module__� __qualname__�__doc__�name�aliases� filenames� mimetypes�re�UNICODE� MULTILINE�flagsr � Multiline�Singler �Charr
�Bin�Oct�Hex�Integer�Floatr �Double�Atomr r r r � Namespace�Functionr �Variable�tokensr r r r r r sf
�� � ����
+
�� 3c @ s� e Zd ZdZdZdgZddgZdgZg dedf�d e f�d
e f�d e
f�d e
f�d
e f�de j f�de j
f�de jf�de f�dejf�def�def�def�def�def�def�def�def�def�d ef�d ef�d ef�d ef�d ef�d!ef�d"ef�d#ef�d$ef�d%ef�d&ef�d'ef�d(ef�d)ef�d*ef�d+ef�d,ef�d-ef�d.ef�d/ef�d0ef�d1ef�d2ef�d3ef�d4ef�d5ef�d6ef�d7ef�d8ef�d9ef�d:ef�d;ef�d<ef�d=ef�d>ef�d?ef�d@ef�dAef�dBef�dCef�dDef�dEef�dFef�dGef�dHef�dIef�dJef�dKef�dLef�dMef�dNef�dOef�dPef�dQef�dRef�dSef�dTef�dUef�dVef�dWef�dXe
f�dYe
f�dZed[f�d\efdZed]fd^ejfd_efd`efgdaedbfdcedbfddedefdfedbfdgedbfdhedbfdiedbfdjedbfdkedbfdledbfdmedbfdne
dbfdoe
dbfg
dpefd
e fde j fde j
fde jfde fdejfdYe
fdZed[fdWefdqe
dbfdrefdXe
fd e fd
e fd e
fd e
fgds�Zdtdu� ZdvS )wr
zW
For `Logtalk <http://logtalk.org/>`_ source code.
.. versionadded:: 0.10
�Logtalk�logtalkz*.lgtz *.logtalkztext/x-logtalkz^\s*:-\s� directivez%.*?\nz/\*(.|\n)*?\*/z\nz\s+z0'[\\]?.r r r z\d+\.?\d*((e|E)(\+|-)?\d+)?z([A-Z_][a-zA-Z0-9_]*)z(after|before)(?=[(])zforward(?=[(])z+(context|parameter|this|se(lf|nder))(?=[(])z-(current_predicate|predicate_property)(?=[(])z8(expand_(goal|term)|(goal|term)_expansion|phrase)(?=[(])z;(abolish|c(reate|urrent))_(object|protocol|category)(?=[(])z*(object|protocol|category)_property(?=[(])z.co(mplements_object|nforms_to_protocol)(?=[(])z)extends_(object|protocol|category)(?=[(])z*imp(lements_protocol|orts_category)(?=[(])z%(instantiat|specializ)es_class(?=[(])z.(current_event|(abolish|define)_events)(?=[(])z((create|current|set)_logtalk_flag(?=[(])zMlogtalk_(compile|l(ibrary_path|oad|oad_context)|make(_target_action)?)(?=[(])z\blogtalk_make\bz (clause|retract(all)?)(?=[(])za(bolish|ssert(a|z))(?=[(])z(ca(ll|tch)|throw)(?=[(])z0(fa(il|lse)|true|(instantiation|system)_error)\bzY(type|domain|existence|permission|representation|evaluation|resource|syntax)_error(?=[(])z!((bag|set)of|f(ind|or)all)(?=[(])zBthreaded(_(ca(ll|ncel)|once|ignore|exit|peek|wait|notify))?(?=[(])zRthreaded_engine(_(create|destroy|self|next|next_reified|yield|post|fetch))?(?=[(])z.(subsumes_term|unify_with_occurs_check)(?=[(])z8(functor|arg|copy_term|numbervars|term_variables)(?=[(])z%(div|rem|m(ax|in|od)|abs|sign)(?=[(])z)float(_(integer|fractional)_part)?(?=[(])z*(floor|t(an|runcate)|round|ceiling)(?=[(])z6(cos|a(cos|sin|tan|tan2)|exp|log|s(in|qrt)|xor)(?=[(])zZ(var|atom(ic)?|integer|float|c(allable|ompound)|n(onvar|umber)|ground|acyclic_term)(?=[(])zcompare(?=[(])z (curren|se)t_(in|out)put(?=[(])z(open|close)(?=[(])zflush_output(?=[(])z!(at_end_of_stream|flush_output)\bz=(stream_property|at_end_of_stream|set_stream_position)(?=[(])z,(nl|(get|peek|put)_(byte|c(har|ode)))(?=[(])z\bnl\bzread(_term)?(?=[(])z"write(q|_(canonical|term))?(?=[(])z(current_)?op(?=[(])z!(current_)?char_conversion(?=[(])z(atom_(length|c(hars|o(ncat|des)))(?=[(])z(char_code|sub_atom)(?=[(])znumber_c(har|ode)s(?=[(])z (se|curren)t_prolog_flag(?=[(])z\bhalt\bz halt(?=[(])z (::|:|\^\^)z[{}]z(ignore|once)(?=[(])z
\brepeat\bz(key)?sort(?=[(])z(>>|<<|/\\|\\\\|\\)z\bas\bz\bis\bz(=:=|=\\=|<|=<|>=|>)z=\.\.z(=|\\=)z(==|\\==|@=<|@<|@>=|@>)z (//|[-+*/])z\b(e|pi|div|mod|rem)\bz\b\*\*\bz-->z ([!;]|->)z\\+z[?@]z\^z"(\\\\|\\[^\\]|[^"\\])*"z [()\[\],.|]z[a-z][a-zA-Z0-9_]*�'� quoted_atomz''r z+\\([\\abfnrtv"\']|(x[a-fA-F0-9]+|[0-7]+)\\)z [^\\'\n]+z\\z(el)?if(?=[(])r z(e(lse|ndif))(?=[.])z!(category|object|protocol)(?=[(])�entityrelationsz'(end_(category|object|protocol))(?=[.])z!(public|protected|private)(?=[(])z%e(n(coding|sure_loaded)|xport)(?=[(])z in(clude|itialization|fo)(?=[(])z/(built_in|dynamic|synchronized|threaded)(?=[.])zz(alias|d(ynamic|iscontiguous)|m(eta_(non_terminal|predicate)|ode|ultifile)|s(et_(logtalk|prolog)_flag|ynchronized))(?=[(])z op(?=[(])z:(c(alls|oinductive)|module|reexport|use(s|_module))(?=[(])z[a-z][a-zA-Z0-9_]*(?=[(])z[a-z][a-zA-Z0-9_]*(?=[.])zH(complements|extends|i(nstantiates|mp(lements|orts))|specializes)(?=[(])z([)]\.)z(::))r r: r8 r; c C s< d| v rdS d| v r dS d| v rdS t �d| t j�r dS dS )Nz
:- object(g �?z :- protocol(z :- category(z
^:-\s[a-z]g�������?g )r$ �search�Mr r r r r ' s zLogtalkLexer.analyse_textN)r r r r r r! r" r# r r r r
r+ r, r- r r4 r r r �Escaper5 r r r r r r
V s� �����
� � �
�������� � � � �!�"�$�&�(�)�+�,�.�/�0�2�4�6�8�:�<�=�>�@�B�D�F�G�H�I�J�L�M�O�P�Q�R�T�U�V�X�Y�Z�\�^�`�a�c�e�g�i�k�m�o�q�s�t�v�x�z�|�~� �� �� �� �� �� �
�� �� F)r r$ �pygments.lexerr r �pygments.tokenr r r r r r r
r �__all__r r
r r r r �<module> s
(B