U ]gr@sbdZddlZddlmZmZmZddlmZmZm Z m Z m Z m Z m Z mZdgZGdddeZdS)z pygments.lexers.oberon ~~~~~~~~~~~~~~~~~~~~~~ Lexers for Oberon family languages. :copyright: Copyright 2006-2025 by the Pygments team, see AUTHORS. :license: BSD, see LICENSE for details. N) RegexLexerincludewords)TextCommentOperatorKeywordNameStringNumber PunctuationComponentPascalLexerc@s@eZdZdZdZddgZddgZdgZdZd Z e j e j BZ ed ed ed ed ededededgdefdefgdejfgdefgdejfdejfdejfdejfdejfgdefdefgdefdefdefd efd!efd"efd#efd$efd%efg d&efged'd(d)ejfed*d(d)ejfd+ejfgd, Zd-d.Z d/S)0r z+ For Component Pascal source code. zComponent PascalZcomponentpascalcpz*.cpz*.cpsztext/x-component-pascalzhttps://blackboxframework.orgz2.1 whitespacecomments punctuation numliteralsstrings operatorsbuiltins identifiersz\n+z\s+z\(\*([^$].*?)\*\)z[()\[\]{},.:;|]z [0-9A-F]+X\bz[0-9A-F]+[HL]\bz[0-9]+\.[0-9]+E[+-][0-9]+z[0-9]+\.[0-9]+z[0-9]+z '[^\n']*'z "[^\n"]*"z[+-]z[*/]z[=#<>]z\^&~z:=z\.\.z\$z([a-zA-Z_$][\w$]*)) ZANYPTRZANYRECZBOOLEANZBYTEZCHARZINTEGERZLONGINTZREALZSET SHORTCHARSHORTINTZ SHORTREALz\b)suffix)>ZABSZABSTRACTARRAYZASHASSERTBEGINZBITSZBYZCAPZCASEZCHRZCLOSEZCONSTZDECZDIVZDOELSEZELSIFZEMPTYENDZENTIERZEXCLZEXITZ EXTENSIBLEZFORZHALTZIFZIMPORTINZINCZINCLZISZLENZLIMITEDLONGZLOOPMAXZMINZMODMODULEZNEWZODDZOFORZORDZOUTPOINTER PROCEDURERECORDREPEATZRETURNZSHORTrrZSIZEZTHENZTYPEZTOZUNTILZVARZWHILEZWITHz(TRUE|FALSE|NIL|INF)\b) rootrrrrrrrrcCsHd}d|kr|d7}d|kr$|d7}d|kr4|d7}d|krD|d7}|S)zThe only other lexer using .cp is the C++ one, so we check if for a few common Pascal keywords here. Those are unfortunately quite common across various business languages as well.rrg{Gz?r r')textresultr+r+:/tmp/pip-unpacked-wheel-zak7uw41/pygments/lexers/oberon.py analyse_textjsz!ComponentPascalLexer.analyse_textN)!__name__ __module__ __qualname____doc__namealiases filenames mimetypesurlZ version_addedre MULTILINEDOTALLflagsrrrZ Multiliner r ZHexZFloatZIntegerr rr rrTypeZReservedConstanttokensr/r+r+r+r.r sv     I)r3r9Zpygments.lexerrrrZpygments.tokenrrrrr r r r __all__r r+r+r+r.s  (