|eT ddZddlZddlmZmZddlmZmZmZm Z m Z m Z m Z m Z dgZGddeZy)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) RegexLexerwords)Comment WhitespaceOperatorKeywordStringNumberName Punctuation Comal80LexercHeZdZdZdZdZddgZddgZejZ dZ d Z d e jfd efd efd e zej"fegde ej"fegde ej(fegde ej*fegde ej.fegde ej0fdedfe dzej4fe dzefdej8fdej:fdej<fdej>fde fgdefdejBfdedfgd 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 filenamesre IGNORECASEflags_suffix _identifierrSinglerrWordrrReserved Declarationr BuiltinConstantr Labelr BinHexFloatIntegerr Escapetokens7/usr/lib/python3/dist-packages/pygments/lexers/comal.pyr r s D /C "G)$I 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