a
    Df>                     @   s   d Z ddlZddlmZmZmZmZmZ ddlm	Z	m
Z
mZmZmZmZmZmZmZ g dZG dd deZG dd	 d	eZG d
d deZG dd deZG dd deZdS )z
    pygments.lexers.ml
    ~~~~~~~~~~~~~~~~~~

    Lexers for ML family languages.

    :copyright: Copyright 2006-2024 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 Zd ZdZdZdgZg dZddgZdZdZ	h d	Z
h d
Zh dZdZdZdd Zdd Zdd Zdd Zdefdejdfgdedfdedfdejdfdejdfd ejdfgd!d"d#d$ eD efd%ejd&fd'ejd(fd)ejfd*ejfd+ej fd,ej!fd-ej!fd.ej!fd/ej fd0e"j#fd1e d2e"j#fd3e d2e"j#fd4ejd5fd6ejd7fd8ejd9fd:ejd;fd<e"j$fd=e d>ed?fd=e d2efd=e d2efgd=e d>efd=e d2edfd=e d2edfde%fd@e%fge&dge'dAdBejdCfdDejdEfe'dFe'dGd@e%fge'dAdHefdejdfdIejdJfdKejdLfdMedJfdNejdOfe'dFe'dGd@e%fg
eejeejdPd"e
edfge'dAe'dQd=e d2e"j(fe&dge'dAd<e"j$fdRedSfd=e d2e"j)dfd=e d2e"j)dfe&dge'dAd<e"j$fdRedSfd=e dTe dUe*e"j+eedfd=e dTe dUe*e"j+eedfd=e d2e"j+dfd=e d2e"j+dfe&dge'dAe'dQd<e"j$fdRedSfdVe d2edWfd=e d2ej,fd=e d2ej,fd@e%dfge'dAdXejdYfe'dQe'dGd@e%dfge'dAe'dQd<e"j$fdRedSfdZe*eeejdfdVe d2ed[fd=e d2ej,fd=e d2ej,fd@e%dfg	e'dAdXejd\fd]ejdYfd^ejfd_e d2e*eee"j-fd`e d2e*eee"j-fe'dQe'dGd@e%fg	e'dAdae d2e*ejee"j-fdbe d2e*ejee"j-fd^ejfd=e dce d2e"j-fe&dge'dAd=e d2e"j-dfd=e d2e"j-dfd@e%dfgdHefdejdfd<e"j$fee"fddefdeedfee"fgdfejfdejdgfdhejdfdiejfgdjZ.dkS )lr   z'
    For the Standard ML language.
    zStandard MLZsml)z*.smlz*.sigz*.funztext/x-standardmlzapplication/x-standardmlz)https://en.wikipedia.org/wiki/Standard_ML1.5>)   ZandalsothenopenstructoprecZ	structureZnonfixtypewhilehandleasZinfixrsigdodatatyperaiser   of	signaturecaseend	exceptionvalletZabstypeiforelseelselocalfnZinfixfunctorinZeqtypeandfunwithwhereZsharingZwithtype>   \|:>#->=>:=>
   }]{[,;)_(z...z[a-zA-Z][\w']*z[!%&$#+\-/:<=>?@\\~`^|*]+c              	   C   s:   d| fdt jfdt jfdt jfdt jfdt jfd| dfgS )	Nz[^"\\]z\\[\\"abtnvfr]z\\\^[\x40-\x5e]
\\[0-9]{3}z\\u[0-9a-fA-F]{4}z\\\s+\\"#pop)r   EscapeZInterpol)Zwhatkind rI   _/nfs/NAS7/SABIOD/METHODE/ermites/ermites_venv/lib/python3.9/site-packages/pygments/lexers/ml.pystringy<   s    zSMLLexer.stringyc                 c   sP   | d| jv rt}ntj}|d|| dfV  |dt| dfV  d S )N      )groupalphanumid_reservedr   r   	Namespacestartr   selfmatchtokenrI   rI   rJ   long_id_callbackK   s
    zSMLLexer.long_id_callbackc                 c   sL   | d| jv rt}n| d| jv r,t}nt}|d|| dfV  d S NrL   )rN   rO   r   symbolicid_reservedr   rQ   rR   rI   rI   rJ   end_id_callbackS   s    zSMLLexer.end_id_callbackc                 c   sF   | d}|| jv rtj}n|| jv r,t}nt}|d||fV  d S rW   )rN   rO   r
   ReservedrX   r   r   rQ   )rS   rT   strrU   rI   rI   rJ   id_callback\   s    


