| Server IP : 127.0.0.1 / Your IP : 216.73.216.109 Web Server : Apache/2.4.54 (Win64) OpenSSL/1.1.1q PHP/8.1.10 System : Windows NT DESKTOP-E5T4RUN 10.0 build 19045 (Windows 10) AMD64 User : SERVERWEB ( 0) PHP Version : 8.1.10 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : C:/cygwin64/lib/python3.9/site-packages/pygments/lexers/__pycache__/ |
Upload File : |
a
SҼa! � @ s� d Z ddlZddlmZmZmZmZmZ ddlm Z m
Z
mZmZm
Z
mZmZmZmZ g d�Ze�d�ZG dd� de�ZG d d
� d
e�ZG dd� de�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�bygroups) �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.
ZRConsoleZrconsoleZroutz*.Routc c s� t f i | j��}d}g }t�|�D ]�}|�� }|�d�sB|�d�rx|�t|�dtj |d d� fgf� ||dd � 7 }q"|r�t
||�|��E d H d}g }|�� tj
|fV q"|r�t
||�|��E d H d S )N� �>�+r � )r �options�line_re�finditer�group�
startswith�append�lenr ZPromptr �get_tokens_unprocessed�startZOutput)�self�textZslexerZcurrent_code_blockZ
insertions�match�line� r$ �5/usr/lib/python3.9/site-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
fgeefgdefgd e
jfgd
efdefgde
jfd
ejjfgdejfdefged�defdedfdedfed�ed�ed�ed�ed�ed�g
de ejfed�defdefgd ed!fgd"ed!fgd#�Zd$d%� Zd&S )'r zG
For S, S-plus, and R source code.
.. versionadded:: 0.10
�S)Zsplus�s�r)z*.Sz*.Rz .Rhistoryz .Rprofilez .Renviron)ztext/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([^"\\]|\\.)*")r0 r4 r7 r6 r8 r3 r5 r9 �rootr1 r2 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&