o

;jn�@s^dZd
dl
Z
d
dlmZmZ
d
dlmZmZmZm	Z	m
Z
mZmZm
Z

dg
ZGdd�de�ZdS)z�
    pygments.lexers.comal
    ~~~~~~~~~~~~~~~~~~~~~

    Lexer for COMAL-80.

    :copyright: Copyright 2006-present by the Pygments team, see AUTHORS.
    :license: BSD, see LICENSE for details.
�N)�
RegexLexer�words)�Comment�
Whitespace�Operator�Keyword�String�Number�Name�Punctuation�Comal80Lexerc@s"
eZ
dZd
ZdZdZddgZddgZdZe	j
Zd	Zd
Z
dejfdefd
efdeejfegd�
ed�ejfegd�
ed�ejfegd�
ed�ejfegd�
ed�ejfegd�
ed�ejfdedfe
dejfe
defdejfdejfdejfdej fde!fgdefdej"fded fgd!�Z#d"S)#rz#
    For COMAL-80 source code.
    zCOMAL-80z#https://en.wikipedia.org/wiki/COMALZcomalZcomal80z*.cmlz*.comal�u\b(?!['\[\]←£\\])u[a-z]['\[\]←£\\\w]*z//.*\nz\s+u:[=+-]|\<\>|[-+*/^↑<>=]z(and +then|or +else))	�andZbitandZbitorZbitxorZdiv�in�mod�not�or)
�suffix)?�appendZat�case�chain�close�copy�createZcursor�data�delete�dirZdo�elif�else�endZendcaseZendifZendforZendloopZendtrapZendwhile�exec�exit�file�forZgoto�handler�if�inputZletZloopZmount�nullZof�openZ	otherwise�outputZpage�passZpoke�print�random�read�repeat�report�return�renameZrestore�select�step�stop�sysZthen�toZtrapZunitzunit$ZuntilZusingZwhen�while�write�zone)
�closedZdimZendfuncZendprocZexternal�func�import�proc�refZuse)�absZatnzchr$�cosZeod�eof�errZerrfileZerrtext�esc�exp�intzkey$�len�log�ord�peekZ	randomizeZrndZsgn�sinzspc$Zsqrzstatus$zstr$�tab�tan�time�val)�false�pi�true�
"�stringz:(?=[ \n/])z[$#]?z%[01]+z\$[0-9a-f]+z\d*\.\d*(e[-+]?\d+)?z\d+z[(),:;]z[^"]+z"[0-9]*"z#pop)�rootrSN)$�__name__�
__module__�__qualname__�__doc__�name�url�aliases�	filenamesZ
version_added�re�
IGNORECASE�flagsZ_suffixZ_identifierr�SinglerrZWordrrZReservedZDeclarationr
ZBuiltinZConstantrZLabelr	ZBinZHexZFloatZIntegerrZEscape�tokens�rbrb�I/opt/saltstack/salt/lib/python3.10/site-packages/pygments/lexers/comal.pyrsb










���	�
����








�%

�
�)rXr]Zpygments.lexerrrZpygments.tokenrrrrrr	r
r�__all__rrbrbrbrc�<module>
s
(