HOME


Mini Shell 1.0
DIR: /usr/lib/python3/dist-packages/pygments/lexers/__pycache__/
Upload File :
Current File : //usr/lib/python3/dist-packages/pygments/lexers/__pycache__/rebol.cpython-312.pyc
�

|�eHG���dZddlZddlmZmZddlmZmZmZm	Z	m
Z
mZmZm
Z
mZddgZGd�de�ZGd�de�Zy)	z�
    pygments.lexers.rebol
    ~~~~~~~~~~~~~~~~~~~~~

    Lexers for the REBOL and related languages.

    :copyright: Copyright 2006-2023 by the Pygments team, see AUTHORS.
    :license: BSD, see LICENSE for details.
�N)�
RegexLexer�bygroups)	�Text�Comment�Operator�Keyword�Name�String�Number�Generic�
Whitespace�
RebolLexer�RedLexerc��eZdZdZdZdgZgd�ZdgZejejzZdZd�Z
gdef�d	ej d
f�dej$f�dej$d
f�dej$f�dedf�dedf�dej(f�dej*f�def�dej.df�dej.f�dej0f�dej2f�dej2f�dej6f�dej6f�dej0f�dej0f�d ef�d!ej:f�d"ej.f�d#ej.f�d$ej.f�d%ed&f�d'ed(f�d)ed*f�d+ef�d,ej<f�d-e
f�d.ej>f�d/ej>d0f�d1ef�d2efeej@fd3efd4ej@fded5fgd6efeej@fd3efd4ej@fded7fd8ed5fgd2ej.feej.fd4ej.fdej.d5fgedzej d5fd9ej d5fd:ej d5fgeej>fdej>d;fd<ej>fd=ej>d5fgd2ej>feej>fd3ej>fd4ej>fdej>d5fgd>ej6fd?ej6d5fgdej$fd@ej$fd8ej$d5fgd2efeefd3efd4efded5fgd6efeefd3efd4efded7fd8ed5fgdAed7fdBed5fded&fded(fdCefgdD�Z!dE�Z"yF)GrzN
    A `REBOL <http://www.rebol.com/>`_ lexer.

    .. versionadded:: 1.1
    �REBOL�rebol)z*.rz*.r3z*.rebztext/x-rebol�(?:\^\([0-9a-f]{1,4}\)*)c#�.K�|j�}tjd|�r$|j�tj
|f��ytjd|�r$|j�tj|f��ytjd|�r$|j�tj|f��ytjd|�r$|j�tj|f��ytjd|�r$|j�tj|f��ytjd|�r$|j�tj|f��ytjd|�r|j�t|f��ytjd|�r|j�t|f��ytjd	|�r|j�t|f��ytjd
|�r$|j�tj|f��ytjd|�r.|j�tjj |f��ytjd|�r$|j�tj"|f��ytjd
|�r$|j�tj$|f��y|j�tj|f��y�w)N�.*:$a(native|alias|all|any|as-string|as-binary|bind|bound\?|case|catch|checksum|comment|debase|dehex|exclude|difference|disarm|either|else|enbase|foreach|remove-each|form|free|get|get-env|if|in|intersect|loop|minimum-of|maximum-of|mold|new-line|new-line\?|not|now|prin|print|reduce|compose|construct|repeat|reverse|save|script\?|set|shift|switch|throw|to-hex|trace|try|type\?|union|unique|unless|unprotect|unset|until|use|value\?|while|compress|decompress|secure|open|close|read|read-io|write-io|write|update|query|wait|input\?|exp|log-10|log-2|log-e|square-root|cosine|sine|tangent|arccosine|arcsine|arctangent|protect|lowercase|uppercase|entab|detab|connected\?|browse|launch|stats|get-modes|set-modes|to-local-file|to-rebol-file|encloak|decloak|create-link|do-browser|bind\?|hide|draw|show|size-text|textinfo|offset-to-caret|caret-to-offset|local-request-file|rgb-to-hsv|hsv-to-rgb|crypt-strength\?|dh-make-key|dh-generate-key|dh-compute-key|dsa-make-key|dsa-generate-key|dsa-make-signature|dsa-verify-signature|rsa-make-key|rsa-generate-key|rsa-encrypt)$a4(add|subtract|multiply|divide|remainder|power|and~|or~|xor~|minimum|maximum|negate|complement|absolute|random|head|tail|next|back|skip|at|pick|first|second|third|fourth|fifth|sixth|seventh|eighth|ninth|tenth|last|path|find|select|make|to|copy\*|insert|remove|change|poke|clear|trim|sort|min|max|abs|cp|copy)$a�(error|source|input|license|help|install|echo|Usage|with|func|throw-on-error|function|does|has|context|probe|\?\?|as-pair|mod|modulo|round|repend|about|set-net|append|join|rejoin|reform|remold|charset|array|replace|move|extract|forskip|forall|alter|first+|also|take|for|forever|dispatch|attempt|what-dir|change-dir|clean-path|list-dir|dirize|rename|split-path|delete|make-dir|delete-dir|in-dir|confirm|dump-obj|upgrade|what|build-tag|process-source|build-markup|decode-cgi|read-cgi|write-user|save-user|set-user-name|protect-system|parse-xml|cvs-date|cvs-version|do-boot|get-net-info|desktop|layout|scroll-para|get-face|alert|set-face|uninstall|unfocus|request-dir|center-face|do-events|net-error|decode-url|parse-header|parse-header-date|parse-email-addrs|import-email|send|build-attach-body|resend|show-popup|hide-popup|open-events|find-key-face|do-face|viewtop|confine|find-window|insert-event-func|remove-event-func|inform|dump-pane|dump-face|flag-face|deflag-face|clear-fields|read-net|vbug|path-thru|read-thru|load-thru|do-thru|launch-thru|load-image|request-download|do-face-alt|set-font|set-para|get-style|set-style|make-face|stylize|choose|hilight-text|hilight-all|unlight-text|focus|scroll-drag|clear-face|reset-face|scroll-face|resize-face|load-stock|load-stock-block|notify|request|flash|request-color|request-pass|request-text|request-list|request-date|request-file|dbug|editor|link-relative-path|emailer|parse-error)$zO(halt|quit|do|load|q|recycle|call|run|ask|parse|view|unview|return|exit|break)$zREBOL$�to-.*z5(\+|-|\*|/|//|\*\*|and|or|xor|=\?|=|==|<>|<|>|<=|>=)$z.*\?$�.*\!$�'.*�#.*�%.*)�group�re�match�startr�
Subheadingr	�Builtin�Functionr�	Namespace�	Exception�Headingr�Type�Variable�Instance�Label�	Decorator��lexerr�words   �7/usr/lib/python3/dist-packages/pygments/lexers/rebol.py�
word_callbackzRebolLexer.word_callback#s1�����{�{�}��
�8�8�F�D�!��+�+�-��!3�!3�T�9�9�
�X�X�
�$#�'$�(�+�+�-����t�3�3�
�X�X�
�
�
��+�+�-�����4�4�
�X�X�
%�0'+�3,�4�+�+�-��!2�!2�D�8�8�
�X�X�
#�$(�*��+�+�-�����5�5�
�X�X�h��
%��+�+�-����$�6�6�
�X�X�g�t�
$��+�+�-��$�.�.�
�X�X�N����+�+�-��4�/�/�
�X�X�h��
%��+�+�-��$�.�.�
�X�X�h��
%��+�+�-����t�3�3�
�X�X�e�T�
"��+�+�-����!7�!7��=�=�
�X�X�e�T�
"��+�+�-����T�1�1�
�X�X�e�T�
"��+�+�-�����5�5��+�+�-�����4�4�s�LL�\s+�#"�charz#\{[0-9a-f]*\}�2#\{�bin2�64#\{[0-9a-z+/=\s]*\}�"�string�\{�string2�;#+.*\n�;\*+.*\n�;.*\n�%"�
stringFile�%[^(^{")\s\[\]]+�[+-]?([a-z]{1,3})?\$\d+(\.\d+)?�[+-]?\d+\:\d+(\:\d+)?(\.\d+)?zJ\d+[\-/][0-9a-z]+[\-/]\d+(\/\d+\:\d+((\:\d+)?([.\d+]?([+-]?\d+:\d+)?)?)?)?�\d+(\.\d+)+\.\d+�\d+X\d+�#[+-]?\d+(\'\d+)?([.,]\d*)?E[+-]?\d+�[+-]?\d+(\'\d+)?[.,]\d*�[+-]?\d+(\'\d+)?�[\[\]()]� [a-z]+[^(^{"\s:)]*://[^(^{"\s)]*� mailto:[^(^{"@\s)]+@[^(^{"@\s)]+�[^(^{"@\s)]+@[^(^{"@\s)]+�
comment\s"�commentString1�comment\s\{�commentString2�comment\s\[�commentBlock�comment\s[^(\s{"\[]+z/[^(^{")\s/[\]]*z"([^(^{")\s/[\]]+)(?=[:({"\s/\[\]])�
<[\w:.-]*>�<[^(<>\s")]+�tag�
([^(^{")\s]+)�[^(^")]+�[(|)]+�\^.�#pop�	[^(^{})]+�#push�\}�\^."�."�	tagString�
[^(<>\r\n")]+�>�(\d+\.)+�\d+�([01]\s*){8}�\[�\]�[^(\[\]"{)]+��rootr6r8r=r1rSr^�tupler3rKrMrOc��tjd|tj�rytjd|tj�ryy)zS
        Check if code contains REBOL header and so it probably not R code
        z^\s*REBOL\s*\[g�?z
\s*REBOL\s*\[g�?N)rr�
IGNORECASE�search)�texts r-�analyse_textzRebolLexer.analyse_text�s9���8�8�%�t�R�]�]�;��
�Y�Y�'��r�}�}�
=��>�N)#�__name__�
__module__�__qualname__�__doc__�name�aliases�	filenames�	mimetypesrrk�	MULTILINE�flags�	escape_rer.rr
�Charr�Hexr�Special�Preprocr	r)�Float�Otherr�Constantr�Strong�	Attribute�Tag�Escape�tokensrn�ror-rrs���
�D��i�G�(�I�� �I��M�M�B�L�L�(�E�+�I�S5�l#
�
�T�N�#
�
�F�K�K��(�#
���
�
�+�#
��f�j�j�&�)�	#
�
&�v�z�z�2�#
��6�8�$�
#
��F�I�&�#
�����)�#
��'�/�/�*�#
��w��#
��D�N�N�L�1�#
�!�$�.�.�1�#
�0����>�#
�.�v�|�|�<�#
�.�/5�|�|�
=�#
�"!�'�"2�"2�3�##
�$��)�)�*�%#
�&4�V�\�\�B�'#
�((����6�)#
�*!�&�)�+#
�,�'�.�.�)�-#
�.1�$�.�.�A�/#
�01�$�.�.�A�1#
�2*�4�>�>�:�3#
�4�G�%5�6�5#
�6�W�&6�7�7#
�8�W�n�5�9#
�:%�g�.�;#
�<!�$�.�.�1�=#
�>3�M�B�?#
�@�D�H�H�%�A#
�B�d�h�h��.�C#
�D�t�$�E#
�J�&�!�
��
�
�&�
���
�V�]�]�#�
�6�6�"�
��6�"�
��
�
�&�
���
�V�]�]�#�
�F�G�$�
�F�F�#�

��$�.�.�)�
����'�
�T�^�^�$�
�4�>�>�6�*�	
���_�f�k�k�6�2�
�f�k�k�6�*�
�F�K�K��(�
�����!�
�4�8�8�[�)�
�t�x�x�(�
�4�8�8�V�$�	
��$�(�(�#�
����!�
����!�
�T�X�X��
�4�8�8�V�$�
��'�*�*�+�
�W�%�%�v�.�
�
�V�Z�Z� �
�f�j�j�)�
�F�J�J��'�
��'�"�
�� �
�� �
�W��
�7�F�#�
��7�#�
�� �
�� �
�W��
�G�W�%�
�G�V�$�

��G�W�%�
�G�V�$�
�7�,�-�
�G�-�.�
�g�&�
�Ik�F�Z	roc���eZdZdZdZddgZddgZddgZejejzZd	Zd
�Z
gdef�dej d
f�dej$f�dej$df�dej$f�deej$ej*e�f�dedf�dedf�dej0f�dej2f�def�dej4df�dej4f�dej6f�dej8f�dej8f�d ej<f�d!ej<f�d"ej6f�d#ej6f�d$ef�d%ej@f�d&ej4f�d'ej4f�d(ej4f�d)ed*f�d+ed,f�d-ed.f�d/ef�d0ejBf�d1e
f�d2ejDf�d3ejDd4f�d5ef�d6efeejFfd7efd8ejFfded9fgd:efeejFfd7efd8ejFfded;fd<ed9fgd6ej4feej4fd8ej4fdej4d9fgedzej d9fd=ej d9fd>ej d9fgeejDfdejDd?fd@ejDfdAejDd9fgd6ejDfeejDfd7ejDfd8ejDfdejDd9fgdBej<fdCej<d9fgdej$fdDej$fd<ej$d9fgd6efeefd7efd8efded9fgd:efeefd7efd8efded;fd<ed9fgdEed;fdFed9fded*fded,fdGefgdH�Z$yI)JrzX
    A `Red-language <http://www.red-lang.org/>`_ lexer.

    .. versionadded:: 2.0
    �Red�redz
red/systemz*.redz*.redsz
text/x-redztext/x-red-systemrc#�*K�|j�}tjd|�r$|j�tj
|f��ytjd|�r$|j�tj|f��ytjd|�r$|j�tj|f��ytjd|�r.|j�tjj|f��ytjd|�r$|j�tj|f��ytjd|�r$|j�tj|f��ytjd|�r|j�t|f��ytjd|�r$|j�tj|f��ytjd	|�r|j�t|f��ytjd
|�r|j�t|f��ytjd|�r$|j�tj|f��ytjd|�r.|j�tjj |f��ytjd
|�r$|j�tj"|f��ytjd|�r$|j�tj$|f��ytjd|�r$|j�tj
|f��y|j�tj|f��y�w)Nra(if|unless|either|any|all|while|until|loop|repeat|foreach|forall|func|function|does|has|switch|case|reduce|compose|get|set|print|prin|equal\?|not-equal\?|strict-equal\?|lesser\?|greater\?|lesser-or-equal\?|greater-or-equal\?|same\?|not|type\?|stats|bind|union|replace|charset|routine)$af(make|random|reflect|to|form|mold|absolute|add|divide|multiply|negate|power|remainder|round|subtract|even\?|odd\?|and~|complement|or~|xor~|append|at|back|change|clear|copy|find|head|head\?|index\?|insert|length\?|next|pick|poke|remove|reverse|select|sort|skip|swap|tail|tail\?|take|trim|create|close|delete|modify|open|open\?|query|read|rename|update|write)$z`(yes|on|no|off|true|false|tab|cr|lf|newline|escape|slash|sp|space|null|none|crlf|dot|null-byte)$ze(#system-global|#include|#enum|#define|#either|#if|#import|#export|#switch|#default|#get-definition)$z�(system|halt|quit|quit-return|do|load|q|recycle|call|run|ask|parse|raise-error|return|exit|break|alias|push|pop|probe|\?\?|spec-of|body-of|quote|forever)$z�(action\?|block\?|char\?|datatype\?|file\?|function\?|get-path\?|zero\?|get-word\?|integer\?|issue\?|lit-path\?|lit-word\?|logic\?|native\?|op\?|paren\?|path\?|refinement\?|set-path\?|set-word\?|string\?|unset\?|any-struct\?|none\?|word\?|any-series\?)$z(JNICALL|stdcall|cdecl|infix)$rzN(\+|-\*\*|-|\*\*|//|/|\*|and|or|xor|=\?|===|==|=|<>|<=|>=|<<<|>>>|<<|>>|<|>%)$rrrrz:.*)rrrrrrr	r r!�Pseudorr"r#rr%r&r'r(r)r*s   r-r.zRedLexer.word_callbacks������{�{�}��
�8�8�F�D�!��+�+�-��!3�!3�T�9�9�
�X�X�>�
@D�E��+�+�-����t�3�3�
�X�X�(�
*.�/��+�+�-�����4�4�
�X�X�3�48�:��+�+�-����!4�!4�d�:�:�
�X�X�<�=A�C��+�+�-��!2�!2�D�8�8�
�X�X�)�*.�0��+�+�-�����5�5�
�X�X�C�EI�J��+�+�-��$�.�.�
�X�X�7��
>��+�+�-��!2�!2�D�8�8�
�X�X�g�t�
$��+�+�-��$�.�.�
�X�X�.�/3�5��+�+�-��4�/�/�
�X�X�h��
%��+�+�-����t�3�3�
�X�X�e�T�
"��+�+�-����!7�!7��=�=�
�X�X�e�T�
"��+�+�-����T�1�1�
�X�X�e�T�
"��+�+�-�����5�5�
�X�X�e�T�
"��+�+�-��!3�!3�T�9�9��+�+�-�����4�4�s�NNr/r0r1z#\{[0-9a-f\s]*\}r2r3r4z$([0-9a-f]+)(h)((\s)|(?=[\[\]{}"()]))r5r6r7r8r9r:r;r<r=r>r?r@zH\d+[\-/][0-9a-z]+[\-/]\d+(/\d+:\d+((:\d+)?([\.\d+]?([+-]?\d+:\d+)?)?)?)?rArBrCrDrErFrGrHrIrJrKrLrMrNrOrPz/[^(^{^")\s/[\]]*z#([^(^{^")\s/[\]]+)(?=[:({"\s/\[\]])rQrRrSrTrUrVrWrXrYrZr[r\r]r^r_r`rarbrcrdrerfrgN)%rprqrrrsrtrurvrwrrkrxryrzr.rr
r{rr|rr	r&r
rr}r~r)rr�rr�rr�r�r�r�r�r�ror-rr�sD���
�D��l�#�G��(�#�I��2�3�I��M�M�B�L�L�(�E�+�I�45�n%
�
�T�N�%
�
�F�K�K��(�%
�!�&�*�*�-�%
��f�j�j�&�)�	%
�
&�v�z�z�2�%
�5�
�f�j�j�$�-�-��
<�
>�
%
��6�8�$�%
��F�I�&�%
�����)�%
��'�/�/�*�%
��w��%
��D�N�N�L�1�%
�!�$�.�.�1�%
�0����>�%
� .�v�|�|�<�!%
�"/�06���
>�#%
�&!�'�"2�"2�3�'%
�(��)�)�*�)%
�*4�V�\�\�B�+%
�,(����6�-%
�.!�&�)�/%
�0�'�.�.�)�1%
�21�$�.�.�A�3%
�41�$�.�.�A�5%
�6*�4�>�>�:�7%
�8�G�%5�6�9%
�:�W�&6�7�;%
�<�W�n�5�=%
�>%�g�.�?%
�@"�4�>�>�2�A%
�B4�]�C�C%
�D�D�H�H�%�E%
�F�d�h�h��.�G%
�H�t�$�I%
�N�&�!�
��
�
�&�
���
�V�]�]�#�
�6�6�"�
��6�"�
��
�
�&�
���
�V�]�]�#�
�F�G�$�
�F�F�#�

��$�.�.�)�
����'�
�T�^�^�$�
�4�>�>�6�*�	
���_�f�k�k�6�2�
�f�k�k�6�*�
�F�K�K��(�
�����!�
�4�8�8�[�)�
�t�x�x�(�
�4�8�8�V�$�	
��$�(�(�#�
����!�
����!�
�T�X�X��
�4�8�8�V�$�
��'�*�*�+�
�W�%�%�v�.�
�
�V�Z�Z� �
�f�j�j�)�
�F�J�J��'�
��'�"�
�� �
�� �
�W��
�7�F�#�
��7�#�
�� �
�� �
�W��
�G�W�%�
�G�V�$�

��G�W�%�
�G�V�$�
�7�,�-�
�G�-�.�
�g�&�
�Mm�Fro)rsr�pygments.lexerrr�pygments.tokenrrrrr	r
rrr
�__all__rrr�ror-�<module>r�sJ���
�/� � � ���
$��Z��Z�zr�z�rro