o
    \h                     @   sf   d Z ddl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 ddlmZ dgZG dd deZdS )z
    pygments.lexers.tcl
    ~~~~~~~~~~~~~~~~~~~

    Lexers for Tcl and related languages.

    :copyright: Copyright 2006-2025 by the Pygments team, see AUTHORS.
    :license: BSD, see LICENSE for details.
    )
RegexLexerincludewords)TextCommentOperatorKeywordNameStringNumber
Whitespaceshebang_matchesTclLexerc                   @   sL  e Zd ZdZeddddZeddddZdZdZdgZ	d	d
gZ
g dZdZdAddZi dedededdefgdeeedeeeddeeeddeeedddedfdedfded fd!ejd"fd#ejfd$efgd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fgd-d.ed/fd0ed/fd1efededgd2ded3fed-gd4d5ed3fed-gd6d7ed3fed-gd"dejd8fd9ejfd!ejd/fgd8dejd8fd:ejfd7ejd/fgd ded/fedededgdd5ed/fedededgdd7ed/fedededgd;d<ed/fd=efgZd>d? Zd@S )Br   z
    For Tcl source code.
    )afterapplyarraybreakcatchcontinueelseifelseerrorevalexprforforeachglobalif	namespaceprocrenamereturnsetswitchthentraceunsetupdateuplevelupvarvariablevwaitwhilez\b)prefixsuffix)Kappendbgerrorbinarycdchanclockcloseconcatddedictencodingeofexecexitfblocked
fconfigurefcopyfile	fileeventflushformatgetsglobhistoryhttpincrinfointerpjoinlappendlassignlindexlinsertlistllengthloadloadTklrangelrepeatlreplacelreverselsearchlsetlsortmathfuncmathopmemorymsgcatopenpackagepidzpkg::createpkg_mkIndexplatformzplatform::shellputspwd	re_syntaxreadrefchanregexpregistryregsubscanseeksocketsourcesplitstringsubsttelltimetmunknownunloadTclz&https://www.tcl.tk/about/language.htmltclz*.tclz*.rvt)z
text/x-tclztext/x-script.tclzapplication/x-tclz0.10 c                 C   s4   | t d| f|tjd| fdtjd| fdtdfgS )Nparamsz	([\w.-]+)#comment)r   r	   BuiltinVariabler   )keyword_cmds_rebuiltin_cmds_recontext r   V/home/air/segue/gemini/backup/venv/lib/python3.10/site-packages/pygments/lexers/tcl.py_gen_command_rules3   s
   zTclLexer._gen_command_rulesrootcommandbasicdataz\}zcommand-in-bracez	-in-bracezcommand-in-bracketz-in-bracketzcommand-in-parenz	-in-parenz\(parenz\[bracketz\{brace"rr   z(eq|ne|in|ni)\bz/!=|==|<<|>>|<=|>=|&&|\|\||\*\*|[-+~!*/%<>&^|?:]z\s+z0x[a-fA-F0-9]+z0[0-7]+z\d+\.\d+z\d+z
\$[\w.:-]+z\$\{[\w.:-]+\}z
[\w.,@:-]+r|   ;#popz\nz(else|elseif|then)\bzparams-in-brace)r   r   zparams-in-parenz\)zparams-in-bracketz\]zstring-squarez(?s)(\\\\|\\[0-7]+|\\.|[^"\\])z$(?s)(\\\\|\\[0-7]+|\\.|\\\n|[^\]\\])r~   z	.*[^\\]\nz.*\\\nc                 C   s
   t | dS )Nz(tcl)r   )textr   r   r   analyse_text   s   
zTclLexer.analyse_textN)r{   ) __name__
__module____qualname____doc__r   r   r   nameurlaliases	filenames	mimetypesversion_addedr   r   r   r
   Doubler   Wordr   r   HexOctFloatIntegerr	   r   r   r   tokensr   r   r   r   r   r      s    


#*.26

;

@FLRXN)r   pygments.lexerr   r   r   pygments.tokenr   r   r   r   r	   r
   r   r   pygments.utilr   __all__r   r   r   r   r   <module>   s    
(