File: //usr/lib/python3/dist-packages/pygments/lexers/__pycache__/r.cpython-310.pyc
o
���a � @ s� d Z ddlZddlmZmZmZmZ ddlmZm Z m
Z
m Z m Z m
Z
mZmZmZ 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-2021 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)�
RConsoleLexer�SLexer�RdLexerz.*?
c @ s* e Zd ZdZdZddgZdgZdd� ZdS ) r z@
For R console transcripts or R CMD BATCH output files.
�RConsole�rconsole�routz*.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 )N� �>�+r � � )r �options�line_re�finditer�group�
startswith�append�lenr �Promptr �get_tokens_unprocessed�start�Output)�self�text�slexer�current_code_block�
insertions�match�liner r �3/usr/lib/python3/dist-packages/pygments/lexers/r.pyr" s. �
�
�
��z$RConsoleLexer.get_tokens_unprocessedN)�__name__�
__module__� __qualname__�__doc__�name�aliases� filenamesr" r r r r, r s r c @ s
e Zd ZdZdZg d�Zg d�Zg d�ZdZde j
fgee fgde fgd e
jfgd
efd efgd e
jfd
e jjfgdejfdefged�defdedfdedfed�ed�ed�ed�ed�ed�g
d e e jfed �d e fd efgd ed!fgd"ed!fgd#� Zd$d%� Zd&S )'r zG
For S, S-plus, and R source code.
.. versionadded:: 0.10
�S)�splus�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-profilez;`[^`\\]*(?:\\.[^`\\]*)*`|(?:[a-zA-Z]|\.[A-Za-z_.])[\w.]*|\.z#.*$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�
valid_name�numbers�keywords� punctuation� operatorsz
(%s)\s*(?=\()�
statementsz\{|\}�.z([^\'\\]|\\.)*\'z#popz([^"\\]|\\.)*") r8 r< r? r> r@ r; r= rA �rootr9 r: 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/ r0 r1 r2 r3 � mimetypesr< r �Singler
r
r �Reservedr �Constant�Builtin�Pseudor �Hexr r r �Function�tokensrF r r r r, r C sh �������
� ��� ���� Dr c
@ sf e Zd ZdZdZdgZdgZdgZddej fde
fd e j fd
e fd e
j
fd ejfd
efdefgiZdS )r am
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>`_.
.. versionadded:: 1.6
�Rd�rdz*.Rdz text/x-r-docrC z \\[\\{}%]z%.*$z\\(?:cr|l?dots|R|tab)\bz
\\[a-zA-Z]+\bz^\s*#(?:ifn?def|endif).*\bz[{}]z [^\\%\n{}]+rB N)r- r. r/ r0 r1 r2 r3 rG r �Escaper r rJ �Preprocr
rK r rO r r r r, r � s"
��r )r0 rD �pygments.lexerr r r r �pygments.tokenr r r r r
r r r
r �__all__�compiler r r r r r r r, �<module> s
,
,W