HOME

Mini Shell 1.0
DIR: /usr/lib/python3/dist-packages/pygments/lexers/__pycache__/
Current File : //usr/lib/python3/dist-packages/pygments/lexers/__pycache__/forth.cpython-312.pyc
�

|�e��`�dZddlZddlmZmZddlmZmZmZm	Z	m
Z
mZmZdgZ
Gd�de�Zy)z�
    pygments.lexers.forth
    ~~~~~~~~~~~~~~~~~~~~~

    Lexer for the Forth language.

    :copyright: Copyright 2006-2023 by the Pygments team, see AUTHORS.
    :license: BSD, see LICENSE for details.
�N)�
RegexLexer�bygroups)�Text�Comment�Keyword�Name�String�Number�
Whitespace�
ForthLexerc���eZdZdZdZdZdgZddgZdgZe	je	jzZde
fd	ejfd
ejfdeej$e
�dfd
eee
�dfdefdej*fdej,fdej.fdej2fdej4fdeej$e�dfdej8fg
dej:dfgdedfgd�Zd�Zy)rz;
    Lexer for Forth files.

    .. versionadded:: 2.2
    �Forthzhttps://www.forth.com/forth/�forthz*.frtz*.fszapplication/x-forthz\s+z\\.*?$z\([\s].*?\)z((:|variable|constant|value|buffer:)(\s+)�worddefz([.sc]")(\s+?)�	stringdefau	(blk|block|buffer|evaluate|flush|load|save-buffers|update|empty-buffers|list|refill|scr|thru|\#s|\*\/mod|\+loop|\/mod|0<|0=|1\+|1-|2!|2\*|2\/|2@|2drop|2dup|2over|2swap|>body|>in|>number|>r|\?dup|abort|abort\"|abs|accept|align|aligned|allot|and|base|begin|bl|c!|c,|c@|cell\+|cells|char|char\+|chars|constant|count|cr|create|decimal|depth|do|does>|drop|dup|else|emit|environment\?|evaluate|execute|exit|fill|find|fm\/mod|here|hold|i|if|immediate|invert|j|key|leave|literal|loop|lshift|m\*|max|min|mod|move|negate|or|over|postpone|quit|r>|r@|recurse|repeat|rot|rshift|s\"|s>d|sign|sm\/rem|source|space|spaces|state|swap|then|type|u\.|u\<|um\*|um\/mod|unloop|until|variable|while|word|xor|\[char\]|\[\'\]|@|!|\#|<\#|\#>|:|;|\+|-|\*|\/|,|<|>|\|1\+|1-|\.|\.r|0<>|0>|2>r|2r>|2r@|:noname|\?do|again|c\"|case|compile,|endcase|endof|erase|false|hex|marker|nip|of|pad|parse|pick|refill|restore-input|roll|save-input|source-id|to|true|tuck|u\.r|u>|unused|value|within|\[compile\]|\#tib|convert|expect|query|span|tib|2constant|2literal|2variable|d\+|d-|d\.|d\.r|d0<|d0=|d2\*|d2\/|d<|d=|d>s|dabs|dmax|dmin|dnegate|m\*\/|m\+|2rot|du<|catch|throw|abort|abort\"|at-xy|key\?|page|ekey|ekey>char|ekey\?|emit\?|ms|time&date|BIN|CLOSE-FILE|CREATE-FILE|DELETE-FILE|FILE-POSITION|FILE-SIZE|INCLUDE-FILE|INCLUDED|OPEN-FILE|R\/O|R\/W|READ-FILE|READ-LINE|REPOSITION-FILE|RESIZE-FILE|S\"|SOURCE-ID|W/O|WRITE-FILE|WRITE-LINE|FILE-STATUS|FLUSH-FILE|REFILL|RENAME-FILE|>float|d>f|f!|f\*|f\+|f-|f\/|f0<|f0=|f<|f>d|f@|falign|faligned|fconstant|fdepth|fdrop|fdup|fliteral|float\+|floats|floor|fmax|fmin|fnegate|fover|frot|fround|fswap|fvariable|represent|df!|df@|dfalign|dfaligned|dfloat\+|dfloats|f\*\*|f\.|fabs|facos|facosh|falog|fasin|fasinh|fatan|fatan2|fatanh|fcos|fcosh|fe\.|fexp|fexpm1|fln|flnp1|flog|fs\.|fsin|fsincos|fsinh|fsqrt|ftan|ftanh|f~|precision|set-precision|sf!|sf@|sfalign|sfaligned|sfloat\+|sfloats|\(local\)|to|locals\||allocate|free|resize|definitions|find|forth-wordlist|get-current|get-order|search-wordlist|set-current|set-order|wordlist|also|forth|only|order|previous|-trailing|\/string|blank|cmove|cmove>|compare|search|sliteral|.s|dump|see|words|;code|ahead|assembler|bye|code|cs-pick|cs-roll|editor|state|\[else\]|\[if\]|\[then\]|forget|defer|defer@|defer!|action-of|begin-structure|field:|buffer:|parse-name|buffer:|traverse-wordlist|n>r|nr>|2value|fvalue|name>interpret|name>compile|name>string|cfield:|end-structure)(?!\S)z
(\$[0-9A-F]+)z(\#|%|&|\-|\+)?[0-9]+z(\#|%|&|\-|\+)?[0-9.]+z�(@i|!i|@e|!e|pause|noop|turnkey|sleep|itype|icompare|sp@|sp!|rp@|rp!|up@|up!|>a|a>|a@|a!|a@+|a@-|>b|b>|b@|b!|b@+|b@-|find-name|1ms|sp0|rp0|\(evaluate\)|int-trap|int!)(?!\S)z�(do-recognizer|r:fail|recognizer:|get-recognizers|set-recognizers|r:float|r>comp|r>int|r>post|r:name|r:word|r:dnum|r:num|recognizer|forth-recognizer|rec:num|rec:float|rec:word)(?!\S)z0(Evalue|Rvalue|Uvalue|Edefer|Rdefer|Udefer)(\s+)z\S+z#popz[^"]+)�rootrrc�2�tjd|�ryy)zZForth uses : COMMAND ; quite a lot in a single line, so we're trying
        to find that.z	
:[^
]+;
g333333�?N)�re�search)�texts �7/usr/lib/python3/dist-packages/pygments/lexers/forth.py�analyse_textzForthLexer.analyse_text�s���9�9�^�T�*��+�N) �__name__�
__module__�__qualname__�__doc__�name�url�aliases�	filenames�	mimetypesr�
IGNORECASE�	MULTILINE�flagsrr�Singlerr�	Namespacer	r
�Hex�Integer�Typer�Constant�	Decoratorr�Function�Class�tokensr�rrrrsW���
�D�
(�C��i�G��&�!�I�&�'�I��M�M�B�L�L�(�E��Z� �
����'�
�W�^�^�,�
8�
�g�'�'��
4�i�
A����� <�k�J�^-�|/6�}^
7�B�v�z�z�*�
%�v�~�~�6�
&����5�:�
�]�]�
�2�48�>�>�
C�
A�
�g�'�'��
.�	�
;��T�]�]�#�AB
�H�T�Z�Z��(�
��v�v�&�
�OJ�F�Xr)rr�pygments.lexerrr�pygments.tokenrrrrr	r
r�__all__rr0rr�<module>r4s8���
�/�����.��^��^r