
    T                     d    S r SSKrSSKJrJr  SSKJrJrJrJ	r	J
r
JrJrJr  S/r " S S\5      rg)z
pygments.lexers.comal
~~~~~~~~~~~~~~~~~~~~~

Lexer for COMAL-80.

:copyright: Copyright 2006-2023 by the Pygments team, see AUTHORS.
:license: BSD, see LICENSE for details.
    N)
RegexLexerwords)Comment
WhitespaceOperatorKeywordStringNumberNamePunctuationComal80Lexerc                   2   \ rS rSrSrSrSrSS/rSS/r\	R                  rS	rS
rS\R                  4S\4S\4S\-   \R$                  4\" / SQ\S9\R$                  4\" / SQ\S9\R*                  4\" / SQ\S9\R,                  4\" / SQ\S9\R0                  4\" / SQ\S9\R2                  4S\S4\S-   \R6                  4\S-   \4S\R:                  4S\R<                  4S\R>                  4S\R@                  4S\!4/S\4S\RD                  4S\S 4/S!.r#S"r$g#)$r      z
For COMAL-80 source code.
zCOMAL-80z#https://en.wikipedia.org/wiki/COMALcomalcomal80z*.cmlz*.comalu   \b(?!['\[\]←£\\])u   [a-z]['\[\]←£\\\w]*z//.*\nz\s+u   :[=+-]|\<\>|[-+*/^↑<>=]z(and +then|or +else))	andbitandbitorbitxordivinmodnotor)suffix)?appendatcasechainclosecopycreatecursordatadeletedirdoelifelseendendcaseendifendforendloopendtrapendwhileexecexitfileforgotohandlerifinputletloopmountnullofopen	otherwiseoutputpagepasspokeprintrandomreadrepeatreportreturnrenamerestoreselectstepstopsysthentotrapunitzunit$untilusingwhenwhilewritezone)
closeddimendfuncendprocexternalfuncimportprocrefuse)absatnzchr$coseodeoferrerrfileerrtextescexpintzkey$lenlogordpeek	randomizerndsgnsinzspc$sqrzstatus$zstr$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)rootr    N)%__name__
__module____qualname____firstlineno____doc__nameurlaliases	filenamesre
IGNORECASEflags_suffix_identifierr   Singler   r   Wordr   r   ReservedDeclarationr   BuiltinConstantr	   Labelr
   BinHexFloatIntegerr   Escapetokens__static_attributes__r       (lib/third_party/pygments/lexers/comal.pyr   r      s    D
/C	"G)$IMME &G+K 'Z )84$w.> %()18  D MTU   	"  &.578?8K8KM   (/	0 26	?
 *7;W=M=MN68$>)4::68#T*

#VZZ($fll3V^^$%E#
J v&--(66"
K*Fr   )r   r   pygments.lexerr   r   pygments.tokenr   r   r   r   r	   r
   r   r   __all__r   r   r   r   <module>r      s7    
 ,   
<: <r   