3
� �X�� � @ s� d Z ddlZddlmZmZmZmZmZmZm Z ddl
m Z m Z m
Z
mZmZmZmZmZmZmZ ddddgZG d d� de�ZG d
d� de�ZG d d� de�ZG d d� de�ZdS )
z�
pygments.lexers.int_fiction
~~~~~~~~~~~~~~~~~~~~~~~~~~~
Lexers for interactive fiction languages.
:copyright: Copyright 2006-2017 by the Pygments team, see AUTHORS.
:license: BSD, see LICENSE for details.
� N)�
RegexLexer�include�bygroups�using�this�default�words)
�Text�Comment�Operator�Keyword�Name�String�Number� Punctuation�Error�Generic� Inform6Lexer�Inform6TemplateLexer� Inform7Lexer�
Tads3Lexerc O @ st e Zd ZdZdZddgZdgZejej B ej
B Z dZ dZ
dZd Zd
Zd eef ejd fed �gd
efde ejfged�dedfdedfdefe�de�ged�dedfdeef e�dffde
efde
edfged�d e�dgfd edfde�dhfd e efd!e
efd"edfd#e
edfd$ejdfd%efd&ejd'fd(e fed�g
d e�difd*efd+e
edfd%e j fd,ed-fed�gd ed.fd/edfed�gd0e dfed�gd"edfed�gd1e j dfed2�ged�d3eef e j!dfd4eef e"e j!e j#e j!�dfd5eef e"e j!e j#e j!�dfd6e e j�djfd6e e j$�dkfd9e
e
f e%j&dfd:e%j'dfd;e%j(dfd<e%j)dfd=e e"ee�dfd>e e"eej*j+�dfd?e�dlfdAe e"eej,�dfdBej-�dmfe.�dndPdQ�ej-dfdRej-dfe.�dod�dPd��ej-dfe.�dpd�dPd��ej-dfe edfgd�e j#fd�e e jfd�e jfd�e j#fd�e j#fd6e e jdfgd�e j#fd�e e j$fd�e j$fd�e j#fd�eef e j#fd�eeef e j#fd�eef e j#fd6e e j$dfgd�e e j$fd�e j$fd�e j#fd6e e j$dfged�e ej/dfed�ged�e ej*j+dfed�ged�e ejdfed�ged�e ej*dfed�gd�e j0dfged�e ej-dfged�dBefd,edfde�dqfe.�drd�dPd��e d�fd�e �dsfd�e �dtfd�e �dufd�e �dvfd�e"e e�fd�e d�fd�e �dwfd�e d�fd�e �dxfd�e �dyfd�e �dzfd�e �d{fd�e �d|fd�e �d}fd�e �d~fd�e �dfd�e �d�fd�e �d�fe ej1�d�fged�e ej,dfed�ged�d,edfd�efd�e j$d�fe ej*fged�d,efd�edfd/e fe�d��ged�d�e �d�fed�ged�d�edfe ej1dfged�d e�d�fed�gd+e
efd�e j dfedged�d,ed.fd"efd�e j d�fd�e j fd/e fe�d��ged�d�edfe ej1fed�ged��de�d�fd�e�d�fe�d�ged�d,edf�defd+e
edf�de �dfe�d�ged��ded�fed�ged�d,edfd"ef�de d�fedged�d6e e j$�d�fe�d��ged�d6e e j$�d�fgd�e j#fed��ged�e.�d�dPdQ�e df�d,e
edfge�d-�ed�ge�d-�ed�ged��d.e fed�ged�e.�d�dPdQ�e dfed�ged�d�edf�d9efe.�d�dPdQ�e d�f�dHe f�dIe �d�f�dKe �d�f�dNe �d�f�dOe �d�f�dPe �d�f�dSe e �dTf�dUejd'f�dVe �dWf�dXed fded�f�dYe �d�fe�d��ged��dZe df�d[e e j df�d\e ef ej,dfed�ged�d edfed�ged�d,e�d�fe�d��ged�d,edfd/e fe�d��ged�d e�d�fed�ged�d6e e j$�d�fe e �d_fgd/e fe�d��g�da�2Z2�db�dc� Z3�ddS (� r z^
For `Inform 6 <http://inform-fiction.org/>`_ source code.
.. versionadded:: 2.0
zInform 6Zinform6Zi6z*.infz [a-zA-Z_]\w*u \-‐-—u "“”u '‘’u
\n
z\A(!%%[^%s]*[%s])+� directivez\s+z![^%s]*� _whitespacez\[z many-valuesz:|(?=;)�#pop�<�
expression� _expressionz(?=sp\b)z(?=[%s%s$0-9#a-zA-Z_])�valuez\+\+|[%s]{1,2}(?!>)|~~?z(?=[()\[%s,?@{:;])z\(z\)�
statements�localsz>(?=(\s+|(![^%s]*))*[>;])z\+\+|[%s]{2}(?!>)�,z6&&?|\|\|?|[=~><]?=|[%s]{1,2}>?|\.\.?[&#]?|::|[<>+*/%%]z*(has|hasnt|in|notin|ofclass|or|provides)\bzsp\bz\?~?�label?z[@{]�#pushz[\[\]]z[%s]>�;z#pop:3z#pop:2�:z(from|near|to)\bzhas\b�_list-expressionz [%s][^@][%s]z#([%s])(@\{[0-9a-fA-F]{1,4}\})([%s])z([%s])(@.{2})([%s])z[%s]�dictionary-word�stringz)\$[+%s][0-9]*\.?[0-9]*([eE][+%s]?[0-9]+)?z\$[0-9a-fA-F]+z \$\$[01]+z[0-9]+z
(##|#a\$)(%s)z
(#g\$)(%s)z#[nw]\$�obsolete-dictionary-wordz
(#r\$)(%s)�#�system-constant�child�children�elder�eldest�glk�indirect� metaclass�parent�random�sibling�younger�youngestz\b)�suffixz#(?i)(Class|Object|Routine|String)\b� Box__Routine�CA__Pr�CDefArt� CInDefArt�Cl__Ms�Copy__Primitive�CP__Tab�DA__Pr�DB__Pr�DefArt�
Dynam__String�
EnglishNumber� Glk__Wrap�IA__Pr�IB__Pr�InDefArt�Main__� Meta__class�OB__Move�
OB__Remove�OC__Cl�OP__Pr� Print__Addr� Print__PName�PrintShortName�RA__Pr�RA__Sc�RL__Pr� R_Process�RT__ChG�RT__ChGt� RT__ChLDB� RT__ChLDW�RT__ChPR� RT__ChPrintA� RT__ChPrintC� RT__ChPrintO� RT__ChPrintS�RT__ChPS�RT__ChR� RT__ChSTB� RT__ChSTW�RT__ChT�RT__Err�RT__TrPS�RV__Pr� Symb__Tab�Unsigned__Compare�WV__Pr� Z__Regionz(?i))�prefixr7 �call�copy�create�DEBUG�destroy�DICT_CHAR_SIZE�DICT_ENTRY_BYTES�DICT_IS_UNICODE�DICT_WORD_SIZE�false�FLOAT_INFINITY� FLOAT_NAN�FLOAT_NINFINITY�GOBJFIELD_CHAIN�GOBJFIELD_CHILD�GOBJFIELD_NAME�GOBJFIELD_PARENT�GOBJFIELD_PROPTAB�GOBJFIELD_SIBLING�GOBJ_EXT_START�GOBJ_TOTAL_LENGTH�Grammar__Version�INDIV_PROP_START�INFIX�infix__watching� MODULE_MODE�name�nothing�NUM_ATTR_BYTES�print�print_to_array�recreate� remaining�self�sender� STRICT_MODE�sw__var�
sys__glob0�
sys__glob1�
sys__glob2�sys_statusline_flag� TARGET_GLULX� TARGET_ZCODE�
temp__global2�
temp__global3�
temp__global4� temp_global�true� USE_MODULES�WORDSIZEz[~^]+z
[^~^\\@({%s]+z[({]z@\{[0-9a-fA-F]{,4}\}z@.{2}z\\z(@(\\\s*[%s]\s*)*@((\\\s*[%s]\s*)*[0-9])*zC@(\\\s*[%s]\s*)*\{((\\\s*[%s]\s*)*[0-9a-fA-F]){,4}(\\\s*[%s]\s*)*\}z!@(\\\s*[%s]\s*)*.(\\\s*[%s]\s*)*.z[^~^\\({\[\]%s]+z
[~^({\[\]]z\S\w*r �
routine-name?�
abbreviate�endif�
dictionary�ifdef�iffalse�ifndef�ifnot�iftrue�ifv3�ifv5�release�serial�switches� system_file�versionz(?i)(array|global)\b�directive-keyword?�_globalz(?i)attribute\b�alias?� _constantz (?i)class\b� object-body�
duplicates�
class-namez(?i)(constant|default)\bz(?i)(end\b)(.*)z(?i)(extend|verb)\b�grammarz(?i)fake_action\bz (?i)import\b�manifestz(?i)(include|link)\b�before-plain-stringz(?i)(lowstring|undef)\bz
(?i)message\b�
diagnosticz(?i)(nearby|object)\b� _object-headz(?i)property\b�property-keyword*z
(?i)replace\bz(?i)statusline\bz
(?i)stub\bz (?i)trace\b�trace-keyword?z(?i)zcharacter\bz\*�"� plain-stringz\]zalias\bz#(?=[,;]|(class|has|private|with)\b)z(class|has|private|with)\bzclass\bz
class-segmentz(has|private|with)\b�_object-expression�=� grammar-linez_directive-keywordz[/*]z(noun|scope)\bz=routinez (?i)global\b�message-string�additive�alias�buffer�class�creature�data�error�
fatalerror�first�has�held�initial�initstr�last�long�meta�multi� multiexcept� multiheld� multiinside�noun�number�only�private�replace�reverse�scope�score�special�table� terminating�time�topic�warning�withz[%s]{1,2}>|[+=]z_directive-keyword!z(additive|long)\b�assembly� expressions�lines�linker�objects�off�on�symbols�tokens�verbsz[;{}]�box�break�continue�give� inversion�new_line�quit�read�remove�return�rfalse�rtrue�spaces�untilz (do|else)\bz(font|style)\b�miscellaneous-keyword?zfor\b�for�(?z(if|switch|while)z(jump|save|restore)\bz objectloop\b�_keyword-expression� variable?zprint(_ret)?\b|(?=[%s])z
print-listz\.�@�opcodez#(?![agrnw]\$|#)zmove\bz:(bold|fixed|from|near|off|on|reverse|roman|to|underline)\bzX(a|A|an|address|char|name|number|object|property|string|the|The)\b(?=(\s+|(![^%s]*))*\))z%s(?=(\s+|(![^%s]*))*\))�_for-expression�form�operands�_assembly-expression)2�rootr r r r z_assembly-expressionz_for-expressionz_keyword-expressionz_list-expressionz_object-expressionr zdictionary-wordr' z plain-stringr� r� zlabel?z variable?zobsolete-dictionary-wordzsystem-constantr z
routine-name?r z many-valueszalias?z
class-namer� z _object-headz object-bodyz
class-segmentr� z grammar-linez=routiner� r� zbefore-plain-stringzmessage-stringz_directive-keyword!z_directive-keywordzdirective-keyword?zproperty-keyword*ztrace-keyword?r zmiscellaneous-keyword?z(?r� z
print-listr r r c c s� g }d}d }x�t j| |�D ]�\}}}|tjkrH|dkrH|||gg}d}n||dkrz|tkrh|tkrh|d8 }|j|||f� nJ|dkr�|d d dkr�t|d d< x|r�|jd�V q�W d}|||fV |tkr|tkr|}qW x|r�|jd�V q�W d S ) N� �in� r �)���r r ) r �get_tokens_unprocessedr
�Variabler
r �appendr �pop)r� �textZobjectloop_queueZobjectloop_token_countZprevious_token�index�tokenr � r �!/usr/lib/python3.6/int_fiction.pyr
� s. z#Inform6Lexer.get_tokens_unprocessedN)r r )r r )r r )r r r )r" r )r r& )r r' )r r( )r r* ) r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 )2r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri )2rk rl rm rn ro rp rq rr rs rt ru rv rw rx ry rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� )r r r r� )r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� )r r� r� )r r� r� )r� r� r� )r r r� )r r� )r r� )r r� )r r� )r� r� )r r� r� r� )r r� r� )r r� )r r� )r r� r� )r r� r� )r� r� )r r )r r� )r r r )r� r )r r )r r� )r r� )r r� r� )r r� )$r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r' r� r� r� r� r� r� ) r� r� r� r� r� r� r� r� r� r� r� )r� r� r� r r� r� r� r� r� r� r� r� r� r� r' r� )r r� )r� r� )r r r� )r r! )r� r r� )r r� r )r r� r )r r )r r )r% r r% r )r r� )r r� )r r )4�__name__�
__module__� __qualname__�__doc__r� �aliases� filenames�re� MULTILINE�DOTALL�UNICODE�flags�_name�_dash�_dquoteZ_squote�_newliner
�Preprocr r �Singler r r �Wordr
�Labelr r �PseudoZ Declarationr ZCharr �Escape�Doubler �Float�HexZBin�Integerr ZGlobal�Function�Builtinr �Constant�Other�Classr� r
r r r r r s|
c @ s e Zd ZdZdZddgZddgZejej B ej
B Z e j
Z
e jZe jZde Zi Zdd d
gZ�x�eD �]�Zee jd �d e j ejdWfgdefdejdfde ejdXfedY�gde ejfde ejdfgdejdfdeef ejfde ejdfdeeef edZfde edfd e ejfgd eef efde e j d fd ed fd!ed"fdejdfd#e
e
f e e e e!d[dd%�e �fd&eeef edfd'e efgd(efdejdfd#e
e
f e e e e!d\d d%�e �dfed�gd(efdejdfd#e
e
f e e e e!d]d
d%�e �dfed�gd+ejfdejd,fd-ejdfgd.e e j fd/e j"fde e j dfgdefdejdfd0e
ed1fd2e
efd3e ejdfed�gd(efdejdfd4ed5fed�gd(efdejdfd6e
ed7fed8�gd9eef ejfd:eef ej#fd;eef e e!dd<�fd=eef efdejdfgd>eef ejfd?ee
ef ejfd@eef ejdfge$d�dAe e ee �fgdBe e e e!dd<�e �fgdCe
e e ej%e �fdDe
e e e&e ee �dEfdFe
e e e&e ee �fdGe e e e!dd<�e �fgdHejfd>eef ejdfdIee
f ejfd@eef ejfdJejfgd>eef ejfdKee
ef ejfd@eef ejdfdLeef e&fdMe ej%fdNe
e e e&e �dfdOe efgdP�ee< x`e jD ]VZ'e'd k�r��q�ee je' �ee e'< e'j(dQ��s�e$dR�e$e�gee e' dSdT�< �q�W qbW dUdV� Z)dSS )^r zW
For `Inform 7 <http://inform7.com/>`_ source code.
.. versionadded:: 2.0
zInform 7Zinform7Zi7z*.niz*.i7xz \A|(?<=[%s])z+i6t-not-inlinez +i6t-inlinez+i6t-use-optionr z[^%s]*r �+pz(\|?\s)+z\[z+commentz[%s]�+main�+titling�+titling-string� +heading?z[^%s]+�#popz [^%s.;:|%s]+z[%s]{2}|(?<=[\s%s])\|[\s%s]z[.;:]|(?<=[\s%s])\|z[|%s]z(?i)[^%s:a\[(|%s]+z+textr$ z+phrase-definitionz
(?i)\bas\bz +use-optionz(\([%s])(.*?)([%s]\))�+i6-root)�state�i6tz (%s|(?<=[\s;:.%s]))\|\s|[%s]{2,}z (?i)[a(|%s]z\s+r r z[^\[\]]+z#pushz\]z[^\[%s]+z\[.*?\]z
[%s]{4}\s+z+documentation-headingz [%s]{1,3}z.(?i)(volume|book|part|chapter|section)\b[^%s]*z(?i)documentation\s+z+documentation-heading2z [%s]{4}\sz+documentationz#pop:2z&(?i)(%s)\s*(chapter|example)\s*:[^%s]*z (?i)(%s)\s*section\s*:[^%s]*z((%s)\t.*?[%s])+)r; z[^%s\[]+|[%s\[]z(%s)@c( .*?)?([%s]|\Z)z(%s)@([%s]+|Purpose:)[^%s]*z(%s)@p( .*?)?([%s]|\Z)z (\{)(N)(\})z(\{)(\S[^}]*)?(\})z(\{[%s])(![^}]*)(\}?)z (\{[%s])(lines)(:)([^}]*)(\}?)z+linesz (\{[%s])([^:}]*)(:?)([^}]*)(\}?)z(\(\+)(.*?)(\+\)|\Z)z[^@]+z(%s)@([%s]|Purpose:)r z(%s)@([%s]|Purpose:)[^%s]*z
(%s)@\w*[ %s]z![^%s]*z(\{)([%s]endlines)(\})z[^@!{]+?([%s]|\Z)|.)z+i6-rootz +i6t-rootr z+titling-stringz+titlingz+mainz+phrase-definitionz +use-optionz+commentz+textz +heading?z+documentation-headingz+documentation-heading2z+documentationz+i6t-not-inlinez+i6t-use-optionz +i6t-inlinez+i6tz+pz+lines�_z+i6tNr c K sD |j dd�}|| jkr&| jj|�| _n | j| | _tj| f|� d S )Nr< z+i6t-not-inline)�getZ _all_tokens� __class__Zprocess_tokendefZ_tokensr �__init__)r� Zoptions�levelr r r r@ � s
zInform7Lexer.__init__)r r4 )r5 r6 r7 )r5 r8 )r9 r8 )r: r )r: r r r )r: r )*r r r r r� r r r r r r r r r" r# r$ Z_startr� Ztoken_variantsrA �listr
r% r � Multiliner ZHeadingr r r+ r r r r �InterpolZ
Subheadingr r& r r �
startswithr@ r r r r r s
*c @ s* e Zd ZdZdZdgZdgZd
dd�ZdS ) r z�
For `Inform 6 template
<http://inform7.com/sources/src/i6template/Woven/index.html>`_ code.
.. versionadded:: 2.0
zInform 6 templater< z*.i6t� +i6t-rootc C s t j| ||�S )N)r r
)r� r �stackr r r r
� s z+Inform6TemplateLexer.get_tokens_unprocessedN�rF )rH )r r r r r� r r r
r r r r r � s
c T @ s e Zd ZdZdZdgZdgZejej B Z
dZ dZ dZ
dZd Zd
Zd e e f Zd e e f Zd
e
fdd�Ze
fdd�Ze
fdd�Zdefdedfdefdedfdeef eejee dd �e�d�fe d�d efd!e fd"ed#fg e d$�e dɃgd)ed%fded�fe d�gd)efded*fd+ed%fd,ed�fd-eef eejee dd �e�d�fd/eef eejee dd �e�dfd0eef eej ee dd �e�d�fe d�d1e ed2fe d3�g
e d$�d4eef eej ee dd �e�d�fe d6�gded�fe d�d7ed�fe dуgded�fe d�e d%�gd:efded*fd+ed%fd;e!j"fd0eef eej#ee dd �e�fe d�ge d<�d"ed�fgd=e$j%d%fe d<�d"ed�fge d�d?ed�fd@ed�fded�fdDed%fdEe&j'd%fdFe&j(d%fdGe&j)d%fdHe&j*d%fdIe$j+d�fdKe$j,d�fdMe$j+d�fdOe$j,d�fdQe$j-d�fdSe$j-d�fdUe$j-d�fdWe$j-d�fdYe ee!j"ee dd �e!j"�fdZe ee!j"ee dd �e�d�fd[e ee!j"ee dd �e!j"�d�fd\e ee!j"ee dd ��fd]e ee!j"ee dd �e!j"�d�fd_e ee!ee dd �e!j"�d�fdaej.d%fdbe!j"d�fdde!j"fdee!j"d�fdge!j"d�fdhe!j"d%fdie!j"d�fdke!j"d�fdme!j"d�fdne!j"d�fdoe!j"d�fdpe!j"d�fdqe!j"d�fdse!j"d�fdve!j"d%fdwe!j"d�fdxe!j/d%fdye!j"d�fdze!j"d�fd|e!j"d�fd~ej.j0d%fde!j"d�fd�e ee1j2ee dd �e1�d�fd�e1j2fd�ej.d%fg0e d$�eed%fe d%�gd?ed�fd@ed�fd�efd�ed2fd�ed%fe d�ee1d2fd�e1d�fd�e ee1j2ee dd �e1j2�fd�e fg
e d��e d%�gd�e1d%fe d5�gd=e$j%d6fe d5�gd?ed�fdse!j"d�fe d2�gd+ed%fd�edCfd�e!dCfe d5�geej d%fe d�gd�edufe d5�gd�ed2fe d5�gd�eef eej ee dd ��d%fd�eeef eej3ee dd �ej �d%fd�efe d$�eej d%fe d%�gd�e eeee dd ��fd�efd�ed�fd�ed fd�ed�fe d5�gd�ed%fe d5�gd�e!d%fe d�e d%�gd�ed�fd�e1d%fe d5�gd�e!d%fe d�gd�efeej4d�fe d�ge d�d�e!d�fe d��gd�efd?ed�fd,ed9feej3fe d�ge d�d�e$j5d%fge d��e d�d�e eeee dd �e!�d2fd�e efeej/fe d6�gd,ed%fgd�e$j%fd�eef ed%feejd%fe d�gd�ed�fe d�eej3d%fe d%�gd�e1j2d%fe d�ee1fe d%�gd?e�d fde�dfe d�gd�ed%fe d��dqe!j"fe d�d�e efeej fgdDed%fdye!j"d%fd�e!j"feej3d%fe d�e d%�gd�ed(fe d�d�ed%fe d%�gd�efd)ed%fd�e!j"feej/fe d�geej#d%fe d�e d%�gd�efd�ed%fe d�eej fgd�ee f e6j7fe e6j,fe e6j8fd�e efgdIe$j+dJfdKe$j,dLfdMe$j+dNfdOe$j,dPfgd�e
e$j9fgd�e$j%fd�e
e
f e$j%�dfgd�ej:fged�d��ed�d��ed�d��ed�d��ed�d�d��ed�d�d��ed�d�d��ed�d�d��ed�d�d��ed�d�d��ed�d�d��ed�d�d��ed�d��ed�d��ed�d��ed�d��edMd�d��edMd�d��edMd�d��edMd�d��edOd�d��edOd�d��edOd�d��edOd�d��eed�d��eed�d��eed�d��eed�d��d�e$j-fd�e$j-fd�e$j-d%fdMe$j-fgd�e$j-fd�e$j-fd�e$j-d%fdOe$j-fgd�e$j-fd�e$j-fdMe$j-d%fgd�e$j-fd�e$j-fdOe$j-d%fgdŜPZ;d�dDŽ Z<d
S ( r z;
For `TADS 3 <http://www.tads.org/>`_ source code.
zTADS 3Ztads3z*.tz (?://(?:[^\\\n]|\\+[\w\W])*$)z(?:/\*(?:[^*]|\*(?!/))*\*/)zM(?:\\(?:[\n\\<>"\'^v bnrt]|u[\da-fA-F]{,4}|x[\da-fA-F]{,2}|[0-3]?[0-7]{1,2}))z(?:[_a-zA-Z]\w*)z (?=\s|\\?>)zD(?:&&|\|\||\+\+|--|\?\?|::|[.,@\[\]~]|(?:[=+\-*/%!&|^]|<<?|>>?>?)=?)z(?:\\|\s|%s|%s)z(?:\\\n|[^\S\n]|%s|%s)Nc
C sz |rdj dd� |D ��}|r dnd}|r.tjntj}| rDd||f nd}d| rRdnd|r\d nd
f }d | }g } | r�| d | |d
fd| tjf||fg7 } n| j||d
f� | td�d| |fg7 } |r�| jd||f tjd
d| |ff� n`| d||||f t j
fdtjd
d| |ffdtjd
d| |ffd||||f tj|ftd�g7 } | td�d||||f tj fd |fg7 } | S ) N� c S s, g | ]$}d t j|j� �t j|j� �f �qS )z (?:%s|%s))r �escape�lower�upper)�.0�cr r r �
<listcomp>� s z1Tads3Lexer._make_string_state.<locals>.<listcomp>r� �'z
+|%s(?!%s{2})z%s%s�t�d�sz%sqtz%s{3,}z#popz\\%s+z
s/verbatimz [^\\<&{}%s]+z!\\?<(/|\\\\|(?!%s)\\)%s(?=[\s=>])z%sqsz(\\?<!([^><\\%s]|<(?!<)|\\%s%s|%s|\\.)*>?z (?i)\\?<listing(?=[\s=>]|\\>)z %sqs/listingz(?i)\\?<xmp(?=[\s=>]|\\>)z%sqs/xmpz(\\?<([^\s=><\\%s]|<(?!<)|\\%s%s|%s|\\.)*zs/entityzs/escapez%\{([^}<\\%s]|<(?!<)|\\%s%s|%s|\\.)*\}z[\\&{}<]) �joinr r+ r& r* r r r
�Tagr
rC rD )
�triple�doubleZverbatim�_escape�charr �escaped_quotesrj Ztag_state_namer; r r r �_make_string_state� sN
z Tads3Lexer._make_string_statec
C s� |rdnd}| rdnd}d| r"dnd|r,dndf }|r>t jnt j}| rTd ||f nd}d
||f |d fd tfd
ttt j�d| fdttt j�d| fdtd| fdtjdfd||||f t jfd||||f tj ft
d�t
d�t
d�dtj fg S )Nr� rP z{3,}rI z%s%sqtrQ rR rS z
+|%s(?!%s{2})z%s%sz#pop:2z
(\s|\\\n)+z (=)(\\?")zdqs/%sz (=)(\\?')zsqs/%sr� zuqs/%sz\\?>z#popz%\{([^}<\\%s]|<(?!<)|\\%s%s|%s|\\.)*\}z$([^\s=><\\%s]|<(?!<)|\\%s%s|%s|\\.)+zs/escapez
s/verbatimzs/entityz[\\{}&]) r r+ r& r r r r
rU rD Z Attributer )rV rW rX rY Z
quantifierZ
state_namer rZ r r r �_make_tag_state) s*
zTads3Lexer._make_tag_statec C s� | dkrt jn| dkr t jnt j}|r*dnd}|r6dnd}|rDt jnt j}|rZd||f nd}d||f |dfd|t jkr~dnd| f |d ftd
�td �d ||||f t jfd
|t jkr�dnd |ftd�d|fgS )Nr� rP z{3,}rI z
+|%s(?!%s{2})z%s%sz#pop:3z\\?z#popz
s/verbatimzs/entityz%\{([^}<\\%s]|<(?!<)|\\%s%s|%s|\\.)*\}z([^\s"\'<%s{}\\&])+�>zs/escapez
["\'\s&{<}\\])r r+ r& r2 r rD ) �
terminatorZ host_tripleZ host_doublerX r Z host_charZhost_quantifierZ
host_tokenrZ r r r �_make_attribute_value_stateB s" z&Tads3Lexer._make_attribute_value_stateu z\{� object-bodyz;+z�(?=(argcount|break|case|catch|continue|default|definingobj|delegated|do|else|for|foreach|finally|goto|if|inherited|invokee|local|nil|new|operator|replaced|return|self|switch|targetobj|targetprop|throw|true|try|while)\b)�blockz
(%s)(%s*)(\()�
whitespace)r; � block?/root�more/parameters�main/parametersz\++z[^\s!"%-(*->@-_a-z{-~]+z(?!\Z)z main/rootz
main/basic�#pop�object-body/no-braces�classesr� r# z#pushz\}r$ z(%s?)(%s*)(\()�block?z
(%s)(%s*)(\{)z (%s)(%s*)(:)z->|%s�mainzmain/object-bodyz
(%s)(%s*)(=?)�morez#pop:2z
(?=[[\'"<(:])r� �
grammar-rulesz[;:]+z default\bz block/basicz>>�
more/embedz\(z\[� more/list�
more/inner�
main/innerz\*|\.{3}z(?i)0x[\da-f]+z5(\d+\.(?!\.)\d*|\.\d+)([eE][-+]?\d+)?|\d+[eE][-+]?\d+z0[0-7]+z\d+z"""�tdqsz'''�tsqsr� �dqsrP �sqszR"""�tdqrzR'''�tsqrzR"�dqrzR'�sqrz(extern)(%s+)(object\b)z(function|method)(%s*)(\()z(modify)(%s+)(grammar\b)z#(new)(%s+(?=(?:function|method)\b))z(object)(%s+)(template\b)�templatez(string)(%s+)(template\b)�
function-namez>(argcount|definingobj|invokee|replaced|targetobj|targetprop)\bz(break|continue|goto)\b�labelz0(case|extern|if|intrinsic|return|static|while)\bzcatch\b�catchzclass\bz (default|do|else|finally|try)\bz(dictionary|property)\b� constantszenum\b�enumzexport\bz(for|foreach)\bz(function|method)\bz grammar\bz inherited\b� inheritedzlocal\b�
more/local�
main/localz)(modify|replace|switch|throw|transient)\bznew\bz (nil|true)\bzobject\bz
operator\b�operatorz
propertyset\b� propertysetzself\bz
template\bz(__objref|defined)(%s*)(\()�
more/__objrefz delegated\ba* (__DATE__|__DEBUG|__LINE__|__FILE__|__TADS_MACRO_FORMAT_VERSION|__TADS_SYS_\w*|__TADS_SYSTEM_NAME|__TADS_VERSION_MAJOR|__TADS_VERSION_MINOR|__TADS3|__TIME__|construct|finalize|grammarInfo|grammarTag|lexicalParent|miscVocab|sourceTextGroup|sourceTextGroupName|sourceTextGroupOrder|sourceTextOrder)\bz\.{3}z->|\.\.z (?=;)|[:)\]]z\?�more/conditionalz(is|not)(%s+)(in\b)z[^\s!"%-_a-z{-~]+z
more/basicz:(?!:)r z (in|step)\bz[,:]z(%s)(%s*)(?=:)z
(%s)(%s+)(%s)z\[+z(:)(%s*(?=[?=,:)]))z[?\]]+z[:)]� multimethod?r� �more/parameterz(?=[,)])z
multimethod\b�modez\)z(error|warn)\bz\(+� variablesztoken\bz\)+z grammar-taga! """([^\\"<]|""?(?!")|\\"+|\\.|<(?!<))+("{3,}|<<)|R"""([^\\"]|""?(?!")|\\"+|\\.)+"{3,}|'''([^\\'<]|''?(?!')|\\'+|\\.|<(?!<))+('{3,}|<<)|R'''([^\\']|''?(?!')|\\'+|\\.)+'{3,}|"([^\\"<]|\\.|<(?!<))+("|<<)|R"([^\\"]|\\.)+"|'([^\\'<]|\\.|<(?!<))+('|<<)|R'([^\\']|\\.)+'|([^)\s\\/]|/(?![/*]))+|\)r' z(\[)(%s*)(badness)z
->|%s|[()]z(<<([^>]|>>>|>(?!>))*>>)+z(?=%s?%s*[({])r znegate\bz(?=;)z->|\?|%sz transient\bz[:,]r] z,+z
property\bz ^%s*#(%s|[^\n]|(?<=\\)\n)*\n?z \\+\n+%s*#?|\n+|([^\S\n]|\\)+z \{\{|\}\}|%sz�<<\s*(as\s+decreasingly\s+likely\s+outcomes|cycling|else|end|first\s+time|one\s+of|only|or|otherwise|(sticky|(then\s+)?(purely\s+)?at)\s+random|stopping|(then\s+)?(half\s+)?shuffled|\|\|)\s*>>z_<<(%%(_(%s|\\?.)|[\-+ ,#]|\[\d*\]?)*\d*\.?\d*(%s|\\?.)|\s*((else|otherwise)\s+)?(if|unless)\b)?� block/embedz'(?i)&(#(x[\da-f]+|\d+)|[a-z][\da-z]*);?TFZlistingZxmpz[^\\"]+z\\"*z"{3,}z[^\\']+z\\'*z'{3,}z\\"?z\\'?)Pr z main/rootzobject-body/no-bracesz object-bodyzmain/object-bodyz block?/rootzblock?z block/basicra z block/embedz
main/basicrj z
more/basicrk zmore/conditionalz
more/embedz
main/innerz
more/innerz
main/localz
more/localz more/listzmain/parameterszmore/parameterszmore/parameterz multimethod?z
more/__objrefr� r| r~ r� z grammar-tagz
grammar-rulesr$ z
function-namer r� r� ry r� rh r} r{ r� rb r' zs/escapez
s/verbatimzs/entityrq rr rs rt z tdqs/listingz tsqs/listingz dqs/listingz sqs/listingztdqs/xmpztsqs/xmpzdqs/xmpzsqs/xmpZtdqtZtsqtZdqtZsqtzdqs/tdqtzdqs/tsqtzdqs/dqtzdqs/sqtzsqs/tdqtzsqs/tsqtzsqs/dqtzsqs/sqtzuqs/tdqtzuqs/tsqtzuqs/dqtzuqs/sqtru rv rw rx c k s� d| j | j f }d}x�tj| |f|�D ]�\}}}|dkrb|tjkr�tjd|| j | j f |�r�d}n`|tjkr�|dkr�tjd| |�r�d}q�tjd| |�r�|d7 }q�tjd| |�r�|d8 }nt}|||fV q&W d S )Nz^%s*#%s*r z%sif%s+(0|nil)%s*$\n?r z
%sel(if|se)\bz%sifz %sendif\b)�_ws_ppr r
r
r% r �match)r� r �kwargsZppZif_false_levelr r r r r r r
* s&
z!Tads3Lexer.get_tokens_unprocessed)rc rd re )rf rg rh r� )rf r` )rh r� )ri rd re )rg rh r� )rf rk rj )rf ra )rf rg r� rl )rf rg )rf ra )rk rj )rm rj )rf rk rj )rf rn rj )rf ro rp rd re )rf rq )rf rr )rf rs )rf rt )rf ru )rf rv )rf rw )rf rx )rf ri rd re )rf rg r$ r� )rf ry )rf rz )rf r{ )rf r| )rf rg r� )rf r} )rf r~ )rf rj )rf ro rp )rf ri rz )rf rg r� )rf r )rf r� r� )rf r� )rf rg )rf r� )rf r� rj )rf ry )rf r� rj )rn rj )rk rj )rj r� rj )rf ro rp )rf r� )rf r� )r� rj )rf r� )rf r} )rf r} )rf rh r� )rd re )rf r` )r� rm rj )=r r r r r� r r r r r r Z_comment_singleZ_comment_multilinerX r! Z _no_quote� _operatorZ_wsr� r[ r\ r_ r r r r
r/ r r r r r r r ZReservedr( r rD r r- r, ZOctr. r+ r& ZRegexr0 r1 r) r r' r3 � Exceptionr2 r
r% rC r* ZEntityr� r
r r r r r � s� 2
)r r Zpygments.lexerr r r r r r r Zpygments.tokenr r
r r r
r r r r r �__all__r r r r r r r r �<module>
s $0 r L