YBFjn ldZddlZddlmZmZddlmZmZmZm Z m Z m Z m Z m Z dgZGddeZdS)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) RegexLexerwords)Comment WhitespaceOperatorKeywordStringNumberName Punctuation Comal80LexerceZdZdZdZdZddgZddgZdZe j Z d Z d Z d ejfd efd efde zejfegde ejfegde ejfegde ejfegde ejfegde ejfdedfe dzejfe dzefdejfdejfdejfdej fde!fgdefdej"fded fgd!Z#d"S)#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 EscapetokensCC:\PYTHON\_runtimes\venv\Lib\site-packages\pygments/lexers/comal.pyr r s D /C "G)$IM ME &G+K ' Z )8 4 $w . > U%((()1 8UDDDMTUUU  "U&&&.57778?8K MU(/ 00026  ? U***7 ; ; ;W=M N 68 $ > )4: 6 8 #T *  # VZ ( $fl 3 V^ $  %E# Jv  &- ( 66 " K**FFFr)rrpygments.lexerrrpygments.tokenrrrrr r r r __all__r rrrrs ,,,,,,,,  =====:=====r