zSMLLexer.id_callback\s+\(\*commentz\(|\[|\{mainz\)|\]|\}rG   z\b(let|if|local)\b(?!\'))r`   r`   z\b(struct|sig|while)\b(?!\')z\b(do|else|end|in|then)\b(?!\')({})|c                 c   s   | ]}t |V  qd S )N)reescape).0zrI   rI   rJ   	<genexpr>|       zSMLLexer.<genexpr>z#"charrF   stringz~?0x[0-9a-fA-F]+z0wx[0-9a-fA-F]+z0w\d+z~?\d+\.\d+[eE]~?\d+z
~?\d+\.\d+z~?\d+[eE]~?\d+z~?\d+z#\s*[1-9][0-9]*z#\s*(rB   z#\s+(z\b(datatype|abstype)\b(?!\')dnamez\b(exception)\b(?!\')enamez4\b(functor|include|open|signature|structure)\b(?!\')snamez\b(type|eqtype)\b(?!\')tnamez	\'[\w\']*rD   z)(\.)dottedz\S+
whitespacez\b(val|and)\b(?!\')vnamez\b(fun)\b(?!\'))rG   main-funfname
delimiterscorez\sz\b(fun|and)\b(?!\')rs   z\b(val)\b(?!\'))rG   r`   rq   r5   z\b(case|handle)\b(?!\'))rG   r`   z(?=\b({})\b(?!\'))breakout\(tyvarseqz)(\s*)(=(?!z))=(?!)rG   typbindz\b(and)\b(?!\'))rG   rn   z(=)(\s*)(datatype))rG   datbinddatcon)rG   rk   z\b(withtype)\b(?!\')z\b(of)\b(?!\')z
(\|)(\s*)(z
(\|)(\s+)(z(and\b)(\s+)(z(and\b)(\s*)(z)|(r@   \)z[^(*)]#push\*\)[(*)])rp   rt   ru   ro   rootr`   rr   ri   rj   rv   rm   rs   rq   rn   rz   rk   r{   rl   r|   rx   r_   N)/__name__
__module____qualname____doc__namealiases	filenames	mimetypesurlversion_addedrO   rX   Znonid_reservedZalphanumid_reZsymbolicid_rerK   rV   rY   r\   r   r   	Multiliner   r
   rZ   formatjoinr   CharDoubler   HexIntegerFloatr   ZLabelZ	Decoratorr   r   r   rP   ZFunctionr   VariableTypeClasstokensrI   rI   rI   rJ   r      st  	








"










	


 r   c                   @   s  e Zd ZdZdZdZdgZg dZdgZdZ	dZ
d	Zd
ZdZdZdZdZdejfdejfdejfgdefdejjfdejdfdejfdedfdde
efddeddd efde de de efddeejfddeejfd efd!e j!fd"e j"fd#e j#fd$e j$fd%e j%fd&ej&fd'ej&fd(efd)ej'd*fd+ej(fgd,efd-ed.fd/ed0fd1efgd2ej'fe)d3d4ej'fd)ej'd0fgdefd5e*fd6ejfd7ejd0fd8ed0fe+d0gd9Z,dS ):r   z!
    For the OCaml language.
    ZOCamlzhttps://ocaml.org/Zocaml)z*.mlz*.mliz*.mllz*.mlyztext/x-ocamlz0.7)0r1   r   assertbeginclass
constraintr    donedowntor,   r&   r'   externalfalseforr2   functionr/   r*   r0   r   inheritinitializerlazyr)   rT   methodmodulemutablenewobjectr#   r   privater"   r   r   r   r   totruetryr   r(   virtualwhenr   r3   ))!=r7   &&&rw   r}   \*\+r@   --\.r8   \.\.\.r:   :::=r6   rA   ;;<<-r;   >>]>\}\?\?\?\[\[<\[>\[\|r=   rC   `\{\{<r5   \|]\}~[!$%&*+\./:<=>?@^|~-])asrlandlorlsllxormodor[!?~][=<>@^|&+\*/$%-]unitintfloatboolrj   ri   listarray\\[\\"\'ntbr]rE   \\x[0-9a-fA-F]{2}r]   false|true|\(\)|\[\]\b([A-Z][\w\']*)(?=\s*\.)ro   \b([A-Z][\w\']*)\(\*(?![)])r_   \b({})\brb   ra   NrD   )?[^\W\d][\w']*(-?\d[\d_]*(.[\d_]*)?([eE][+\-]?\d[\d_]*)0[xX][\da-fA-F][\da-fA-F_]*0[oO][0-7][0-7_]*0[bB][01][01_]*\d[\d_]*7'(?:(\\[\\\"'ntbr ])|(\\[0-9]{3})|(\\x[0-9a-fA-F]{2}))''.''rF   rj   [~?][a-z][\w\']*:[^(*)]+r^   r~   r   rG   r   [^\\"]+escape-sequence\\\nr   [A-Z][\w\']*(?=\s*\.)[A-Z][\w\']*[a-z_][\w\']*r   r   r_   rj   ro   )-r   r   r   r   r   r   r   r   r   r   keywordskeyopts	operatorsword_operatorsprefix_syms
infix_syms
primitivesr   rH   r   r   BuiltinPseudorP   r   r   r   r   r
   r	   Wordr   r   r   r   OctBinr   r   r   r   r   r   r   r   rI   rI   rI   rJ   r   c  sx   	




r   c                   @   s  e Zd ZdZdZdgZdgZdgZdZdZ	dZ
d	Zd
ZdZdejfdejfdejfgdedfdefgeddefgedee
dddefde d ejjfdejfdejfdejfdejfdejfdejfdejfdejfd ejd!fd"ejfd#e d$fd%e d&fd'ej!d(fd)ej"fd*e d+ ej"fd,ej#fd-e d+ efd.e d/e fd.e d/e fd0e d1fd2e ej$fd3e ej!fd4ej!feefgedd5ej$fe%d6gedd7ej$d8fd9ej$d:fed7 ej$d8feej$d&fd2e ej$fe%d&gede%d;gedd<ej$d=fe%d&gedd5ej$d>fd?ej$d@fe%d&geddAej$dBfd5ej$d>fe%d&geddCej$fdDej$fd7ej$d$fdEej$d&fgeddFej$fdDej$fd#ej$d$fd%ej$d&fgdGefded$fdHed&fdDefgdIejfd ejd&fd#e dJfedKgdLejfdMejd&fd#e dJfedKgdNej!dOfdPej!dQfgdRej!d&fgdefdSej!dTfdUej!d&fdPej!dQfgd2ej!dVfd ej!dWfd3e ej!d&fd4ej!dXfdYej!d&fd#e dXfgdZed[fd\ej!d]fd^ej!d(fd#e dJfd_ej!fgd`ed&fdaefgdbZ&dcS )dr   z%
    Lexer for the Opa language.
    ZOpaZopaz*.opaz
text/x-opazhttp://opalang.orgr   )r1   r   r   r%   clientcssZdatabasedbr    r,   r&   r   forallr   r*   importrT   r   r   packageparserr   serverr   r   r(   r3   Z
xml_parserz(([a-zA-Z_]\w*)|(`[^`]*`))z[.=\-<>,@~%/+?*&^!]z[()\[\],;|]z\\[\\"\'ntr}]rE   r   z/\*nested-commentz//.*?$commentsr]   comments-and-spacesz\b)prefixsuffix@z-?.[\d]+([eE][+\-]?\d+)z-?\d+.\d*([eE][+\-]?\d+)z-?\d+[eE][+\-]?\d+z0[xX][\da-fA-F]+z0[oO][0-7]+z
0[bB][01]+z\d+z#[\da-fA-F]{3,6}rF   rj   z9'(?:(\\[\\\"'ntbr ])|(\\[0-9]{3})|(\\x[0-9a-fA-F]{2})|.)'r   r~   r   rG   z<(?=[a-zA-Z>])html-open-tagz[@?!]?(/\w+)+(\[_\])?z<-(?!rB   z\b([A-Z]\w*)(?=\.)ry   rD   z)+r:   r   r   r7   z#(?=\{)r8   )rG   
type-lhs-1type-with-slashrw   )rG   
type-tuplez~?\{)rG   type-record)rG   slash-type-1type-1/)rG   r  )rG   r   z(?=,))rG   
type-arrowz,(?=[^:]*?->)r  z[^()/*]+z[/*]r}   z[^{}/*]+[^/*]+z\*/z[^\\"{]+r   r   z	[^\\\'{]+z\'z[\w\-:]+)rG   	html-attrr   )rG   html-contentz	[\w\-:]*>z	[\w\-:]+=html-attr-valuez/>)rG   single-string)rG   rj   )rG   r   z[^"\'{`=<>]+z<!--html-commentz</)rG   html-end-tagr   z[^<{]+z-->z[^\-]+|-)r   r  r  r   r   r  r  r  r  r  r  r  r  rj   r   r  r"  r  r  r  r!  N)'r   r   r   r   r   r   r   r   r   r   r   Zident_reZop_reZpunc_rer   rH   r   r   r   r   r
   r   r   r  r   r   r   r  r  r   r   r   r	   Singler   rP   r   r   r   rI   rI   rI   rJ   r     s  

i

















	









	  r   c                   @   s  e Zd ZdZdZdZddgZddgZdgZd	Z	d
Z
dZdZdZdZdZdZdejfdejfdejfgdefdejjfdejdfdejfdejfdejdfdde
efddeddd  ej fd!e de d"e efddeej fddeej!fd#efd$e"j#fd%e"j$fd&e"j%fd'e"j&fd(e"j'fd)ej(fd*ej(fd+efd,ej)d-fd.ej*fgd/ejfd0ejd1fd2ejd3fd4ejfgd5ej)fe+d6d7ej)fd,ej)d3fgdefd8e,fd9ejfd:ejd3fd;ed3fe-d3gd<Z.dS )=r   z$
    For the ReasonML language.
    ZReasonMLzhttps://reasonml.github.io/Zreasonmlreasonz*.rez*.reiztext/x-reasonmlz2.6)0r   r   r   r   r   r    r   r   r,   r&   r'   r   r   r   r2   Zesfunr   r/   r*   r0   r   r   r   r   r)   switchr   Zpubr   r   Znonrecr   r#   r   prir   r   r   r   r   r   r   r   r(   r   r   r   r3   )+r   r7   r   r   rw   r}   r   r   r@   r   r   r9   r   r   z\.\.\.r:   r   r   r6   rA   r   r   r   r;   r   r   r   r   r   r   r   r   r   r=   rC   r   r   r   r5   z\|\|r   r   r   r   )	r1   r   r   r   r   Zlsrr   r   r   r   r   r   r   rE   r   r]   r   r   ro   r   z//.*?\nz	\/\*(?!/)r_   r   rb   ra   Nr   rD   r   r   r   r   r   r   r   r   r   r   rF   rj   r   r  z\/\*r~   z\*\/rG   r   r   r   r   r   r   r   r   r   )/r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   rH   r   r   r   r  rP   r   r   r#  r   r   r   r
   r	   r  r   r   r   r   r  r  r   r   r   r   r   r   r   r   rI   rI   rI   rJ   r     sz   







r   c                   @   s  e Zd ZdZdZdZdgZddgZdgZdZ	d	Z
d
ZdZdZdZdZdZdZdejfdejfdejfgdefdejjfdejdfdejfdedfdefdde
efddeejfddeejfddeddd  e fd!e de d"e e fddeej!fd#efd$e"j#fd%e"j$fd&e"j%fd'e"j&fd(e"j'fd)ej(fd*ej(fd+efd,e j)fd-efd.ej*d/fd0ej+fgd1efd2ed3fd4ed5fd6efgd7ej*fe,d8d9ej*fd.ej*d5fgdefd:e-fd;ejfd<ejd5fd=ed5fe.d5gd>Z/dS )?r   z
    For the F* language.
    ZFStarzhttps://www.fstar-lang.org/Zfstarz*.fstz*.fstiztext/x-fstarz2.7)5Zabstract
attributesZnoeqZunopteqZandbeginZbyr   Zeffectr,   r&   Zensuresr'   existsr   r  r2   r   r*   r0   r   inlineZinline_for_extractionZirreducibleZlogicrT   r   r   r   Z
new_effectZ	noextractr#   r   opaquer   Zrange_ofZ	reifiableZreifyZreflectablerequiresZset_range_ofZ
sub_effectZsynthr   totalr   r   r   ZunfoldZ
unfoldabler(   r   r3   not)r)   r   )ZassumeZadmitr   Zcalc)/r   r   z/\\z\\/z<:z<@z\(\|z\|\)r7   zu#r   rw   r}   z\(\)r@   z~>r8   r   z<--z<==>z==>r   r   z\?\.z\.\[z\.\(z\.\(\|z\.\[\|z
\{:patternr:   r   r   rA   r   r;   z%\[z!\{r   z\[@r   z\|>z\]z\|\]r   r5   r   z\$r   r   r   r   r   rE   r   r]   zfalse|true|False|True|\(\)|\[\]r   ro   r   r   r_   z\/\/.+$r   rb   ra   Nr   rD   r   r   r   r   r   r   r   r   r   r   z\`([\w\'.]+)\`z\`rF   rj   r   r   r^   r~   r   rG   r   r   r   r   r   r   r   r   r   )0r   r   r   r   r   r   r   r   r   r   r   Zdecl_keywordsZassume_keywordsr   r   r   r   r   r   rH   r   r   r   r  rP   r   r   r   r   r
   	ExceptionZDeclarationr	   r   r   r   r   r  r  r   r   r  r   r   r   r   r   r   rI   rI   rI   rJ   r   ^  s   


!

r   )r   rc   Zpygments.lexerr   r   r   r   r   Zpygments.tokenr   r   r	   r
   r   r   r   r   r   __all__r   r   r   r   r   rI   rI   rI   rJ   <module>   s   
,  Q\  E\