K ik ddZddlZddlmZmZddlmZmZmZm Z m Z m Z m Z m Z dgZGddeZy)z pygments.lexers.comal ~~~~~~~~~~~~~~~~~~~~~ Lexer for COMAL-80. :copyright: Copyright 2006-2025 by the Pygments team, see AUTHORS. :license: BSD, see LICENSE for details. N) RegexLexerwords)Comment WhitespaceOperatorKeywordStringNumberName Punctuation Comal80LexercLeZdZdZdZdZddgZddgZdZe jZ d Z d Z d ejfd efd efde zej$fegde ej$fegde ej*fegde ej,fegde ej0fegde ej2fdedfe dzej6fe dzefdej:fdej<fdej>fdej@fde!fgdefdejDfded fgd!Z#y")#r z# For COMAL-80 source code. zCOMAL-80z#https://en.wikipedia.org/wiki/COMALcomalcomal80z*.cmlz*.comalu\b(?!['\[\]←£\\])u[a-z]['\[\]←£\\\w]*z//.*\nz\s+u:[=+-]|\<\>|[-+*/^↑<>=]z(and +then|or +else)) andbitandbitorbitxordivinmodnotor)suffix)?appendatcasechainclosecopycreatecursordatadeletedirdoelifelseendendcaseendifendforendloopendtrapendwhileexecexitfileforgotohandlerifinputletloopmountnullofopen otherwiseoutputpagepasspokeprintrandomreadrepeatreportreturnrenamerestoreselectstepstopsysthentotrapunitzunit$untilusingwhenwhilewritezone) closeddimendfuncendprocexternalfuncimportprocrefuse)absatnzchr$coseodeoferrerrfileerrtextescexpintzkey$lenlogordpeek randomizerndsgnsinzspc$sqrzstatus$zstr$tabtantimeval)falsepitrue"stringz :(?=[ \n/])z[$#]?z%[01]+z \$[0-9a-f]+z\d*\.\d*(e[-+]?\d+)?z\d+z[(),:;]z[^"]+z"[0-9]*"z#pop)rootrN)$__name__ __module__ __qualname____doc__nameurlaliases filenames version_addedre IGNORECASEflags_suffix _identifierrSinglerrWordrrReserved Declarationr BuiltinConstantr Labelr BinHexFloatIntegerr Escapetokens[/mnt/ssd/data/python-lab/Trading/venv/lib/python3.12/site-packages/pygments/lexers/comal.pyr r s D /C "G)$IM MME &G+K ' Z )8 4 $w . > %()1 8DMTU   "&.578?8K8K M(/ 026  ? *7 ;W=M=M N 68 $ > )4:: 6 8 #T *  # VZZ ( $fll 3 V^^ $  %E# Jv  &-- ( 66 " K*Fr)rrpygments.lexerrrpygments.tokenrrrrr r r r __all__r rrrrs7 ,  =:=r