3
� �X�( � @ sn d Z ddlmZmZmZmZmZmZ ddlm Z m
Z
m Z m Z m
Z
mZmZmZmZmZ dgZG dd� de�ZdS )z�
pygments.lexers.clean
~~~~~~~~~~~~~~~~~~~~~
Lexer for the Clean language.
:copyright: Copyright 2006-2017 by the Pygments team, see AUTHORS.
:license: BSD, see LICENSE for details.
� )�ExtendedRegexLexer� LexerContext�bygroups�words�include�default)
�Comment�Keyword�Literal�Name�Number�Operator� Punctuation�String�Text�
Whitespace�
CleanLexerc @ s< e Zd ZdZdZdgZddgZd�dd�Zd d
� Zd d � Z e
d
d� �Z dd� Z dd� Z
dd� Zdd� Zdd� Zd�Zd*ed+fd,ed-fgd.ejfd/ejfd0ejfd1eejejeej �fd2ejd3fd4ejd5fe ed6d7d8�efe ed9d7d8�efd:e d;fd<ee ej ej e e�d=fd>ee e�d?fd@ee e�d?fdAe!j"fdBe!j"fdCe!j"fdDe#j$fdEe#j%fdFe#j&fdGe#j'fdHe!j(dIfe d�d6d7d8�e)fdLeeeje�fdMefdNefdOe*fdPe*fdQej fdRe fe+dS�g e+dS�dTefdUe d+fdRe fge+dS�dVeeeej �fdWe fdXefdUe d+fdRe fge+dS�dYedZfdXed+fd[efdUe d\fd]e fd^ej fge+dS�d_ed+fdYed+fd`efdae fd^ej fge+dS�e d�d6d7d8�ejfdeej fdUe d+fdXefd]e fgdfefdgefgdhe!j(fdHe!j(d+fdie!j(fge+dS�djej fdkefdlefdme d+fdRe fdnej fge+dS�doefdped+fdXefdlefdqeee�drfdRe fdsej fdtefg e+dS�djej fdXefdRe fdued+fge+dS�dve
fdwefdledxfdye d+fdzej fdRe fge+dS�dvefdye d\fdwefd{ed|fdzej fdRe fge+dS�dvefdye d}fd~efded�fd�ej d�fdae fge+dS�d�ej fdae fd�efd�ed+fge+dS�d�ej fd:ed;fe,d+�gd��Z-dS )�r z�
Lexer for the general purpose, state-of-the-art, pure and lazy functional
programming language Clean (http://clean.cs.ru.nl/Clean).
.. versionadded: 2.2
ZCleanZcleanz*.iclz*.dclNc C s t |d�}d|_tj| ||d�S )Nr )�context)r �indentr �get_tokens_unprocessed)�self�textr �ctx� r �/usr/lib/python3.6/clean.pyr s
z!CleanLexer.get_tokens_unprocessedc c sd |j d�dkr>|j� tj|j d�fV |jd d� dg |_n|j� tj|j d�fV |j� |_d S )Nr �import� �fromimportfunc���) �group�startr � Namespace�stackr �Class�end�pos)�lexer�matchr r r r �check_class_not_import$ s
z!CleanLexer.check_class_not_importc c sh |j d�dks |j d�dkr4|j� t|j d�fV n&|j� tj|j d�fV |jdg |_|j� |_d S )Nr �instance�class�fromimportfunctype)r r r r �Functionr" r$ r% )r& r' r r r r �check_instance_class, s
z CleanLexer.check_instance_classc C s$ | j dd�} t| j dd��t| �fS )N�
� � z )�replace�len)r r r r �
indent_len4 s zCleanLexer.indent_lenc c s: t j|jd��\|_}|j� |_|j� t|jd�fV d S )Nr )r r3 r r r$ r% r r )r& r' r �_r r r � store_indent; s
zCleanLexer.store_indentc c s� t j|jd��\}}||jkrH|j� t|jd�fV |j� | d |_n>d|_|j� |_|jd d� |_|j� t|jd�dd � fV d S )Nr r r )r r3 r r r r r% r" )r& r' r r �reallenr r r �
check_indent1@ s
zCleanLexer.check_indent1c c sl t j|jd��\}}||jkrH|j� t|jd�fV |j� | d |_n d|_|j� |_|jd d� |_d S )Nr r � ���)r r3 r r r r r% r" )r& r' r r r6 r r r �
check_indent2K s
zCleanLexer.check_indent2c c s� t j|jd��\}}||jkrH|j� t|jd�fV |j� | d |_nXd|_|j� |_|jd d� |_|j� t|jd�dd � fV |jd�dkr�|jd |_d S )Nr r � z
���)r r3 r r r r r% r" )r& r' r r r6 r r r �
check_indent3U s
zCleanLexer.check_indent3c c s4 |j d d� |_ |j� |_|j� t|jd�fV d S )Nr r r )r" r$ r% r r r )r& r' r r r r �skipb s
zCleanLexer.skipr* r) �where�with�let�let!�in�case�of�infix�infixr�infixl�generic�derive� otherwise�code�inline�;z#popz//�
singlecommentz//.*\nz(?s)/\*\*.*?\*/z
(?s)/\*.*?\*/zB\b((?:implementation|definition|system)\s+)?(module)(\s+)([\w`.]+)z(?<=\n)import(?=\s)r z(?<=\n)from(?=\s)�
fromimportz(?<=\s)z(?=\s))�prefix�suffix�^z(?=\{\|)�genericfunctionz<(?<=\n)([ \t]*)([\w`$()=\-<>~*\^|+&%]+)((?:\s+\w)*)(\s*)(::)�functiondefargsz(?<=\n)([ \t]*)(::)�typedefz
^([ \t]*)(::)z\'\\?.(?<!\\)\'z \'\\\d+\'z\'\\\\\'z"[+\-~]?\s*\d+\.\d+(E[+\-~]?\d+)?\bz[+\-~]?\s*0[0-7]\bz[+\-~]?\s*0x[0-9a-fA-F]\bz[+\-~]?\s*\d+\b�"�
doubleqstring�True�Falsez(\')([\w.]+)(\'\.)z ([\w`$%/?@]+\.?)*[\w`$%/?@]+z[{}()\[\],:;.#]z[+\-=!<>|&~*\^/]z\\\\z\\.*?(->|\.|=)z\s�commonz ([\w`.]+)z\nz(::)(\s+)([^,\s]+)z([\w`$()=\-<>~*\^|+&%/]+)�,z[{(\[]�combtypez[:;.#]z#pop:2z[^\S\n]+z\S+z[})\]]z[,:;.#]z\s+�from�as� qualifiedz[\w`.]+z (.)(?=\n)z.+(?!\n)z[^\\"]+z\\.z[\w`]+z[:=|(),\[\]{}!*]z->z \n(?=[^\s|])�.z\{\|z\|\}z(\s+of\s+)(\{)�
genericftypesz
[\w`\[\]{}!]+z[*()]z\}z\n(\s*)z[!{}()\[\],:;.#]�functiondefresz^(?=\S)z\Sz\|�functiondefclassesz#pop:3z[,&]z\[�functiondefuniquneqz [\w`$()=\-<>~*\^|+&%/{}\[\]@]� functionnamez[a-z]+z<=|,z\]z[\w`$()=\-<>~*\^|+&%/]+)r[ �rootrP r r+ r] r rO rX rV rT rb rU rc rd re rf )NN)r* r) r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM )rY rZ )r^ r r_ r` ).�__name__�
__module__� __qualname__�__doc__�name�aliases� filenamesr r( r- � staticmethodr3 r5 r7 r: r= r> �keywordsr r �Single�SpecialZMultir r r! r r r# r r r, ZTyper ZCharr ZFloatZOctZHexZInteger�Doubler
r
r r �tokensr r r r r s
N)rk Zpygments.lexerr r r r r r Zpygments.tokenr r r
r r r
r r r r �__all__r r r r r �<module>
s 0