File: //opt/saltstack/salt/lib/python3.10/site-packages/pygments/lexers/__pycache__/r.cpython-310.pyc
o
;jM � @ s� d Z ddlZddlmZmZmZmZ ddlmZm Z m
Z
m Z m Z m
Z
mZmZmZmZ g d�Ze�d�ZG dd� de�ZG d d
� d
e�ZG d d � d e�ZdS )
z�
pygments.lexers.r
~~~~~~~~~~~~~~~~~
Lexers for the R/S languages.
:copyright: Copyright 2006-present by the Pygments team, see AUTHORS.
:license: BSD, see LICENSE for details.
� N)�Lexer�
RegexLexer�include�
do_insertions)
�Text�Comment�Operator�Keyword�Name�String�Number� Punctuation�Generic�
Whitespace)�
RConsoleLexer�SLexer�RdLexerz.*?
c @ s6 e Zd ZdZdZddgZdgZdZdZdZ d d
� Z
d S ) r z@
For R console transcripts or R CMD BATCH output files.
ZRConsoleZrconsoleZroutz*.Rout�https://www.r-project.org� z"rconsole/r-console-transcript.Routc c s� � t di | j��}d}g }t�|�D ]E}|�� }|�d�s"|�d�r=|�t|�dtj |d d� fgf� ||dd � 7 }q|rNt
||� |��E d H d}g }|� � tj
|fV q|rgt
||� |��E d H d S d S )Nr �>�+r � � )r �options�line_re�finditer�group�
startswith�append�lenr ZPromptr �get_tokens_unprocessed�startZOutput)�self�textZslexerZcurrent_code_blockZ
insertions�match�liner r �E/opt/saltstack/salt/lib/python3.10/site-packages/pygments/lexers/r.pyr # s. �
�
�
��z$RConsoleLexer.get_tokens_unprocessedN) �__name__�
__module__� __qualname__�__doc__�name�aliases� filenames�url�
version_addedZ_exampler r r r r& r s r c @ s e Zd ZdZdZg d�Zg d�Zg d�ZdZdZ dZ
d e j fge
e
fgd
e
� d �e
jfgd efgd
ejfgdefdefgdejfde
jjfgdejfdefged�defdedfdedfed�ed�ed �ed �ed �ed �ed �g ed!�d"efd#efgd$ed%fgd&ed%fgd'� Z d(d)� Z d*S )+r z+
For S, S-plus, and R source code.
�S)Zsplus�s�r)z*.Sz*.Rz .Rhistoryz .Rprofilez .Renviron)z text/S-plusztext/Sztext/x-r-sourceztext/x-rztext/x-Rztext/x-r-historyztext/x-r-profiler z0.10z;`[^`\\]*(?:\\.[^`\\]*)*`|(?:[a-zA-Z]|\.[A-Za-z_.])[\w.]*|\.z#.*$�(z
)\s*(?=\()z\[{1,2}|\]{1,2}|\(|\)|;|,zH(if|else|for|while|repeat|in|next|break|return|switch|function)(?![\w.])z,<<?-|->>?|-|==|<=|>=|\|>|<|>|&&?|!=|\|\|?|\?z$\*|\+|\^|/|!|%[^%]*%|=|~|\$|@|:{1,3}zm(NULL|NA(_(integer|real|complex|character)_)?|letters|LETTERS|Inf|TRUE|FALSE|NaN|pi|\.\.(\.|[0-9]+))(?![\w.])z(T|F)\bz#0[xX][a-fA-F0-9]+([pP][0-9]+)?[Li]?z;[+-]?([0-9]+(\.[0-9]+)?|\.[0-9]+|\.)([eE][+-]?[0-9]+)?[Li]?�commentsz\s+z\'�
string_squotez\"�
string_dquote�builtin_symbols�keywords�
function_name�
valid_name�numbers� punctuation� operators�
statementsz\{|\}�.z([^\'\\]|\\.)*\'z#popz([^"\\]|\\.)*") r4 r: r9 r< r8 r= r7 r; r> �rootr5 r6 c C s t �d| �rdS d S )Nz[a-z0-9_\])\s]<-(?!-)g)\��(�?)�re�search)r# r r r& � analyse_text� s �zSLexer.analyse_textN) r' r( r) r* r+ r, r- � mimetypesr. r/ r: r �Singler
ZFunctionr
r ZReservedr �Constant�BuiltinZPseudor ZHexr r r r �tokensrC r r r r& r F sp ��������
� ������� Gr c
@ sn e Zd ZdZdZdgZdgZdgZdZdZ dd e
j fd
e fd e
jfd e
fd
e jfdejfdefdefgiZdS )r aR
Pygments Lexer for R documentation (Rd) files
This is a very minimal implementation, highlighting little more
than the macros. A description of Rd syntax is found in `Writing R
Extensions <http://cran.r-project.org/doc/manuals/R-exts.html>`_
and `Parsing Rd files <http://developer.r-project.org/parseRd.pdf>`_.
ZRdZrdz*.Rdz text/x-r-docz1http://cran.r-project.org/doc/manuals/R-exts.htmlz1.6r@ z \\[\\{}%]z%.*$z\\(?:cr|l?dots|R|tab)\bz
\\[a-zA-Z]+\bz^\s*#(?:ifn?def|endif).*\bz[{}]z [^\\%\n{}]+r? N)r' r( r) r* r+ r, r- rD r. r/ r ZEscaper r rF ZPreprocr
rG r rH r r r r& r � s& ��r )r* rA Zpygments.lexerr r r r Zpygments.tokenr r r r r
r r r
r r �__all__�compiler r r r r r r r& �<module> s
0
/Z