| 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�ZG dd� de�ZG dd � d e�ZG d
d� de�ZG dd
� d
e�ZG dd� de�ZdS )z�
pygments.lexers.ml
~~~~~~~~~~~~~~~~~~
Lexers for ML family languages.
:copyright: Copyright 2006-2021 by the Pygments team, see AUTHORS.
:license: BSD, see LICENSE for details.
� N)�
RegexLexer�include�bygroups�default�words) �Text�Comment�Operator�Keyword�Name�String�Number�Punctuation�Error)�SMLLexer�
OcamlLexer�OpaLexer�ReasonLexer�
FStarLexerc @ s. e Zd ZdZdZdgZg d�ZddgZh d�Zh d�Z h d �Z
d
ZdZdd
� Z
dd� Zdd� Zdd� Zdefdejdfgdedfdedfdejdfdejdfdejdfgdd �d!d"� e
D �� efd#ejd$fd%ejd&fd'ejfd(ejfd)ejfd*ejfd+ejfd,ejfd-ejfd.ej fd/e ej fd0e ej fd1ejd2fd3ejd4fd5ejd6fd7ejd8fd9ej!fd:e ed;fde efde efgd:e efde edfde edfde"fd<e"fge#d�ge$d=�d>ejd?fd@ejdAfe$dB�e$dC�d<e"fge$d=�dDefdejdfdEejdFfdGejdHfdIedFfdJejdKfe$dB�e$dC�d<e"fg
e
ej�e
ej�dLd �e� edfge$d=�e$dM�de ej%fe#d�ge$d=�d9ej!fdNedOfde ej&dfde ej&dfe#d�ge$d=�d9ej!fdNedOfdPeef e'ej(ee�dfdPeef e'ej(ee�dfde ej(dfde ej(dfe#d�ge$d=�e$dM�d9ej!fdNedOfdQe edRfde ej)fde ej)fd<e"dfge$d=�dSejdTfe$dM�e$dC�d<e"dfge$d=�e$dM�d9ej!fdNedOfdUe'eeej�dfdQe edVfde ej)fde ej)fd<e"dfg e$d=�dSejdWfdXejdTfdYejfdZe e'eeej*�fd[e e'eeej*�fe$dM�e$dC�d<e"fg e$d=�d\e e'ejeej*�fd]e e'ejeej*�fdYejfd^eef ej*fe#d�ge$d=�de ej*dfde ej*dfd<e"dfgdDefdejdfd9ej!feefd_efd`edfeefgdaejfdejdbfdcejdfddejfgde�Z+dfS )gr zB
For the Standard ML language.
.. versionadded:: 1.5
zStandard MLZsml)z*.smlz*.sigz*.funztext/x-standardmlzapplication/x-standardml>) Zabstype�asZinfixr�type�rec�raiseZdatatypeZandalso�struct�fnZnonfix�let�and�sigZinfix�op�do�localr �while�end�where�openZwithtype�case�in�with�else�of� exception�ifZ structure�funZeqtype�val�functorZhandleZsharing�orelseZ signature�then> �\|�=>�:�:>�=�#�->>
�)�;�{�[�}z...�_�,�(�]z[a-zA-Z][\w']*z[!%&$#+\-/:<=>?@\\~`^|*]+c C s: d| fdt jfdt jfdt jfdt jfdt jfd| dfgS ) Nz[^"\\]z\\[\\"abtnvfr]z\\\^[\x40-\x5e]�
\\[0-9]{3}z\\u[0-9a-fA-F]{4}z\\\s+\\�"�#pop)r �EscapeZInterpol)Zwhatkind� rE �6/usr/lib/python3.9/site-packages/pygments/lexers/ml.py�stringy<