File manager - Edit - /opt/saltstack/salt/lib/python3.10/site-packages/pygments/lexers/__pycache__/ml.cpython-310.pyc
Back
o ;jA� � @ 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-present 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�ZddgZdZdZ h d �Z h d �Zh d�ZdZ d Zdd� Zdd� Zdd� Zdd� Zi ddefdejdfg�ddedfdedfdejd fd!ejdfd"ejdfg�d#d$�d%�d&d'� eD ���efd(ejd)fd*ejd+fd,ejfd-ejfd.ej fd/ej!fd0ej!fd1ej!fd2ej fd3e"j#fd4e � d5�e"j#fd6e� d5�e"j#fd7ejd8fd9ejd:fd;ejd<fd=ejd>fd?e"j$fd@e � dA�edBfd@e � d5�efd@e� d5�efg�dBd@e � dA�efd@e � d5�edfd@e� d5�edfde%fdCe%fg�dDe&d�g�de'd�dEejdFfdGejdHfe'd�e'd#�dCe%fg�dIe'd�dJefdejdfdKejdLfdMejdNfdOedLfdPejdQfe'd�e'd#�dCe%fg �d)eej��d+eej��dRdS�d%�e ��edfg�d<e'd�e'dR�d@e � d5�e"j(fe&d�g�dLe'd�d?e"j$fdTedUfd@e � d5�e"j)dfd@e� d5�e"j)dfe&d�g�dFe'd�d?e"j$fdTedUfd@e � dVe� dW�e*e"j+ee�dfd@e� dVe� dW�e*e"j+ee�dfd@e � d5�e"j+dfd@e� d5�e"j+dfe&d�g�d>e'd�e'dR�d?e"j$fdTedUfdXe� d5�edYfd@e � d5�ej,fd@e� d5�ej,fdCe%dfg�dZe'd�d[ejd\fe'dR�e'd#�dCe%dfg�d8e'd�e'dR�d?e"j$fdTedUfd]e*eeej�dfdXe� d5�ed^fd@e � d5�ej,fd@e� d5�ej,fdCe%dfg �d_e'd�d[ejd`fdaejd\fdbejfdce � d5�e*eee"j-�fdde� d5�e*eee"j-�fe'dR�e'd#�dCe%fg �e'd�dee � d5�e*ejee"j-�fdfe� d5�e*ejee"j-�fdbejfd@e � dge� d5�e"j-fe&d�ge'd�d@e � d5�e"j-dfd@e� d5�e"j-dfdCe%dfgdJefdejdfd?e"j$fe e"fdhefdiedfee"fgdjejfdejdkfdlejdfdmejfgdn��Z.doS )pr z' For the Standard ML language. zStandard MLZsml)z*.smlz*.sigz*.funztext/x-standardmlzapplication/x-standardmlz)https://en.wikipedia.org/wiki/Standard_ML�1.5>) �if�rec�thenZ signatureZdatatype�op�whileZsharingZabstype� exceptionr �and�letZ structure�case�fun�raise�open�typeZinfixrZnonfix�in�local�asZandalso�with�sig�where�handle�end�orelse�else�val�functorZeqtype�fnZwithtype�of�struct�doZinfix> �=�=>�:>�\|�:�->�#> �[�;�{�_�,�(�]�}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� rG �F/opt/saltstack/salt/lib/python3.10/site-packages/pygments/lexers/ml.py�stringy<