B
    b                 @   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 ddddd	g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-2022 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dddgZddgZd	d
dddddddddddddddddddddd d!d"d#d$d%d&d'd(d)d*d+d,d-d.d/d0d1h)Zd2d3d4d5d6d7d8hZ	d9d:d;d<d=d>d?d@dAdBh
Z
dCZdDZdEdF ZdGdH ZdIdJ ZdKdL ZdMefdNejdOfgdPedQfdRedSfdTejdUfdVejdQfdWejdSfgdXdYdZd[ e
D  efd\ejd]fd^ejd_fd`ejfdaejfdbejfdcejfddejfdeejfdfejfdgej fdhe ej fdie ej fdjejdkfdlejdmfdnejdofdpejdqfdrej!fdse edtfdXe efdXe efgdse efdXe edSfdXe edSfdMe"fdue"fge#dQge$dvdwejdxfdyejdzfe$d{e$d|due"fge$dvd}efdNejdOfd~ejdfdejdfd3edfdejdfe$d{e$d|due"fg
eejeejddYe edSfge$dve$ddXe ej%fe#dSge$dvdrej!fdedfdXe ej&dSfdXe ej&dSfe#dSge$dvdrej!fdedfdeef e'ej(eedSfdeef e'ej(eedSfdXe ej(dSfdXe ej(dSfe#dSge$dve$ddrej!fdedfde edfdXe ej)fdXe ej)fdue"dSfge$dvdejdfe$de$d|due"dSfge$dve$ddrej!fdedfde'eeejdSfde edfdXe ej)fdXe ej)fdue"dSfg	e$dvdejdfdejdfdejfde e'eeej*fde e'eeej*fe$de$d|due"fg	e$dvde e'ejeej*fde e'ejeej*fdejfdeef ej*fe#dSge$dvdXe ej*dSfdXe ej*dSfdue"dSfgd}efdNejdOfdrej!feefd?efdedSfeefgdejfdNejdfdejdSfdejfgdZ+dS )r   zB
    For the Standard ML language.

    .. versionadded:: 1.5
    zStandard MLZsmlz*.smlz*.sigz*.funztext/x-standardmlzapplication/x-standardmlZabstypeandZandalsoascaseZdatatypedoelseend	exceptionfnfunZhandleifinZinfixZinfixrletZlocalZnonfixofopopenZorelseraiserecthentypevalwithZwithtypewhileZeqtypefunctorr   ZsharingsigZ	signaturestructZ	structurewhere:z\|=z=>z->#z:>()[]{},;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]z
\\[0-9]{3}z\\u[0-9a-fA-F]{4}z\\\s+\\"z#pop)r   EscapeZInterpol)Zwhatkind r=   1lib/python3.7/site-packages/pygments/lexers/ml.pystringy<   s    zSMLLexer.stringyc             c   sP   | d| jk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tokenr=   r=   r>   long_id_callbackK   s
    zSMLLexer.long_id_callbackc             c   sL   | d| jkrt}n| d| jkr,t}nt}|d|| dfV  d S )Nr@   )rB   rC   r   symbolicid_reservedr   rE   )rF   rG   rH   r=   r=   r>   end_id_callbackS   s    zSMLLexer.end_id_callbackc             c   sF   | d}|| jkrtj}n|| jkr,t}nt}|d||fV  d S )Nr@   )rB   rC   r
   ReservedrJ   r   r   rE   )rF   rG   strrH   r=   r=   r>   id_callback\   s    


zSMLLexer.id_callbackz\s+z\(\*commentz\(|\[|\{mainz\)|\]|\}z#popz\b(let|if|local)\b(?!\'))rP   rP   z\b(struct|sig|while)\b(?!\')z\b(do|else|end|in|then)\b(?!\')z(%s)|c             c   s   | ]}t |V  qd S )N)reescape).0zr=   r=   r>   	<genexpr>|   s    zSMLLexer.<genexpr>z#"charr;   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*(%s)z#\s+(%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\']*z(%s)(\.)dottedz\S+
whitespacez\b(val|and)\b(?!\')vnamez\b(fun)\b(?!\'))z#popzmain-funfname
delimiterscorez\sz\b(fun|and)\b(?!\')r`   z\b(val)\b(?!\'))z#poprP   r_   z\b(case|handle)\b(?!\'))z#poprP   z(?=\b(%s)\b(?!\'))breakoutz\(tyvarseqz(%s)(\s*)(=(?!%s))z=(?!%s))z#poptypbindz\b(and)\b(?!\'))z#popr\   z(=)(\s*)(datatype))z#popdatbinddatcon)z#poprY   z\b(withtype)\b(?!\')z\b(of)\b(?!\')z(\|)(\s*)(%s)z(\|)(\s+)(%s)z(and\b)(\s+)(%s)z(and\b)(\s*)(%s)z	(%s)|(%s)z\)z[^(*)]z#pushz\*\)z[(*)])r^   ra   rb   r]   rootrP   zmain-funrW   rX   rc   r[   r`   r_   r\   re   rY   rf   rZ   rg   rd   rO   N),__name__
__module____qualname____doc__namealiases	filenames	mimetypesrC   rJ   Znonid_reservedZalphanumid_reZsymbolicid_rer?   rI   rK   rN   r   r   	Multiliner   r
   rL   joinr   CharDoubler   HexIntegerFloatr   ZLabelZ	Decoratorr   r   r   rD   ZFunctionr   VariableTypeClasstokensr=   r=   r=   r>   r      s8  

		























c               @   s  e Zd ZdZdZdZdgZddddgZd	g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eef 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d0ed1fd2efgd3ej%fe'd4d5ej%fd*ej%d1fgdefd6e(fd7ejfd8ejd1fd9ed1fe)d1gd:Z*dS );r   z<
    For the OCaml language.

    .. versionadded:: 0.7
    ZOCamlzhttps://ocaml.org/Zocamlz*.mlz*.mliz*.mllz*.mlyztext/x-ocaml)0r   assertbeginclass
constraintr   donedowntor   r   r   externalfalseforr   functionr+   r   r   r   inheritinitializerlazyr    rG   methodmodulemutablenewobjectr!   r#   privater$   r%   r,   r-   r&   totruetryr'   valuer(   virtualwhenr*   r)   ))z!=r1   &z&&z\(z\)z\*z\+r8   -z-\.z->z\.z\.\.r/   z::z:=z:>r9   z;;<z<-r0   >z>]z>\}z\?z\?\?z\[z\[<z\[>z\[\|r5   r:   `z\{z\{<z\|z\|]z\}~z[!$%&*+\./:<=>?@^|~-])r   asrlandlorlsllxormodorz[!?~]z[=<>@^|&+\*/$%-])unitintfloatboolrX   rW   listarrayz\\[\\"\'ntbr]z
\\[0-9]{3}z\\x[0-9a-fA-F]{2}z\s+zfalse|true|\(\)|\[\]z\b([A-Z][\w\']*)(?=\s*\.)r]   z\b([A-Z][\w\']*)z\(\*(?![)])rO   z\b(%s)\brQ   z(%s)Nz
(%s|%s)?%sz[^\W\d][\w']*z(-?\d[\d_]*(.[\d_]*)?([eE][+\-]?\d[\d_]*)z0[xX][\da-fA-F][\da-fA-F_]*z0[oO][0-7][0-7_]*z0[bB][01][01_]*z\d[\d_]*z7'(?:(\\[\\\"'ntbr ])|(\\[0-9]{3})|(\\x[0-9a-fA-F]{2}))'z'.''r;   rX   z[~?][a-z][\w\']*:z[^(*)]+z\(\*z#pushz\*\)z#popz[(*)]z[^\\"]+zescape-sequencez\\\nz\.z[A-Z][\w\']*(?=\s*\.)z[A-Z][\w\']*z[a-z_][\w\']*)zescape-sequencerh   rO   rX   r]   )+ri   rj   rk   rl   rm   urlrn   ro   rp   keywordskeyopts	operatorsword_operatorsprefix_syms
infix_syms
primitivesr   r<   r   r   BuiltinPseudorD   rz   r   rr   r
   r	   Wordry   r   rw   ru   OctBinrv   rs   rt   rx   r   r   r   r{   r=   r=   r=   r>   r   c  sh   	





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
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
 efd,e efd-ed.fd/e	 ej"fd0e	 ejfd1ejfe	efgedd2ej"fe#d3gedd4ej"d5fd6ej"d7fe	d4 ej"d5fe	ej"d$fd/e	 ej"fe#d$gede#d8gedd9ej"d:fe#d$gedd2ej"d;fd<ej"d=fe#d$gedd>ej"d?fd2ej"d;fe#d$gedd@ej"fdAej"fd4ej"d"fdBej"d$fgeddCej"fdAej"fd!ej"d"fd#ej"d$fgdDefded"fdEed$fdAefgdFejfdejd$fd!edGfedHgdIejfdJejd$fd!edGfedHgdKejdLfdMejdNfgdOejd$fgdefdPejdQfdRejd$fdMejdNfgd/ejdSfdejdTfd0e	 ejd$fd1ejdUfdVejd$fd!edUfgdWedXfdYejdZfd[ejd&fd!edGfd\ejfgd]ed$fd^efgd_Z$d`S )ar   z@
    Lexer for the Opa language.

    .. versionadded:: 1.5
    ZOpaZopaz*.opaz
text/x-opa)r   r   r}   r   ZclientZcssZdatabaseZdbr   r   r   r   forallr   r   importrG   r   r   packageparserr%   Zserverr&   r'   r(   r)   Z
xml_parserz(([a-zA-Z_]\w*)|(`[^`]*`))z[.=\-<>,@~%/+?*&^!]z[()\[\],;|]z\\[\\"\'ntr}]z
\\[0-9]{3}z\\x[0-9a-fA-F]{2}z/\*znested-commentz//.*?$commentsz\s+z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}r;   rX   z9'(?:(\\[\\\"'ntbr ])|(\\[0-9]{3})|(\\x[0-9a-fA-F]{2})|.)'z\{z#pushz\}z#popz<(?=[a-zA-Z>])zhtml-open-tagz[@?!]?(/\w+)+(\[_\])?z<-(?!r3   z\b([A-Z]\w*)(?=\.)z=(?!z(%s)+r/   r'   r   r1   z#(?=\{)z->)z#popz
type-lhs-1ztype-with-slashz\()z#popz
type-tuplez~?\{)z#popztype-record)z#popzslash-type-1ztype-1/)z#popztype-1)z#popr'   z(?=,))z#popz
type-arrowz,(?=[^:]*?->)ztype-with-slashz[^()/*]+z[/*]z\)z[^{}/*]+z[^/*]+z\*/z[^\\"{]+rh   zescape-sequencez	[^\\\'{]+z\'z[\w\-:]+)z#popz	html-attrr   )z#popzhtml-contentz	[\w\-:]*>z	[\w\-:]+=zhtml-attr-valuez/>)z#popzsingle-string)z#poprX   )z#poprh   z[^"\'{`=<>]+z<!--zhtml-commentz</)z#popzhtml-end-tagr   z[^<{]+z-->z[^\-]+|-)zescape-sequencer   zcomments-and-spacesrh   r'   ztype-1ztype-with-slashzslash-type-1z
type-lhs-1z
type-arrowz
type-tupleztype-recordznested-commentrX   zsingle-stringzhtml-open-tagzhtml-end-tagz	html-attrzhtml-attr-valuezhtml-contentzhtml-commentN)%ri   rj   rk   rl   rm   rn   ro   rp   r   Zident_reZop_reZpunc_rer   r<   r   r   r   r   r
   r   r   r   r   rw   ru   r   r   rv   rt   rs   r	   Singlerx   rD   ry   r   r{   r=   r=   r=   r>   r     s   








	




















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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eef 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d.ejd/fd0ejd1fd2ejfgd3ej'fe)d4d5ej'fd*ej'd1fgdefd6e*fd7ejfd8ejd1fd9ed1fe+d1gd:Z,dS );r   z?
    For the ReasonML language.

    .. versionadded:: 2.6
    ZReasonMLzhttps://reasonml.github.io/Zreasonmlreasonz*.rez*.reiztext/x-reasonml)0r   r|   r}   r~   r   r   r   r   r   r   r   r   r   r   r   Zesfunr   r+   r   r   r   r   r   r   r    Zswitchr   Zpubr   r   Znonrecr   r!   r#   Zprir%   r,   r-   r&   r   r   r   r'   r(   r   r   r*   r)   )+z!=r1   r   z&&z\(z\)z\*z\+r8   r   z-\.z=>z\.z\.\.z\.\.\.r/   z::z:=z:>r9   z;;r   z<-r0   r   z>]z>\}z\?z\?\?z\[z\[<z\[>z\[\|r5   r:   r   z\{z\{<z\|z\|\|z\|]z\}r   z[!$%&*+\./:<=>?@^|~-])	r   r   r   r   r   Zlsrr   r   r   z[!?~]z[=<>@^|&+\*/$%-])r   r   r   r   rX   rW   r   r   z\\[\\"\'ntbr]z
\\[0-9]{3}z\\x[0-9a-fA-F]{2}z\s+zfalse|true|\(\)|\[\]z\b([A-Z][\w\']*)(?=\s*\.)r]   z\b([A-Z][\w\']*)z//.*?\nz	\/\*(?!/)rO   z\b(%s)\brQ   z(%s)Nr   z
(%s|%s)?%sz[^\W\d][\w']*z(-?\d[\d_]*(.[\d_]*)?([eE][+\-]?\d[\d_]*)z0[xX][\da-fA-F][\da-fA-F_]*z0[oO][0-7][0-7_]*z0[bB][01][01_]*z\d[\d_]*z7'(?:(\\[\\\"'ntbr ])|(\\[0-9]{3})|(\\x[0-9a-fA-F]{2}))'z'.'r   r;   rX   z[~?][a-z][\w\']*:z[^/*]+z\/\*z#pushz\*\/z#popz\*z[^\\"]+zescape-sequencez\\\nz\.z[A-Z][\w\']*(?=\s*\.)z[A-Z][\w\']*z[a-z_][\w\']*)zescape-sequencerh   rO   rX   r]   )-ri   rj   rk   rl   rm   r   rn   ro   rp   r   r   r   r   r   r   r   r   r<   r   r   r   r   rD   rz   r   r   rq   rr   r
   r	   r   ry   r   rw   ru   r   r   rv   rs   rt   rx   r   r   r   r{   r=   r=   r=   r>   r     sj   









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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eef 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d.ej)fgd/efd0ed1fd2ed3fd4e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   z8
    For the F* language.
    .. versionadded:: 2.7
    ZFStarzhttps://www.fstar-lang.org/Zfstarz*.fstz*.fstiztext/x-fstar)5ZabstractZ
attributesZnoeqZunopteqZandbeginZbyr   Zeffectr   r   Zensuresr   existsr   r   r   r   r   r   r   ZinlineZinline_for_extractionZirreducibleZlogicrG   r   r   r   Z
new_effectZ	noextractr!   r#   Zopaquer   Zrange_ofZ	reifiableZreifyZreflectableZrequiresZset_range_ofZ
sub_effectZsynthr&   Ztotalr   r   r'   ZunfoldZ
unfoldabler(   r   r)   not)r    r%   )ZassumeZadmitr|   Zcalc)/r   r   z/\\z\\/z<:z<@z\(\|z\|\)r1   zu#r   z\(z\)z\(\)r8   z~>z->z<-z<--z<==>z==>z\.z\?z\?\.z\.\[z\.\(z\.\(\|z\.\[\|z
\{:patternr/   z::z:=r9   z;;r0   z%\[z!\{z\[z\[@z\[\|z\|>z\]z\|\]z\{z\|z\}z\$z[!$%&*+\./:<=>?@^|~-]z[!?~]z[=<>@^|&+\*/$%-])r   r   r   r   rX   rW   r   r   z\\[\\"\'ntbr]z
\\[0-9]{3}z\\x[0-9a-fA-F]{2}z\s+zfalse|true|False|True|\(\)|\[\]z\b([A-Z][\w\']*)(?=\s*\.)r]   z\b([A-Z][\w\']*)z\(\*(?![)])rO   z\/\/.+$z\b(%s)\brQ   z(%s)Nr   z
(%s|%s)?%sz[^\W\d][\w']*z(-?\d[\d_]*(.[\d_]*)?([eE][+\-]?\d[\d_]*)z0[xX][\da-fA-F][\da-fA-F_]*z0[oO][0-7][0-7_]*z0[bB][01][01_]*z\d[\d_]*z7'(?:(\\[\\\"'ntbr ])|(\\[0-9]{3})|(\\x[0-9a-fA-F]{2}))'z'.'r   z\`([\w\'.]+)\`z\`r;   rX   z[~?][a-z][\w\']*:z[^(*)]+z\(\*z#pushz\*\)z#popz[(*)]z[^\\"]+zescape-sequencez\\\nz\.z[A-Z][\w\']*(?=\s*\.)z[A-Z][\w\']*z[a-z_][\w\']*)zescape-sequencerh   rO   rX   r]   ).ri   rj   rk   rl   rm   r   rn   ro   rp   r   Zdecl_keywordsZassume_keywordsr   r   r   r   r   r   r<   r   r   r   r   rD   rz   r   rr   r
   	ExceptionZDeclarationr	   ry   r   rw   ru   r   r   rv   rs   r   rt   rx   r   r   r   r{   r=   r=   r=   r>   r   `  sr   






)rl   rR   Zpygments.lexerr   r   r   r   r   Zpygments.tokenr   r   r	   r
   r   r   r   r   r   __all__r   r   r   r   r   r=   r=   r=   r>   <module>	   s   ,  Q]  E]