Файловый менеджер - Редактировать - /opt/imh-python/lib/python3.9/site-packages/pygments/lexers/__pycache__/lisp.cpython-39.pyc
Ðазад
a a�h�g � @ s4 d Z ddlZddlmZmZmZmZmZ ddlm Z m Z m Z m Z m Z mZmZmZmZmZmZ ddlmZ ddlmZmZ g d�ZG dd � d e�ZG d d � d e�ZG d d � d e�Z G dd� de�Z G dd� de�Z G dd� de�Z G dd� de�Z G dd� de�Z!G dd� de�Z"G dd� de�Z#G d d � d e�Z$dS ) z� pygments.lexers.lisp ~~~~~~~~~~~~~~~~~~~~ Lexers for Lispy languages. :copyright: Copyright 2006-2025 by the Pygments team, see AUTHORS. :license: BSD, see LICENSE for details. � N)� RegexLexer�include�bygroups�words�default) �Text�Comment�Operator�Keyword�Name�String�Number� Punctuation�Literal�Error� Whitespace)� PythonLexer)�scheme_keywords�scheme_builtins) � SchemeLexer�CommonLispLexer�HyLexer� RacketLexer� NewLispLexer�EmacsLispLexer� ShenLexer� CPSALexer� XtlangLexer� FennelLexer� JanetLexerc s� e Zd ZdZdZdZddgZddgZdd gZd Z e j e j B Z d Zd Z� fd d�Zi ZdD ]�ZedkrndZdZn4edkr�dZdZn"edkr�dZdZnedkr�dZdZd e� d e� d �Zd e� d e� d �Zedkr�d!Zd"e� d#e� d$�Zd%Zd&e� d'e� d(�Zd e� d)e� d*e� d+e� d,e� d-� Zd.e� d/e� d0e� d1�Zeee< qXd2d3� Z e d4�ge d5�gd6e j fd7e j d8fd9e d:fd;e d<fd=e fd>e!fed e"j#d?fed e"j$d?fed e d?fed e"j%d?fd@e&dAfdBe e&j'd?fdCe e(j)d?fdDe&j*d?fdEe+j,d?fdFe-fdGe e+j.d?fdHe e+j.d?fdIe e+j/d?fee+j.d?fdJe0d4fdKe0dLfgd7e j dMfdNe j d?fdOe j fdPe j fgdJe dMfdKe d?fdQe fgdRe� �e d?fgd@e&dSfdTe&j1fdUe&j1fdVe&j1fdWe&j1fdXe&j1fdYe&fgdZ�Z2� Z3S )[r z� A Scheme lexer. This parser is checked with pastes from the LISP pastebin at http://paste.lisp.org/ to cover as much syntax as possible. It supports the full Scheme syntax as defined in R5RS. �Schemez http://www.scheme-reports.org/�scheme�scmz*.scmz*.ssz text/x-schemezapplication/x-schemez0.6�[\w!$%&*+,/:<=>?@^~|-]+z� (?= \s # whitespace | ; # comment | \#[;|!] # fancy comments | [)\]] # end delimiters | $ # end of file ) c # sx t � �|�D ]f\}}}|tju s*|tju rf|tv r@|t|fV qr|tv rX|tj|fV qr|||fV q |||fV q d S �N) �super�get_tokens_unprocessedr �Function�Variabler r r �Builtin)�self�text�index�token�value�� __class__� ��/root/rpmbuild/BUILDROOT/imh-python39-modules-3.9.7-92.el8.x86_64/opt/imh-python/lib/python3.9/site-packages/pygments/lexers/lisp.pyr& = s z"SchemeLexer.get_tokens_unprocessed)� � � � r3 z[01]z ( \#[bB] )r4 z[0-7]z ( \#[oO] )r5 z[0-9]z ( (\#[dD])? )r6 z [0-9a-fA-F]z ( \#[xX] )z ( z$ (\#[iIeE])? | \#[iIeE] z ) z+ ( / z+ )? ) a� ( # Decimal part ( [0-9]+ ([.][0-9]*)? | [.][0-9]+ ) # Optional exponent ( [eEsSfFdDlL] [+-]? [0-9]+ )? # Optional mantissa width ( \|[0-9]+ )? ) z! ( z (?!/) | z ) z (nan.0|inf.0)z ( [+-] z' # Sign mandatory | [+-]? z( # Sign optional ) z ? [+-] (�|z)? i | z (@ z)? ) z (?x) ( z z� ) # Need to ensure we have a full token. 1+ is not a # number followed by something else, but a function # name. z c c s2 d|� � v rtj}ntj}|�� ||� � fV d S )N�.)�groupr �Float�Integer�start)r* �match� token_typer1 r1 r2 � decimal_cb� s zSchemeLexer.decimal_cb� scheme-rootr. z;.*?$�#\|�multiline-commentz#;[([]�commented-formz#;�commented-datumz#!r6rs�\s+�#pop�"�string�'�#:�' #\\([()/'\"._!§$%& ?=+-]|[a-zA-Z0-9]+)�(#t|#f)�('|#|`|,@|,|\.)�(?<='\()�(?<=#\()�(?<=\()z[([]z[)\]]z#pop:3�#push�\|#�[^|#]+�[|#]z [^()[\]]+z(?x).*?z#pop:2z\\x[0-9a-fA-F]+;�\\x[0-9a-fA-F]{2}z\\u[0-9a-fA-F]{4}z\\U[0-9a-fA-F]{6}�\\.�[^\\"]+)�rootr@ r. rB rC rD rH )4�__name__� __module__� __qualname__�__doc__�name�url�aliases� filenames� mimetypes� version_added�re�DOTALL� MULTILINE�flags� valid_nameZ token_endr& Z number_rules�base�digit�radix�prefixZureal�decimalZnaninf�realZcomplex_�numr? r r �Single� Multiliner r �Bin�Oct�Hexr �Symbolr � Declaration�Charr �Constantr r( r' r �Escape�tokens� __classcell__r1 r1 r/ r2 r s� ���������������� �� �; �����r c , @ sF e Zd ZdZdZdZg d�ZddgZdgZdZ e j e j B Z d Zed Zd Zd e� d e� d�Zdd� Zdd� Zed�gdejdfdejdfdejfdejfgdejdfdejdfd ejfgd efd ejfdejd fd ejfd!efd"e ej fd#e ej fd$e ej fd%e ej fd%e fd&e fd'e e j fd(e e fd)e e j fd*e ej!fd+e ej!fd,e dfd-e"j#fd.e ej fd/e fd0e$j%fd1e j&fd2e j'fd3e j(fd4e fd5e)e e*�dfd6e)e"j#e*�dfd7e)e"j#e*�dfd8e"j#fd9e fd:e fd;e d< ejd=fd>e fd?e fd@e e$j+fdAe dA e$j,j-fee$j,fde*dfde*dfg'dB�Z.dCdD� Z/dES )Fr z A Common Lisp lexer. z Common Lispzhttps://lisp-lang.org/)z common-lisp�cl�lispz*.clz*.lispztext/x-common-lispz0.9z \\.|[\w!$%&*+-/<=>?@\[\]^{}~]�|[#.:]z(?=[ "()\'\n,;`])z(\|[^|]+\||(?:�)(?:�)*)c K sd ddl m}m}m}m}m}m}m} || _|| _ || _ || _ || _ || _ || _tj| fi |�� d S )Nr )�BUILTIN_FUNCTIONS� SPECIAL_FORMS�MACROS�LAMBDA_LIST_KEYWORDS� DECLARATIONS� BUILTIN_TYPES�BUILTIN_CLASSES)Z pygments.lexers._cl_builtinsr� r� r� r� r� r� r� �builtin_function� special_forms�macros�lambda_list_keywords� declarations� builtin_types�builtin_classesr �__init__) r* �optionsr� r� r� r� r� r� r� r1 r1 r2 r� ? s $zCommonLispLexer.__init__c c s� dg}t �| ||�D ]�\}}}|tju r�|| jv rB|tj|fV q|| jv rZ|t|fV q|| jv rt|tj|fV q|| j v r�|t|fV q|| j v r�|t|fV q|| j v r�|tj |fV q|| j v r�|tj|fV q|||fV qd S �NrX )r r& r r( r� r) r� r r� r� r� r� �Typer� �Class�r* r+ �stackr, r- r. r1 r1 r2 r& L s2 z&CommonLispLexer.get_tokens_unprocessed�bodyrA rQ rR rF rS rT �\(�\)z[^()]+rE �;.*$rB z#\d*Y.*$z"(\\.|\\\n|[^"\\])*"�:�::z:#rI �`� [-+]?\d+\.?� [-+]?\d+/\d+�<[-+]?(\d*\.\d+([defls][-+]?\d+)?|\d+(\.\d*)?[defls][-+]?\d+)z#\\.z#\\�#\(z #\d*\*[01]*rJ z#[.,]�#\'z#b[+-]?[01]+(/[01]+)?z#o[+-]?[0-7]+(/[0-7]+)?z #x[+-]?[0-9a-f]+(/[0-9a-f]+)?z #\d+r[+-]?[0-9a-z]+(/[0-9a-z]+)?z(#c)(\()z (#\d+a)(\()z(#s)(\()z#p?"(\\.|[^"])*"�#\d+=�#\d+#z#+nilz\s*\(rC z#[+-]z (,@|,|\.)�(t|nil)�\*)rX rB rC r� c C s t �d| �rdS dS dS )z#Competes with Visual Prolog on *.clz ^\s*\(defun\sg�������?r N)rc �search�r+ r1 r1 r2 � analyse_text� s z CommonLispLexer.analyse_textN)0rY rZ r[ r\ r] r^ r_ r` ra rb rc � IGNORECASEre rf �nonmacro� constituent� terminated�symbolr� r& r r rp �Preprocr ro �Specialr rt r r r; r: rv r �Otherr r' rq rr rs r r rw r( �Globalry r� r1 r1 r1 r2 r ' s� � � � �� ��qr c @ s@ e Zd ZdZdZdZddgZdgZddgZd Z d Z d Z d Z d Z e e ZdZdd� Zdejfdefdejfdejfdejfdejfdefde ejfdejfde e ej �fde e ej �fd e ejfd e fe d �e d �ee �e!fee �e!j"fee�e#j$fd e e#j%fee#j&fd!e'fd"e'fd#e'fge(j)d$ e(j)d% d&�Z)d'd(� Z*d)S )*r z# Lexer for Hy source code. �Hyzhttp://hylang.org/�hylang�hyz*.hyz text/x-hyzapplication/x-hyz2.0)%�cond�for�->�->>�car�cdr�first�rest�let�when�unless�import�do�progn�get�slice�assoczwith-decorator�,Z list_compZkwapply�~�is�inzis-notznot-in� quasiquote�unquotezunquote-splice�quoter7 z<<=z>>=Zforeach�while�eval-and-compile�eval-when-compile)�def�defn�defun�defmacro�defclass�lambda�fnZsetvr1 )�cycle�dec�distinct�drop�even?�filter�incz instance?z iterable?Ziteratez iterator?�neg?znone?�nthznumeric?�odd?�pos?�remove�repeatZ repeatedly�takeZtake_nthZ take_while�zero?z [^ \t\n\r\f\v()[\]{};\"'`~]+c C s t | dd�S )N� ��suffix)r )�entriesr1 r1 r2 � _multi_escape s zHyLexer._multi_escaper� z[ \t\n\r\f\v]+� -?\d+\.\d+�-?\d+z 0[0-7]+j?z0[xX][a-fA-F0-9]+�"(\\\\|\\[^\\]|[^"\\])*"rI z \\(.|[a-z]+)z"^(\s*)([rRuU]{,2}"""(?:.|\n)*?""")z"^(\s*)([rRuU]{,2}'''(?:.|\n)*?''')z::?z ~@|[`\'#^~&@]� py-keywords� py-builtinsrP �(\[|\])�(\{|\})�(\(|\))�keywords�builtins)rX r� r� c C s d| v sd| v rdS d S )Nz(import z(defn g�������?r1 r� r1 r1 r2 r� O s zHyLexer.analyse_textN)+rY rZ r[ r\ r] r^ r_ r` ra rb r� r� Z hy_builtinsZhy_corer� rg r� r ro r r r: r; rr rs r rt rv r r �Docr r r ru r r) r' r( r r ry r� r1 r1 r1 r2 r � sT �;�@r c @ s� e Zd ZdZdZdZddgZg d�ZddgZd Z d Z d Z d Z d Z dZde� d�ZdZdZdZde� d�Zde� e� d�Zde� e� d�ZdZde� de� d�Zde� de� d�Ze efd ed fgd efd ej fd ej d!fd"e fd#e� d$e� d%�e j d&fd#e� d'e� d%�e j!d&fd#e� d(e� d)e� d*e� d+e� d%� e d&fd,e� d)e� d*e� d-e� d.e� d/e� d%� e j!d&fd0e� d1e� d%�e j!d&fd2e� �e j"d&fd3e� �e j#d&fd4e� �e j$d&fd5e� �e j!d&fd6e%j&d7fd8e%j'd&fd9e%j(d&fd:e%j(d&fd;e%j)d&fd<e*j+d&fd=e� �e,j-d&fd>e.e,j/e*j/�fd?e,j/d@fdAe� dB�e0fdCe � d�e0dDfgdEe0fee%j1d&fdFefe2d&�ge e3d&fge4dG�dHe� d%�e,dDfdIe0dJfdKe� d%�e,dJfe e3dLfe5e dMe� d%�dN�e,d&fe5e dMe� d%�dN�e*j6d&fee*d&fe4dO�g e4dP�d ed fge4dG�dQe0dRfdSe� d%�e,dRfe e3dTfe4dO�ge4dP�d edUfge4dG�e e3dVfe4dO�ge4dP�d ed@fgd ej dWfdXej d&fdYej fgdZe%j&d&fd[e%j7fd\e%j&fgd]� Z8d^S )_r zJ Lexer for Racket source code (formerly known as PLT Scheme). �Racketzhttp://racket-lang.org/�racket�rkt)z*.rktz*.rktdz*.rktlz text/x-racketzapplication/x-racketz1.6(~ z#%appz#%datumz #%declarez #%expressionz#%module-beginz #%plain-appz#%plain-lambdaz#%plain-module-beginz#%printing-module-beginz #%providez #%requirez#%stratified-bodyz#%topz#%top-interactionz#%variable-referencer� z->*z->*mz->dz->dmz->iz->mz...z:do-in�==z=>�_Zabsent�abstractzall-defined-outz all-from-out�and�anyZaugmentzaugment*z augment-finalzaugment-final*Zaugridezaugride*�beginzbegin-for-syntaxZbegin0�casezcase->zcase->mz case-lambda�classzclass*zclass-field-accessorzclass-field-mutatorzclass/cz class/derivedz combine-inz combine-outz command-linez compound-unitzcompound-unit/inferr� zcons/dcZcontractz contract-outzcontract-structZ contracted�definezdefine-compound-unitzdefine-compound-unit/inferzdefine-contract-structzdefine-custom-hash-typeszdefine-custom-set-typeszdefine-for-syntaxzdefine-local-member-namez define-loggerzdefine-match-expanderzdefine-member-namez define-module-boundary-contractzdefine-namespace-anchorz define-opt/czdefine-sequence-syntaxzdefine-serializable-classzdefine-serializable-class*zdefine-signaturezdefine-signature-formz define-structzdefine-struct/contractzdefine-struct/derivedz define-syntaxzdefine-syntax-rulezdefine-syntaxesz define-unitzdefine-unit-bindingzdefine-unit-from-contextzdefine-unit/contractz define-unit/new-import-exportz define-unit/sz define-valueszdefine-values-for-exportzdefine-values-for-syntaxzdefine-values/invoke-unitz define-values/invoke-unit/inferzdefine/augmentzdefine/augment-finalzdefine/augridezdefine/contractzdefine/final-propz define/matchzdefine/overmentzdefine/overridezdefine/override-finalzdefine/privatez define/publiczdefine/public-finalzdefine/pubmentz define/subexpression-pos-propz"define/subexpression-pos-prop/name�delayz delay/idlez delay/namez delay/strictz delay/syncz delay/threadr� �else�exceptz except-inz except-outZexportZextendsz failure-cont�falsezfalse/c�fieldz field-bound?�filezflat-murec-contractzflat-rec-contractr� zfor*zfor*/andz for*/asyncz for*/firstz for*/foldzfor*/fold/derivedz for*/hashz for*/hasheqz for*/hasheqvz for*/lastz for*/listz for*/listszfor*/mutable-setzfor*/mutable-seteqzfor*/mutable-seteqvzfor*/orz for*/productzfor*/setz for*/seteqz for*/seteqvz for*/streamzfor*/sumz for*/vectorz for*/weak-setzfor*/weak-seteqzfor*/weak-seteqvz for-labelzfor-metaz for-syntaxz for-templatezfor/andz for/asyncz for/firstzfor/foldzfor/fold/derivedzfor/hashz for/hasheqz for/hasheqvzfor/lastzfor/listz for/listszfor/mutable-setzfor/mutable-seteqzfor/mutable-seteqvzfor/orz for/productzfor/setz for/seteqz for/seteqvz for/streamzfor/sumz for/vectorz for/weak-setzfor/weak-seteqzfor/weak-seteqvzgen:custom-writezgen:dictzgen:equal+hashzgen:setz gen:streamZgenericz get-fieldzhash/dc�ifZimpliesr� r zinclude-at/relative-toz include-at/relative-to/readerzinclude/reader�inheritz inherit-fieldz inherit/innerz inherit/super�initz init-dependz init-fieldz init-rest�inner�inspectZ instantiateZ interfacez interface*zinvariant-assertionz invoke-unitzinvoke-unit/inferr� Zlazyr� �let*z let*-valuesz let-syntaxz let-syntaxesz let-valueszlet/cczlet/ec�letrecz letrec-syntaxzletrec-syntaxeszletrec-syntaxes+valuesz letrec-values�lib�link�localz local-requirez log-debugz log-errorz log-fatalzlog-infoz log-warningr= zmatch*zmatch*/derivedz match-definezmatch-define-valuesz match-lambdaz match-lambda*zmatch-lambda**z match-letz match-let*zmatch-let*-valueszmatch-let-valuesz match-letreczmatch-letrec-valuesz match/derivedz match/valueszmember-name-keyZmixin�modulezmodule*zmodule+Znand�newZnorzobject-contractzobject/c�onlyzonly-inz only-meta-in�openzopt/c�orZovermentz overment*�overridez override*zoverride-finalzoverride-final*Z parameterizez parameterize*zparameterize-breakzparametric->/cZplacezplace*z place/contextZplanetrk z prefix-inz prefix-out�privatezprivate*z prompt-tag/cz protect-out�providezprovide-signature-elementszprovide/contract�publiczpublic*z public-finalz public-final*Zpubmentzpubment*r� Z quasisyntaxzquasisyntax/locr� z quote-syntaxzquote-syntax/prunezrecontract-outzrecursive-contractz relative-in�renamez rename-inz rename-innerz rename-outz rename-super�require�sendzsend*zsend+z send-genericz send/applyzsend/keyword-apply�set!z set!-valuesz set-field!Zshared�streamzstream*z stream-cons�structzstruct*z struct-copyzstruct-field-indexz struct-outzstruct/cz struct/ctcz struct/dcZsubmodr% zsuper-instantiatezsuper-make-objectz super-new�syntaxz syntax-casez syntax-case*zsyntax-id-rulesz syntax-rulesz syntax/loc�tag�thiszthis%Zthunkzthunk*�timezunconstrained-domain->�unitzunit-from-contextzunit/czunit/new-import-exportzunit/sr� r� �unquote-splicingZunsyntaxzunsyntax-splicingz values/dropr� zwith-continuation-markz with-contractz with-contract-continuation-markz with-handlerszwith-handlers*z with-methodz with-syntax� λ(� �*z*list/c�+�-�/�<z</c�<=z<=/c�=z=/c�>z>/c�>=z>=/czabort-current-continuation�abszabsolute-path?�acosz add-betweenZadd1z alarm-evtz always-evtzand/cZandmap�anglezany/c�appendzappend*z append-map�applyZargmaxZargminzarithmetic-shiftzarity-at-leastzarity-at-least-valuezarity-at-least?zarity-checking-wrapperzarity-includes?zarity=?zarrow-contract-infoz#arrow-contract-info-accepts-arglistz'arrow-contract-info-chaperone-procedurez%arrow-contract-info-check-first-orderzarrow-contract-info?�asinZassfr� �assq�assv�atanzbad-number-of-resultsZbannerz base->-doms/cz base->-rngs/czbase->?z between/cz bitwise-andzbitwise-bit-fieldzbitwise-bit-set?z bitwise-iorz bitwise-notz bitwise-xorzblame-add-car-contextzblame-add-cdr-contextzblame-add-contextzblame-add-missing-partyzblame-add-nth-arg-contextzblame-add-range-contextzblame-add-unknown-contextz blame-contextzblame-contractzblame-fmt->-stringzblame-missing-party?zblame-negativezblame-original?zblame-positivezblame-replace-negativez blame-sourcez blame-swapzblame-swapped?z blame-updatez blame-valuezblame?z boolean=?�boolean?zbound-identifier=?�boxzbox-cas!z box-immutablezbox-immutable/czbox/czbox?z break-enabledzbreak-parameterization?z break-threadz!build-chaperone-contract-propertyzbuild-compound-type-namezbuild-contract-propertyz build-flat-contract-propertyz build-listz build-pathzbuild-path/convention-typez build-stringz build-vectorz byte-pregexpz byte-pregexp?z byte-ready?z byte-regexpz byte-regexp?zbyte?�byteszbytes->immutable-bytesz bytes->listz bytes->pathzbytes->path-elementzbytes->string/latin-1zbytes->string/localezbytes->string/utf-8z bytes-appendz bytes-append*zbytes-close-converterz bytes-convertzbytes-convert-endzbytes-converter?z bytes-copyz bytes-copy!z bytes-environment-variable-name?z bytes-fill!z bytes-joinz bytes-lengthzbytes-no-nuls?zbytes-open-converterz bytes-refz bytes-set!zbytes-utf-8-indexzbytes-utf-8-lengthzbytes-utf-8-refzbytes<?zbytes=?zbytes>?�bytes?�caaaar�caaadr�caaar�caadar�caaddr�caadr�caar�cadaar�cadadr�cadar�caddar�cadddr�caddr�cadrzcall-in-nested-threadz call-with-atomic-output-filez call-with-break-parameterizationz!call-with-composable-continuationz call-with-continuation-barrierz call-with-continuation-prompt� call-with-current-continuationz*call-with-default-reading-parameterizationz call-with-escape-continuationzcall-with-exception-handlerzcall-with-file-lock/timeoutz%call-with-immediate-continuation-markzcall-with-input-bytes�call-with-input-filezcall-with-input-file*zcall-with-input-stringzcall-with-output-bytes�call-with-output-filezcall-with-output-file*zcall-with-output-stringzcall-with-parameterizationzcall-with-semaphorez call-with-semaphore/enable-break�call-with-values�call/cczcall/ecr� zcartesian-product�cdaaar�cdaadr�cdaar�cdadar�cdaddr�cdadr�cdar�cddaar�cddadr�cddar�cdddar�cddddr�cdddr�cddrr� �ceilingz channel-getz channel-putzchannel-put-evtzchannel-put-evt?zchannel-try-getz channel/czchannel?z chaperone-boxzchaperone-channelz chaperone-continuation-mark-keyz chaperone-contract-property?zchaperone-contract?z chaperone-evtzchaperone-hashzchaperone-hash-setz chaperone-of?zchaperone-procedurezchaperone-procedure*zchaperone-prompt-tagzchaperone-structzchaperone-struct-typezchaperone-vectorz chaperone?� char->integer�char-alphabetic?z char-blank?� char-ci<=?� char-ci<?� char-ci=?� char-ci>=?� char-ci>?� char-downcasez char-foldcasezchar-general-categoryz char-graphic?zchar-inz char-in/czchar-iso-control?�char-lower-case?� char-numeric?zchar-punctuation?� char-ready?zchar-symbolic?zchar-title-case?zchar-titlecase� char-upcase�char-upper-case?zchar-utf-8-length�char-whitespace?�char<=?�char<?�char=?�char>=?�char>?�char?zcheck-duplicate-identifierzcheck-duplicatesz#checked-procedure-check-and-extractz choice-evtzclass->interfacez class-infoz class-sealz class-unsealzclass?z cleanse-path�close-input-port�close-output-portzcoerce-chaperone-contractzcoerce-chaperone-contractszcoerce-contractzcoerce-contract/fzcoerce-contractszcoerce-flat-contractzcoerce-flat-contractszcollect-garbagezcollection-file-pathzcollection-path� combinations�compilez compile-allow-set!-undefinedz$compile-context-preservation-enabledz compile-enforce-module-constantszcompile-syntaxz compiled-expression-recompilezcompiled-expression?zcompiled-module-expression?zcomplete-path?�complex?ZcomposeZcompose1Zconjoin� conjugate�conszcons/c�cons?�constzcontinuation-mark-key/czcontinuation-mark-key?z continuation-mark-set->contextzcontinuation-mark-set->listz continuation-mark-set->list*zcontinuation-mark-set-firstzcontinuation-mark-set?zcontinuation-marksz continuation-prompt-available?zcontinuation-prompt-tag?z continuation?z contract-continuation-mark-keyz#contract-custom-write-property-proczcontract-exercisezcontract-first-orderz contract-first-order-passes?z contract-late-neg-projectionz contract-namez contract-proczcontract-projectionzcontract-property?zcontract-random-generatez contract-random-generate-failz contract-random-generate-fail?z0contract-random-generate-get-current-environmentz contract-random-generate-stashz contract-random-generate/choosezcontract-stronger?zcontract-struct-exercisezcontract-struct-generatez#contract-struct-late-neg-projectionz contract-struct-list-contract?z contract-val-first-projectionz contract?zconvert-streamzcopy-directory/files� copy-filez copy-port�cos�cosh�countzcurrent-blame-formatz current-break-parameterizationzcurrent-code-inspectorz current-command-line-argumentszcurrent-compilezcurrent-compiled-file-rootszcurrent-continuation-markszcurrent-contract-regionzcurrent-custodianzcurrent-directoryzcurrent-directory-for-userz current-drivez current-environment-variableszcurrent-error-portz current-evalz#current-evt-pseudo-random-generatorz current-force-delete-permissionszcurrent-futurezcurrent-gc-millisecondsz"current-get-interaction-input-portz current-inexact-milliseconds�current-input-portzcurrent-inspectorz current-library-collection-linksz current-library-collection-pathsz current-loadzcurrent-load-extensionz current-load-relative-directoryzcurrent-load/use-compiledzcurrent-localezcurrent-loggerzcurrent-memory-usezcurrent-millisecondszcurrent-module-declare-namez current-module-declare-sourcez current-module-name-resolverz current-module-path-for-loadzcurrent-namespace�current-output-portzcurrent-parameterizationzcurrent-plumberz$current-preserved-thread-cell-valuesz current-printz current-process-millisecondszcurrent-prompt-readz current-pseudo-random-generatorzcurrent-read-interactionzcurrent-reader-guardzcurrent-readtablezcurrent-secondszcurrent-security-guardz!current-subprocess-custodian-modezcurrent-threadzcurrent-thread-groupz!current-thread-initial-stack-sizez current-write-relative-directory�curryZcurryrzcustodian-box-valuezcustodian-box?zcustodian-limit-memoryzcustodian-managed-listz&custodian-memory-accounting-available?zcustodian-require-memoryzcustodian-shutdown-allz custodian?z custom-print-quotable-accessorzcustom-print-quotable?zcustom-write-accessorzcustom-write-property-procz custom-write?�datezdate*zdate*-nanosecondzdate*-time-zone-namezdate*?zdate-dayz date-dst?z date-hourz date-minutez date-monthz date-secondzdate-time-zone-offsetz date-week-dayz date-yearz date-year-dayzdate?z datum->syntaxzdatum-intern-literalz default-continuation-prompt-tagzdegrees->radianszdelete-directoryzdelete-directory/files� delete-file� denominatorz dict->listzdict-can-functional-set?zdict-can-remove-keys?z dict-clearz dict-clear!z dict-copyz dict-countz dict-empty?z dict-for-eachz dict-has-key?zdict-implements/czdict-implements?zdict-iter-contractzdict-iterate-firstzdict-iterate-keyzdict-iterate-nextzdict-iterate-valuezdict-key-contractz dict-keyszdict-mapz dict-mutable?zdict-refz dict-ref!z dict-removez dict-remove!zdict-setz dict-set!z dict-set*z dict-set*!z dict-updatez dict-update!zdict-value-contractz dict-valueszdict?zdirectory-exists?zdirectory-listZdisjoin�displayz display-lineszdisplay-lines-to-filezdisplay-to-fileZ displaylnzdouble-flonum?r� zdrop-common-prefixz drop-rightZdropfz dropf-rightzdump-memory-statszdup-input-portzdup-output-portz dynamic->*zdynamic-get-fieldzdynamic-object/cz dynamic-placezdynamic-place*zdynamic-requirezdynamic-require-for-syntaxz dynamic-sendzdynamic-set-field!� dynamic-windZeighth�emptyzempty-sequencez empty-stream�empty?zenvironment-variables-copyzenvironment-variables-nameszenvironment-variables-refzenvironment-variables-set!zenvironment-variables?�eofzeof-evt� eof-object?zephemeron-valuez ephemeron?�eprintfzeq-contract-valz eq-contract?z eq-hash-code�eq?zequal-contract-valzequal-contract?zequal-hash-codezequal-secondary-hash-codezequal<%>�equal?z equal?/recurz eqv-hash-code�eqv?�errorzerror-display-handlerzerror-escape-handlerzerror-print-context-lengthzerror-print-source-locationzerror-print-widthzerror-value->string-handler�evalzeval-jit-enabledz eval-syntaxr� zevt/czevt?�exact->inexactz exact-ceilingz exact-floorzexact-integer?zexact-nonnegative-integer?zexact-positive-integer?z exact-roundzexact-truncate�exact?zexecutable-yield-handler�exitz exit-handlerZexnzexn-continuation-marksz exn-messagez exn:breakzexn:break-continuationzexn:break:hang-upzexn:break:hang-up?zexn:break:terminatezexn:break:terminate?z exn:break?zexn:failzexn:fail:contractzexn:fail:contract:arityzexn:fail:contract:arity?zexn:fail:contract:blamez exn:fail:contract:blame-objectzexn:fail:contract:blame?z exn:fail:contract:continuationz exn:fail:contract:continuation?z exn:fail:contract:divide-by-zeroz!exn:fail:contract:divide-by-zero?z#exn:fail:contract:non-fixnum-resultz$exn:fail:contract:non-fixnum-result?zexn:fail:contract:variablez exn:fail:contract:variable-idzexn:fail:contract:variable?zexn:fail:contract?zexn:fail:filesystemzexn:fail:filesystem:errnoz exn:fail:filesystem:errno-errnozexn:fail:filesystem:errno?zexn:fail:filesystem:existszexn:fail:filesystem:exists?z"exn:fail:filesystem:missing-modulez'exn:fail:filesystem:missing-module-pathz#exn:fail:filesystem:missing-module?zexn:fail:filesystem:versionz exn:fail:filesystem:version?zexn:fail:filesystem?zexn:fail:networkzexn:fail:network:errnoz exn:fail:network:errno-errnozexn:fail:network:errno?zexn:fail:network?zexn:fail:objectzexn:fail:object?zexn:fail:out-of-memoryzexn:fail:out-of-memory?z exn:fail:readzexn:fail:read-srclocszexn:fail:read:eofzexn:fail:read:eof?zexn:fail:read:non-charzexn:fail:read:non-char?zexn:fail:read?zexn:fail:syntaxzexn:fail:syntax-exprsz exn:fail:syntax:missing-modulez#exn:fail:syntax:missing-module-pathz exn:fail:syntax:missing-module?zexn:fail:syntax:unboundzexn:fail:syntax:unbound?zexn:fail:syntax?zexn:fail:unsupportedzexn:fail:unsupported?z exn:fail:userzexn:fail:user?z exn:fail?zexn:misc:match?zexn:missing-module-accessorzexn:missing-module?zexn:srclocs-accessorz exn:srclocs?zexn?�exp�expandz expand-oncez expand-syntaxzexpand-syntax-oncezexpand-syntax-to-top-formzexpand-to-top-formzexpand-user-pathz explode-path�exptzexternalizable<%>zfailure-result/c�false?z field-namesZfifthz file->byteszfile->bytes-linesz file->linesz file->listz file->stringz file->valuez file-exists?zfile-name-from-pathzfile-or-directory-identityz file-or-directory-modify-secondsz file-or-directory-permissionsz file-positionzfile-position*z file-sizezfile-stream-buffer-modezfile-stream-port?z file-truncatezfilename-extensionzfilesystem-change-evtz filesystem-change-evt-cancelzfilesystem-change-evt?zfilesystem-root-listr� z filter-mapz filter-notzfilter-read-input-portzfind-executable-pathz find-filesz find-library-collection-linksz find-library-collection-pathszfind-relative-pathzfind-system-pathZfindfr� z first-or/czfixnum?z flat-contractzflat-contract-predicatezflat-contract-property?zflat-contract?zflat-named-contract�flattenzfloating-point-bytes->realzflonum?�floorz flush-outputz fold-filesZfoldlZfoldr�for-each�force�formatZfourthZfprintfzfree-identifier=?zfree-label-identifier=?zfree-template-identifier=?z free-transformer-identifier=?zfsemaphore-countzfsemaphore-postzfsemaphore-try-wait?zfsemaphore-waitz fsemaphore?�futurezfuture?zfutures-enabled?�gcdzgenerate-member-keyzgenerate-temporariesz generic-set?zgeneric?�gensymzget-output-byteszget-output-stringzget-preferencez get/build-late-neg-projectionz get/build-val-first-projection�getenvzglobal-port-print-handler�group-byzgroup-execute-bitzgroup-read-bitzgroup-write-bitz guard-evtz handle-evtz handle-evt?z has-blame?z has-contract?�hashz hash->listz hash-clearz hash-clear!z hash-copyzhash-copy-clearz hash-countz hash-empty?zhash-eq?z hash-equal?z hash-eqv?z hash-for-eachz hash-has-key?zhash-iterate-firstzhash-iterate-keyzhash-iterate-key+valuezhash-iterate-nextzhash-iterate-pairzhash-iterate-valuez hash-keyszhash-mapzhash-placeholder?zhash-refz hash-ref!z hash-removez hash-remove!zhash-setz hash-set!z hash-set*z hash-set*!z hash-updatez hash-update!z hash-valuesz hash-weak?zhash/czhash?ZhasheqZhasheqvzidentifier-bindingzidentifier-binding-symbolzidentifier-label-bindingz identifier-prune-lexical-contextz!identifier-prune-to-source-modulez)identifier-remove-from-definition-contextzidentifier-template-bindingz identifier-transformer-bindingz identifier?�identityzif/c� imag-partz immutable?zimpersonate-boxzimpersonate-channelz!impersonate-continuation-mark-keyzimpersonate-hashzimpersonate-hash-setzimpersonate-procedurezimpersonate-procedure*zimpersonate-prompt-tagzimpersonate-structzimpersonate-vectorzimpersonator-contract?zimpersonator-ephemeronzimpersonator-of?z"impersonator-prop:application-markzimpersonator-prop:blamez impersonator-prop:contractedz)impersonator-property-accessor-procedure?zimpersonator-property?z impersonator?zimplementation?zimplementation?/czin-byteszin-bytes-lineszin-combinationszin-cyclezin-dictz in-dict-keysz in-dict-pairszin-dict-valuesz in-directoryzin-hashz in-hash-keysz in-hash-pairszin-hash-valueszin-immutable-hashzin-immutable-hash-keyszin-immutable-hash-pairszin-immutable-hash-valueszin-immutable-setz in-indexedzin-input-port-byteszin-input-port-charszin-lineszin-listzin-mlistzin-mutable-hashzin-mutable-hash-keyszin-mutable-hash-pairszin-mutable-hash-valueszin-mutable-setz in-naturalsz in-parallelzin-permutationszin-portz in-producerzin-rangez in-sequenceszin-setzin-slicez in-streamz in-stringz in-syntaxzin-valuezin-values*-sequencezin-values-sequencez in-vectorz in-weak-hashzin-weak-hash-keyszin-weak-hash-pairszin-weak-hash-valuesz in-weak-set�inexact->exactz inexact-real?�inexact?z infinite?zinput-port-append� input-port?z inspector?z instanceof/c� integer->charzinteger->integer-byteszinteger-bytes->integerz integer-inzinteger-lengthz integer-sqrtzinteger-sqrt/remainder�integer?zinterface->method-nameszinterface-extension?z interface?z/internal-definition-context-binding-identifiersz%internal-definition-context-introducez internal-definition-context-sealz internal-definition-context?zis-a?zis-a?/czkeyword->stringz keyword-applyz keyword<?�keyword?zkeywords-matchz kill-thread�lastz last-pair�lcm�lengthzliberal-define-context?z link-exists?�listzlist*zlist*ofz list->byteszlist->mutable-setzlist->mutable-seteqzlist->mutable-seteqvz list->setz list->seteqz list->seteqv� list->string� list->vectorzlist->weak-setzlist->weak-seteqzlist->weak-seteqvzlist-contract?z list-prefix?�list-refzlist-set� list-tailz list-updatezlist/c�list?zlisten-port-number?Zlistof�loadzload-extensionzload-on-demand-enabledz load-relativezload-relative-extensionzload/cdzload/use-compiledz local-expandzlocal-expand/capture-liftszlocal-transformer-expandz&local-transformer-expand/capture-liftszlocale-string-encoding�logzlog-all-levelsz log-level-evtz log-level?z log-max-levelz log-messagez log-receiver?z logger-namezlogger?� magnitudezmake-arity-at-leastzmake-base-empty-namespacezmake-base-namespacez make-bytesz make-channelzmake-chaperone-contractzmake-continuation-mark-keyz make-continuation-prompt-tagz make-contractzmake-custodianzmake-custodian-boxzmake-custom-hashzmake-custom-hash-typeszmake-custom-setzmake-custom-set-typesz make-datez make-date*zmake-derived-parameterzmake-directoryzmake-directory*zmake-do-sequencezmake-empty-namespacezmake-environment-variableszmake-ephemeronzmake-exnzmake-exn:breakzmake-exn:break:hang-upzmake-exn:break:terminatez make-exn:failzmake-exn:fail:contractz make-exn:fail:contract:arityz make-exn:fail:contract:blamez#make-exn:fail:contract:continuationz%make-exn:fail:contract:divide-by-zeroz(make-exn:fail:contract:non-fixnum-resultz make-exn:fail:contract:variablezmake-exn:fail:filesystemz make-exn:fail:filesystem:errnoz make-exn:fail:filesystem:existsz'make-exn:fail:filesystem:missing-modulez make-exn:fail:filesystem:versionzmake-exn:fail:networkzmake-exn:fail:network:errnozmake-exn:fail:objectzmake-exn:fail:out-of-memoryzmake-exn:fail:readzmake-exn:fail:read:eofzmake-exn:fail:read:non-charzmake-exn:fail:syntaxz#make-exn:fail:syntax:missing-modulez make-exn:fail:syntax:unboundzmake-exn:fail:unsupportedzmake-exn:fail:userzmake-file-or-directory-linkzmake-flat-contractzmake-fsemaphorez make-genericz!make-handle-get-preference-lockedz make-hashzmake-hash-placeholderz make-hasheqzmake-hasheq-placeholderz make-hasheqvzmake-hasheqv-placeholderzmake-immutable-custom-hashzmake-immutable-hashzmake-immutable-hasheqzmake-immutable-hasheqvzmake-impersonator-propertyzmake-input-portz make-input-port/read-to-peekzmake-inspectorzmake-keyword-procedurezmake-known-char-range-listzmake-limited-input-port� make-listzmake-lock-file-namezmake-log-receiverz make-loggerzmake-mixin-contractzmake-mutable-custom-setz make-none/cz make-objectzmake-output-portzmake-parameterzmake-parent-directory*zmake-phantom-bytesz make-pipezmake-pipe-with-specialszmake-placeholderz make-plumber� make-polarzmake-prefab-structzmake-primitive-classzmake-proj-contractz make-pseudo-random-generatorzmake-reader-graphzmake-readtable�make-rectangularzmake-rename-transformerzmake-resolved-module-pathzmake-security-guardzmake-semaphorezmake-set!-transformerzmake-shared-byteszmake-sibling-inspectorzmake-special-commentz make-srcloc� make-stringzmake-struct-field-accessorzmake-struct-field-mutatorzmake-struct-typezmake-struct-type-propertyz make-syntax-delta-introducerzmake-syntax-introducerzmake-temporary-filez'make-tentative-pretty-print-output-portzmake-thread-cellzmake-thread-group� make-vectorz make-weak-boxzmake-weak-custom-hashzmake-weak-custom-setzmake-weak-hashzmake-weak-hasheqzmake-weak-hasheqvzmake-will-executor�mapzmatch-equality-testzmatches-arity-exactly?�maxZmcarZmcdrZmcons�memberzmember-name-key-hash-codezmember-name-key=?zmember-name-key?Zmemf�memq�memvz merge-inputzmethod-in-interface?�minzmixin-contractzmodule->exportszmodule->importszmodule->language-infozmodule->namespacez'module-compiled-cross-phase-persistent?zmodule-compiled-exportszmodule-compiled-importsz module-compiled-language-infozmodule-compiled-namezmodule-compiled-submoduleszmodule-declared?zmodule-path-index-joinzmodule-path-index-resolvezmodule-path-index-splitzmodule-path-index-submodulezmodule-path-index?z module-path?zmodule-predefined?zmodule-provide-protected?�modulozmpair?z mutable-setz mutable-seteqzmutable-seteqvzn->thznack-guard-evtz!namespace-anchor->empty-namespaceznamespace-anchor->namespaceznamespace-anchor?znamespace-attach-modulez#namespace-attach-module-declarationznamespace-base-phaseznamespace-mapped-symbolsznamespace-module-identifierznamespace-module-registryznamespace-requireznamespace-require/constantznamespace-require/copyz namespace-require/expansion-timez namespace-set-variable-value!z namespace-symbol->identifierznamespace-syntax-introducez namespace-undefine-variable!znamespace-unprotect-moduleznamespace-variable-valuez namespace?�nan?znatural-number/c�negate� negative?z never-evtu new-∀/cu new-∃/c�newlineZninthznon-empty-listofznon-empty-string?znone/cznormal-case-pathznormalize-arityznormalize-pathznormalized-arity?�notznot/c�null�null?�number->string�number?� numeratorzobject%zobject->vectorz object-infozobject-interfacez object-method-arity-includes?z object-namezobject-or-false=?zobject=?zobject?r� zone-of/czopen-input-bytes�open-input-filezopen-input-output-filezopen-input-stringzopen-output-bytes�open-output-filezopen-output-nowherezopen-output-stringzor/czorder-of-magnitudeZormapzother-execute-bitzother-read-bitzother-write-bit� output-port?�pair?zparameter-procedure=?z parameter/cz parameter?zparameterization?zparse-command-line� partitionz path->byteszpath->complete-pathzpath->directory-pathz path->stringzpath-add-suffixzpath-convention-typezpath-element->byteszpath-element->stringz path-element?zpath-for-some-system?zpath-list-string->path-listz path-onlyzpath-replace-suffixz path-string?zpath<?zpath?zpathlist-closurez peek-bytezpeek-byte-or-specialz peek-bytesz peek-bytes!zpeek-bytes!-evtzpeek-bytes-avail!zpeek-bytes-avail!*zpeek-bytes-avail!-evtz peek-bytes-avail!/enable-breakzpeek-bytes-evt� peek-charzpeek-char-or-specialz peek-stringz peek-string!zpeek-string!-evtzpeek-string-evtzpeeking-input-port� permutationszphantom-bytes?�pizpi.fzpipe-content-lengthz place-breakz place-channelzplace-channel-getzplace-channel-putzplace-channel-put/getzplace-channel?zplace-dead-evtzplace-enabled?z place-killzplace-location?zplace-message-allowed?z place-sleepz place-waitzplace?zplaceholder-getzplaceholder-set!z placeholder?zplumber-add-flush!zplumber-flush-allz plumber-flush-handle-remove!zplumber-flush-handle?zplumber?zpoll-guard-evtz port->byteszport->bytes-linesz port->linesz port->listz port->stringzport-closed-evtz port-closed?zport-commit-peekedzport-count-lines!zport-count-lines-enabledzport-counts-lines?zport-display-handlerzport-file-identityzport-file-unlockzport-next-locationz port-number?zport-print-handlerzport-progress-evtz port-provides-progress-evts?zport-read-handlerzport-try-file-lock?zport-write-handlerzport-writes-atomic?zport-writes-special?�port?� positive?z predicate/czprefab-key->struct-typez prefab-key?zprefab-struct-keyzpreferences-lock-file-modeZpregexpzpregexp?zpretty-displayz pretty-format� pretty-printz"pretty-print-.-symbol-without-barsz#pretty-print-abbreviate-read-macroszpretty-print-columnsz pretty-print-current-style-tablezpretty-print-depthz pretty-print-exact-as-decimalz pretty-print-extend-style-tablezpretty-print-handlerzpretty-print-newlinez pretty-print-post-print-hookzpretty-print-pre-print-hookzpretty-print-print-hookzpretty-print-print-linezpretty-print-remap-stylablez pretty-print-show-inexactnesszpretty-print-size-hookzpretty-print-style-table?zpretty-printingz pretty-writezprimitive-closure?zprimitive-result-arity� primitive?�printzprint-as-expressionzprint-boolean-long-formz print-boxz print-graphzprint-hash-tablezprint-mpair-curly-braceszprint-pair-curly-braceszprint-reader-abbreviationsz print-structzprint-syntax-widthzprint-unreadablezprint-vector-lengthz printable/cz printable<%>�printf�printlnzprocedure->methodzprocedure-arityzprocedure-arity-includes/czprocedure-arity-includes?zprocedure-arity?z procedure-closure-contents-eq?zprocedure-extract-targetzprocedure-keywordszprocedure-reduce-arityz procedure-reduce-keyword-arityzprocedure-renamezprocedure-result-arityzprocedure-specializezprocedure-struct-type?� procedure?�processzprocess*zprocess*/portsz process/portszprocessor-countz progress-evt?zpromise-forced?zpromise-running?z promise/cz promise/name?zpromise?zprop:arity-stringzprop:arrow-contractz prop:arrow-contract-get-infozprop:arrow-contract?z prop:blamezprop:chaperone-contractzprop:checked-procedurez prop:contractzprop:contractedzprop:custom-print-quotablezprop:custom-writez prop:dictzprop:dict/contractzprop:equal+hashzprop:evtzprop:exn:missing-modulezprop:exn:srclocszprop:expansion-contextszprop:flat-contractzprop:impersonator-ofzprop:input-portzprop:liberal-define-contextzprop:object-namezprop:opt-chaperone-contractz$prop:opt-chaperone-contract-get-testz prop:opt-chaperone-contract?zprop:orc-contractz"prop:orc-contract-get-subcontractszprop:orc-contract?zprop:output-portzprop:place-locationzprop:procedurezprop:recursive-contractz prop:recursive-contract-unrollzprop:recursive-contract?zprop:rename-transformerz prop:sequencezprop:set!-transformerz prop:streamzproper-subset?z pseudo-random-generator->vectorz pseudo-random-generator-vector?zpseudo-random-generator?zput-preferences�putenv�quotientzquotient/remainderzradians->degrees�raisezraise-argument-errorzraise-arguments-errorzraise-arity-errorzraise-blame-errorzraise-contract-errorzraise-mismatch-errorzraise-not-cons-blame-errorzraise-range-errorzraise-result-errorzraise-syntax-errorzraise-type-errorzraise-user-error�randomz random-seed�range� rational?� rationalize�readzread-accept-bar-quotezread-accept-boxzread-accept-compiledzread-accept-dotzread-accept-graphzread-accept-infix-dotzread-accept-langzread-accept-quasiquotezread-accept-reader� read-bytezread-byte-or-specialz read-bytesz read-bytes!zread-bytes!-evtzread-bytes-avail!zread-bytes-avail!*zread-bytes-avail!-evtz read-bytes-avail!/enable-breakzread-bytes-evtzread-bytes-linezread-bytes-line-evtzread-case-sensitivez read-cdot� read-charzread-char-or-specialzread-curly-brace-as-parenzread-curly-brace-with-tagzread-decimal-as-inexactzread-eval-print-loopz read-language� read-linez read-line-evtzread-on-demand-sourcez read-square-bracket-as-parenz read-square-bracket-with-tag� read-stringz read-string!zread-string!-evtzread-string-evtz read-syntaxzread-syntax/recursivezread/recursivezreadtable-mappingz readtable?zreal->decimal-stringzreal->double-flonumzreal->floating-point-byteszreal->single-flonumzreal-in� real-part�real?zreencode-input-portzreencode-output-port�regexpz regexp-matchz regexp-match*zregexp-match-evtzregexp-match-exact?zregexp-match-peekzregexp-match-peek-immediatezregexp-match-peek-positionsz regexp-match-peek-positions*z%regexp-match-peek-positions-immediatez)regexp-match-peek-positions-immediate/endz regexp-match-peek-positions/endzregexp-match-positionszregexp-match-positions*zregexp-match-positions/endzregexp-match/endz regexp-match?zregexp-max-lookbehind� regexp-quotezregexp-replacezregexp-replace*zregexp-replace-quotezregexp-replacesz regexp-splitzregexp-try-matchzregexp?zrelative-path?zrelocate-input-portzrelocate-output-port� remainder�remfzremf*r� zremove*zremove-duplicatesZremqzremq*Zremvzremv*zrename-contractzrename-file-or-directoryzrename-transformer-targetzrename-transformer?z replace-evtz reroot-pathz resolve-pathzresolved-module-path-namezresolved-module-path?r� �reverse�round�secondz seconds->datezsecurity-guard?zsemaphore-peek-evtzsemaphore-peek-evt?zsemaphore-postzsemaphore-try-wait?zsemaphore-waitzsemaphore-wait/enable-breakz semaphore?zsequence->listzsequence->streamzsequence-add-betweenzsequence-andmapzsequence-appendzsequence-countzsequence-filterz sequence-foldzsequence-for-eachzsequence-generatezsequence-generate*zsequence-lengthz sequence-mapzsequence-ormapz sequence-refz sequence-tailz sequence/cz sequence?�setzset!-transformer-procedurezset!-transformer?z set->listz set->streamzset-addzset-add!zset-box!z set-clearz set-clear!zset-copyzset-copy-clearz set-countz set-empty?zset-eq?z set-equal?zset-eqv?z set-firstz set-for-eachzset-implements/czset-implements?z set-intersectzset-intersect!zset-mapz set-mcar!z set-mcdr!z set-member?z set-mutable?zset-phantom-bytes!zset-port-next-location!z set-removez set-remove!zset-restzset-some-basic-contracts!z set-subtractz set-subtract!zset-symmetric-differencezset-symmetric-difference!z set-unionz set-union!z set-weak?zset/czset=?zset?ZseteqZseteqvZseventh�sgnz shared-bytesz shell-executezshrink-path-wrt�shufflezsimple-form-pathz simplify-path�sinzsingle-flonum?�sinhZsixthzskip-projection-wrapper?�sleepzsome-system-path->string�sortzspecial-comment-valuezspecial-comment?zspecial-filter-input-portzsplit-atzsplit-at-rightzsplit-common-prefixz split-pathz splitf-atzsplitf-at-rightZsqr�sqrtZsrcloczsrcloc->stringz srcloc-columnz srcloc-linezsrcloc-positionz srcloc-sourcez srcloc-spanzsrcloc?z stop-afterz stop-beforez stream->listzstream-add-betweenz stream-andmapz stream-appendz stream-countz stream-empty?z stream-filterz stream-firstz stream-foldzstream-for-eachz stream-lengthz stream-mapz stream-ormapz stream-refz stream-restz stream-tailzstream/czstream?rH zstring->bytes/latin-1zstring->bytes/localezstring->bytes/utf-8zstring->immutable-stringzstring->keyword� string->list�string->numberz string->pathzstring->path-elementzstring->some-system-path�string->symbolzstring->uninterned-symbolzstring->unreadable-symbol� string-appendzstring-append*� string-ci<=?� string-ci<?� string-ci=?� string-ci>=?� string-ci>?zstring-contains?� string-copyz string-copy!zstring-downcasez!string-environment-variable-name?� string-fill!zstring-foldcasez string-joinz string-len/c� string-lengthzstring-locale-ci<?zstring-locale-ci=?zstring-locale-ci>?zstring-locale-downcasezstring-locale-upcasezstring-locale<?zstring-locale=?zstring-locale>?zstring-no-nuls?zstring-normalize-nfczstring-normalize-nfdzstring-normalize-nfkczstring-normalize-nfkdzstring-normalize-spacesz string-port?zstring-prefix?� string-refzstring-replace� string-set!z string-splitzstring-suffix?zstring-titlecasez string-trimz string-upcasezstring-utf-8-length� string<=?�string<?�string=?� string>=?�string>?�string?zstruct->vectorzstruct-accessor-procedure?z struct-constructor-procedure?z struct-infozstruct-mutator-procedure?zstruct-predicate-procedure?zstruct-type-infoz struct-type-make-constructorzstruct-type-make-predicatez(struct-type-property-accessor-procedure?zstruct-type-property/czstruct-type-property?z struct-type?zstruct:arity-at-leastzstruct:arrow-contract-infoz struct:datez struct:date*z struct:exnzstruct:exn:breakzstruct:exn:break:hang-upzstruct:exn:break:terminatezstruct:exn:failzstruct:exn:fail:contractz struct:exn:fail:contract:arityz struct:exn:fail:contract:blamez%struct:exn:fail:contract:continuationz'struct:exn:fail:contract:divide-by-zeroz*struct:exn:fail:contract:non-fixnum-resultz!struct:exn:fail:contract:variablezstruct:exn:fail:filesystemz struct:exn:fail:filesystem:errnoz!struct:exn:fail:filesystem:existsz)struct:exn:fail:filesystem:missing-modulez"struct:exn:fail:filesystem:versionzstruct:exn:fail:networkz struct:exn:fail:network:errnozstruct:exn:fail:objectz struct:exn:fail:out-of-memoryzstruct:exn:fail:readzstruct:exn:fail:read:eofz struct:exn:fail:read:non-charzstruct:exn:fail:syntaxz%struct:exn:fail:syntax:missing-modulez struct:exn:fail:syntax:unboundzstruct:exn:fail:unsupportedzstruct:exn:fail:userz struct:srclocz struct:wrapped-extra-arg-arrow�struct?Zsub1Zsubbytesz subclass?z subclass?/c� subprocesszsubprocess-group-enabledzsubprocess-killzsubprocess-pidzsubprocess-statuszsubprocess-waitz subprocess?zsubset?� substringz suggest/c�symbol->stringzsymbol-interned?zsymbol-unreadable?zsymbol<?zsymbol=?�symbol?�symbols�synczsync/enable-breakz sync/timeoutzsync/timeout/enable-breakz syntax->datumz syntax->listz syntax-armz syntax-columnzsyntax-debug-infoz syntax-disarmzsyntax-ez syntax-linezsyntax-local-bind-syntaxeszsyntax-local-certifierzsyntax-local-contextz syntax-local-expand-expressionzsyntax-local-get-shadowerz"syntax-local-identifier-as-bindingzsyntax-local-introducezsyntax-local-lift-contextz syntax-local-lift-expressionzsyntax-local-lift-modulez(syntax-local-lift-module-end-declarationzsyntax-local-lift-providezsyntax-local-lift-requirez#syntax-local-lift-values-expressionz$syntax-local-make-definition-contextz"syntax-local-make-delta-introducerz'syntax-local-module-defined-identifierszsyntax-local-module-exportsz(syntax-local-module-required-identifierszsyntax-local-namezsyntax-local-phase-levelzsyntax-local-submodulesz*syntax-local-transforming-module-provides?zsyntax-local-valuez syntax-local-value/immediatezsyntax-original?zsyntax-positionzsyntax-propertyzsyntax-property-preserved?zsyntax-property-symbol-keyszsyntax-protectz syntax-rearmzsyntax-recertifyzsyntax-shift-phase-levelz syntax-sourcezsyntax-source-modulez syntax-spanz syntax-taintzsyntax-tainted?zsyntax-track-originz&syntax-transforming-module-expression?z syntax-transforming-with-lifts?zsyntax-transforming?zsyntax/czsyntax?�systemzsystem*zsystem*/exit-codezsystem-big-endian?zsystem-idle-evtzsystem-language+countryzsystem-library-subpathzsystem-path-convention-typez system-typezsystem/exit-codeztail-marks-match?r� ztake-common-prefixz take-rightZtakefz takef-right�tan�tanhztcp-abandon-portz tcp-acceptztcp-accept-evtztcp-accept-ready?ztcp-accept/enable-breakz tcp-addressesz tcp-closez tcp-connectztcp-connect/enable-breakz tcp-listenz tcp-listener?z tcp-port?z"tentative-pretty-print-port-cancelz$tentative-pretty-print-port-transferZtenthzterminal-port?zthe-unsupplied-arg�third�threadzthread-cell-refzthread-cell-set!zthread-cell-values?z thread-cell?zthread-dead-evtz thread-dead?z thread-group?zthread-receivezthread-receive-evtz thread-resumezthread-resume-evtzthread-rewind-receivezthread-running?z thread-sendzthread-suspendzthread-suspend-evtzthread-try-receivez thread-waitzthread/suspend-to-killzthread?z time-apply�touchztransplant-input-portztransplant-output-port�true�truncatez udp-addressesz udp-bind!z udp-bound?z udp-closez udp-connect!zudp-connected?zudp-multicast-interfacezudp-multicast-join-group!zudp-multicast-leave-group!zudp-multicast-loopback?z udp-multicast-set-interface!zudp-multicast-set-loopback!zudp-multicast-set-ttl!zudp-multicast-ttlzudp-open-socketz udp-receive!z udp-receive!*zudp-receive!-evtzudp-receive!/enable-breakzudp-receive-ready-evtzudp-sendz udp-send*z udp-send-evtzudp-send-ready-evtz udp-send-toz udp-send-to*zudp-send-to-evtzudp-send-to/enable-breakzudp-send/enable-breakzudp?Zunboxzuncaught-exception-handlerzunit?zunspecified-domzunsupplied-arg?zuse-collection-link-pathszuse-compiled-file-pathsz use-user-specific-search-pathszuser-execute-bitz user-read-bitzuser-write-bitz value-blamezvalue-contract�valuesz#variable-reference->empty-namespacez%variable-reference->module-base-phasez0variable-reference->module-declaration-inspectorz%variable-reference->module-path-indexz!variable-reference->module-sourcez variable-reference->namespacezvariable-reference->phasez(variable-reference->resolved-module-pathz variable-reference-constant?zvariable-reference?�vectorzvector->immutable-vector� vector->listz vector->pseudo-random-generatorz vector->pseudo-random-generator!zvector->valuesz vector-appendz vector-argmaxz vector-argminz vector-copyz vector-copy!z vector-countz vector-dropzvector-drop-right� vector-fill!z vector-filterzvector-filter-notzvector-immutablezvector-immutable/czvector-immutableof� vector-lengthz vector-mapz vector-map!z vector-memberz vector-memqz vector-memvz vector-refz vector-set!z vector-set*!z vector-set-performance-stats!zvector-split-atzvector-split-at-rightz vector-takezvector-take-rightzvector/c�vector?Zvectorof�version�voidzvoid?zweak-box-valuez weak-box?zweak-setz weak-seteqz weak-seteqvz will-executezwill-executor?z will-registerzwill-try-executezwith-input-from-bytes�with-input-from-filezwith-input-from-stringzwith-output-to-bytes�with-output-to-file�with-output-to-stringzwould-be-futurezwrap-evtzwrapped-extra-arg-arrowz0wrapped-extra-arg-arrow-extra-neg-party-argumentz!wrapped-extra-arg-arrow-real-funczwrapped-extra-arg-arrow?z writable<%>�write� write-bytez write-byteszwrite-bytes-availzwrite-bytes-avail*zwrite-bytes-avail-evtz write-bytes-avail/enable-break� write-charz write-specialzwrite-special-avail*zwrite-special-evtz write-string� write-to-file�writeln�xorr� z~.az~.sz~.vz~az~ez~rz~sz~vz[([{]z[)\]}]z()[\]{}",\'`;\sz(?:\|[^|]*\||\\[\w\W]|[^|\\z]+)+z(?:#e)?(?:#d)?(?:#e)?z(?:[defls][-+]?\d+)z (?:\d+(?:/\d+|\.\d*)?|\.\d+)z(?:z9|(?:\d+#+(?:\.#*|/\d+#*)?|\.\d+#+|\d+(?:\.\d*#+|/\d+#+)))z?)z(?:(?:inf|nan)\.[0f])z(?:[-+]?z|[-+]�)r7 z(?!\Z)�unquoted-datumz(?s)#;|#*z;[^\n\r\x85\u2028\u2029]*rA � block-commentz(?u)\s+z(?i)z [-+]?\d+(?=[z])rF z/[-+]?(\d+(\.\d*)?|\.\d+)([deflst][-+]?\d+)?(?=[z[-+]?(z([-+]z ?i)?|[-+]z?i)(?=[z (?i)(#d)?(z?i|�@z)(?=[z (?i)(([-+]?z t[-+]?\d+)|[-+](inf|nan)\.t)(?=[z(?iu)(#[ei])?#bz(?iu)(#[ei])?#oz(?iu)(#[ei])?#xz (?iu)(#d)?#iz#?")rF rH z #<<(.+)\n(^(?!\1$).*$\n)*^\1$z&#\\(u[\da-fA-F]{1,4}|U[\da-fA-F]{1,8})z(?is)#\\([0-7]{3}|[a-z]+|.)z(?s)#[pr]x#?"(\\?.)*?"z#(true|false|[tTfF])rJ z(#lang |#!)(\S+)z#reader� quoted-datumz (?i)\.(?=[z])|#c[is]|#['`]|#,@?z '|#[s&]|#hash(eqv?)?|#\d*(?=)rF r4 z`|,@?z[|\\]�datumz quote(?=[r� )rF �quasiquoted-datumzquasiquote(?=[)rF � unquoted-listz(?=[r� �datum*r� z,@?)rF r1 zunquote(-splicing)?(?=[)rF �quasiquoted-listr6 )rF � quoted-listrQ rR z[^#|]+|.rG zG(?s)\\([0-7]{1,3}|x[\da-fA-F]{1,2}|u[\da-fA-F]{1,4}|U[\da-fA-F]{1,8}|.)rW ) rX r5 r8 r� r1 r7 r6 r9 r4 r: r2 rH N)9rY rZ r[ r\ r] r^ r_ r` ra rb � _keywords� _builtinsZ_opening_parenthesisZ_closing_parenthesis� _delimitersZ_symbolZ_exact_decimal_prefixZ _exponentZ_inexact_simple_no_hashesZ_inexact_simpleZ_inexact_normal_no_hashesZ_inexact_normalZ_inexact_specialZ _inexact_realZ_inexact_unsignedr r r ro rp r r r; r: rq rr rs r �Double�Heredocrv �Regexr rw r ru r � Namespacer rt r r r r r) rx ry r1 r1 r1 r2 r T s� a , � �(,� � ��= �� � ����� �� ��� � ���r c @ s� e Zd ZdZdZdZdgZg d�ZddgZdZ e j e j B Z d Zd Zd ejfd ejfd ejfdefdefdedfdedfdefeedd�efde ejfeejfdefg dedfdedfd efgd edfgd �Z d S ) r z3 For newLISP source code (version 10.3.0). �NewLispzhttp://www.newlisp.org/�newlisp)z*.lspz*.nlz*.kifztext/x-newlispzapplication/x-newlispz1.5(� �^�--r) r� �!z!=�?r3 r' r* �&�%r( �++r+ �<<r, r- r. r/ �>>r7 r� �$z$0z$1z$10z$11z$12z$13z$14z$15z$2z$3z$4z$5z$6z$7z$8z$9z$argsz$idxz$itz $main-args�abortr0 r1 �acosh�add�addressZambr� z append-filer3 r4 �argsz array-list�array?�arrayr5 �asinhr� r8 �atan2�atanhzatom?z base64-decz base64-encz bayes-queryz bayes-trainr� �betaZbetai�bindZbinomial�bits�callbackr� �catch�ceilz change-dir�charZchopr� �clean�closez command-eventr� ry Zconstantzcontext?�contextr| �copyr} r~ r Zcpymem�crc32z crit-chi2zcrit-zz current-liner� z date-listz date-parsez date-valuer� �debugr� zdef-newr z define-macror r� z delete-url�delete�destroyZdetZdevice� differencez directory?� directory�divzdo-untilzdo-whileZdoargs�dolistZdostring�dotimesZdotree�dump�dupr� Zencryptz ends-with�env�erfz error-event� eval-stringr� �exec�existsr� r� r� �explode�extend�factorZfftz file-infozfile?r� zfind-all�findr� Zflatzfloat?�floatr� Zfltr� zfor-allr� �forkr� ZfvZgammaiZgammalnr� zget-charz get-floatzget-intzget-longz get-stringzget-urlzglobal?�global�if-notr Zifftr� r� r, zinf?�intr� �integerZ intersect�invertZirr�joinz lambda-macrozlambda?r� z last-errorr� zlegal?r� r� ZletexZletnr� r� r� r r� �lookupz lower-casezmacro?z main-argsZMAINzmake-dirr� Zmatr= r� r� r� �modr �mul�multiplyzNaN?z net-acceptz net-closez net-connectz net-errorznet-evalz net-interfaceznet-ipvz net-listenz net-localz net-lookupz net-packetznet-peekznet-peerznet-pingznet-receive-fromznet-receive-udpz net-receivez net-selectz net-send-toz net-send-udpznet-sendz net-servicez net-sessionsr �nil?�nil�normalr� �nowZnperZnpvr� r� r� r r Zostype�packz parse-date�parse�peek�pipeZpmtz pop-assoc�popzpost-url�powrk r� r� r� r� z prob-chi2zprob-zr� z prompt-eventz protected?�pushzput-url�pvzquote?r� Zrandr� Z randomizer� r� z read-expr� read-filezread-keyr� z read-utf8z reader-eventz real-pathZreceivezref-all�refz regex-comp�regexz remove-dir� rename-file�replace�resetr� r� �rotater� �saver� �seed�seek�selectr* Z semaphorer �sequenceZseriesz set-localez set-ref-allzset-refr� �setf�setqr� Zshare�signalZsilentr� r� r� r� r� �source�spawnr� z starts-withr rH �subZswap�symr r r z sys-errorzsys-infor r �termz throw-error�throwz time-of-dayr# Ztimerz title-caseztrace-highlight�traceZ transposeZTreeZtrim�true?r �unicode�unify�uniquer� �unpackZuntilz upper-case�utf8Zutf8len�uuidzwait-pidr� r� r* r, z write-filez write-linez xfer-eventz xml-errorz xml-parsez xml-type-tagsr� z$([\w!$%&*+.,/<=>?@^~|-])+|(\[.*?\])+z#!(.*?)$r� �#.*$rE r� z\{� bracestringz \[text\]*� tagstringz('|:)�\br� rP r� rQ z\}rF z[^{}]+z(?s)(.*?)(\[/text\]))rX r� r� N) rY rZ r[ r\ r] r^ r_ r` ra rb rc r� re rf r� rg r r� ro r r r r r r r( rt r ry r1 r1 r1 r2 r � s@ > � �'���r c @ s� e Zd ZdZdZg d�ZdgZddgZdZdZ e j Z d Z e d Zd Zd e � d e� d�Zh d�Zh d�Zh d�Zh d�Zh d�Zh d�Zdd� Zed�gdefdejfde dfd e j fd e e j fd e e j fd e e j fd e!fd e!fd!e e"j#fd"e e"fd#e e"j$fd$e%fd%e e j fd&e!fd'e j&fd(e"j'fd)e"j(fd*e"j)fd+e"fd,e!fd-e!fd.e!fd/e e j*fd0e d0 e j+j,fee j+fd1e!dfd2e%dfd3e%d4fg d5e fd e� d6�e j fd e fd7e fd8e fde d4fgd9�Z-d:S );r zh An ELisp lexer, parsing a stream and outputting the tokens needed to highlight elisp code. � EmacsLisp)z emacs-lisp�elisp�emacsz*.elz text/x-elispzapplication/x-elispz"https://www.gnu.org/software/emacs�2.1z\\.|[\w!$%&*+-/<=>?@^{}~|]r} z(?=[ "()\]\'\n,;`])z((?:r~ r >� zcl-do*rk �declarez eval-whenr� zwith-output-to-temp-bufferz cl-locallyz lexical-letzwith-parsed-tramp-file-namezsave-selected-windowzcl-flet*z dotimes-with-progress-reporterzwhile-no-inputzwith-current-bufferzwith-demoted-errorsz define-obsolete-function-aliaszcl-defunz cl-pushnewzpcase-defmacrozwith-category-tablezcl-blockzwith-coding-priorityr� r� zdefine-minor-modez pcase-let*zcl-callfzcl-psetq�rxzwith-file-modeszwith-temp-filezdefine-generic-modez cl-defmacrozcl-remfr� Zpushnewzcl-decfzdo-all-symbolszcl-doz define-globalized-minor-modeZfletZnoreturnZ defmethodzdefine-modify-macrozcl-do-all-symbolsz oref-defaultz cl-declaimzcondition-case-unless-debugzdefine-compiler-macrozcl-incf�returnZprogvz with-tramp-progress-reporterz cl-deftypez pcase-letZ defgenericz return-fromz cl-rotatefZ defadvicez pcase-dolistzcl-multiple-value-bindZdecfzdef-edebug-speczwith-selected-framez do-symbolszwith-temp-bufferZ etypecasez oset-defaultrj z cl-defsubstzdestructuring-bindzcl-destructuring-bindr� zwith-eval-after-loadr� zdefine-global-minor-modezcl-casezcl-multiple-value-setqr� Zecasez use-packagezcl-thezdelay-mode-hooksz with-tramp-connection-propertyZdefsubst�blockzcl-loopz dont-compileZpsetqz cl-tagbodyZosetr) r� z cl-shiftfzwith-syntax-tablezdefine-setf-expanderZmacroletz cl-defstructzatomic-change-groupz lexical-let*zmultiple-value-bindz define-obsolete-variable-aliasz cl-labelsz ert-deftestzwith-tramp-file-propertyzcl-letf*Zdefthemez ignore-errorsr� Zdefsetfr� Zdefgroupz cl-functionz define-advicezdefine-alternativeszcl-return-fromZincfzwith-wrapper-hookzdeclare-functionr� r� zwith-silent-modificationsz with-slotszcl-symbol-macroletZshiftfZtypecase�labelsr� zcl-load-time-valuer �loopzwith-local-quitZ defcustomzwith-temp-messagezdefine-obsolete-face-aliasz cl-dotimesz cl-macroletZ defstructz track-mouseZdeffacer� z cl-etypecasezcl-psetfzdo*z setq-localz cl-eval-whenzload-time-valuez cl-do-symbolszwith-case-tableZorefZpsetfz with-timeoutz cl-dolistzcl-progvzcl-fletzdefine-skeletonzcl-define-compiler-macrozdefine-derived-modezpcase-exhaustivez cl-returnZrotatefzmultiple-value-setqzcombine-after-change-callsZlocallyz cl-typecasez cl-declarez defvar-localzcl-ecasezcl-letf�deftypeZpcasezsave-match-dataz cl-callf2zsave-window-excursionzwith-selected-windowZdeclaim> r� r r� r� zcondition-case�function� interactiveZprog1r� r� z subr-arityr\ zsave-excursionzsave-restrictionzunwind-protectZprog2r� r z setq-defaultZdefconstr zsave-current-bufferr� Zdefvar>� Zuninternzw32-has-winsockZnumberpz scroll-downzprocess-send-regionzwindow-bottom-divider-widthzwindow-old-pointzx-display-pixel-widthz unify-charsetzdebug-timer-checkZdowncasezminibuffer-windowzw16-set-clipboard-datare zforce-window-updater) zhash-table-rehash-sizez!x-display-monitor-attributes-listz find-fontzprocess-tty-namez internal-describe-syntax-valuezupcase-initialsz read-eventzfile-name-nondirectoryz message-boxz charset-plistr� zfile-system-infoz&set-process-inherit-coding-system-flagZ makunboundzset-window-bufferzw32-get-clipboard-datazcurrent-columnzcapitalize-wordzset-process-coding-systemz window-list�concatz string-matchz next-read-file-uses-dialog-pztype-ofzmenu-bar-menu-at-x-yzprocess-filter-multibyte-pz plist-putzread-no-blanks-inputZprinczbacktrace--localsz buffer-namezinotify-rm-watchr� zhandle-switch-framezframe-pointer-visible-pZrassqzconstrain-to-fieldzinsert-file-contentsr� z%cygwin-convert-file-name-from-windowszx-parse-geometryzset-output-flow-controlz dump-emacsr� zmake-frame-invisiblezuser-uidz face-fontzbool-vector-set-differencezimage-metadataZ functionpzgroup-real-gidzforce-mode-line-updatezclear-font-cachezdefine-charset-internalz register-code-conversion-mapZoverlaypzw32-selection-exists-pz end-kbd-macroz this-single-command-raw-keyszrecursion-depthzread-from-minibufferz subr-namezwindow-pixel-widthzdump-glyph-rowz x-hide-tipzprocess-statuszcontrolling-tty-pz stop-processzforward-commentzw32-define-rgb-colorzfile-accessible-directory-pzinsert-and-inheritz set-process-query-on-exit-flagzprofiler-memory-logzstart-kbd-macrozvertical-motionzwindow-new-pixelz symbol-namez overlays-inzwindow-next-siblingzopen-dribble-fileZrecenterZrassocz dump-colorsz internal-make-var-non-specialzredirect-frame-focusz overlay-putz unicode-property-table-internalz color-gray-pZremhashzfont-shape-gstringZnconczset-file-modesZdelqz resume-ttyz unlock-bufferzset-message-beepz#internal-lisp-face-attribute-valuesr� z current-window-configurationzmatch-beginningZlognotzcoding-system-baseZsymbolpzfind-composition-internalzset-window-dedicated-pz scan-sexpszaccept-process-outputz group-gidzx-selection-exists-pzfile-executable-pzfont-variation-glyphszframe-first-windowz string-widthr. Zlistpr� z set-process-datagram-addressztool-bar-heightzframe-terminalzgenerate-new-buffer-namez previous-char-property-changez region-endz#cygwin-convert-file-name-to-windowsZautoloadzSnarf-documentationzfile-attributes-lesspzaccessible-keymaps�md5zframe-pixel-heightzthis-single-command-keys�internZcharsetpzcall-last-kbd-macrozmouse-pixel-positionzmake-indirect-bufferzbuffer-file-namezmake-serial-processzx-frame-geometryztime-addzencode-sjis-charz window-live-p�frexpz gap-positionzmsdos-mouse-disablezw32-set-console-codepagezselected-windowzget-unused-iso-final-charzx-delete-window-propertyzreset-this-command-lengthszset-process-sentinelzsubstring-no-propertieszw32-get-locale-infoZcommandpz lax-plist-putzfringe-bitmaps-at-posz point-maxz process-idzx-get-atom-namezfont-atz get-processzset-network-process-optionz encode-charzset-cursor-sizezinternal-show-cursorzwindow-pixel-edgesz window-startzgnutls-get-initstagez case-table-pzx-server-max-request-sizeZ fmakunboundzterminal-parametersz overlay-getzautoload-do-loadzx-menu-bar-open-internalzget-char-propertyzzlib-decompress-regionzimagemagick-typeszset-keymap-parentz suspend-ttyZconspz user-real-uidzdbus-get-unique-namezrun-window-scroll-functionsz kill-processzinteractive-formzcomposition-get-gstringz read-variablezx-display-color-cellszwindow-line-heightzset-input-modeztest-completionzuser-full-namezstring<zsyntax-table-pz set-window-redisplay-end-triggerzdelete-directory-internalzbacktrace-debugzw32-short-file-namer� zwindow-prev-bufferszcopy-hash-tablezset-window-new-totalr� zbuffer-chars-modified-tickzfont-putz widget-applyz insert-charzinvocation-directoryr- r, zx-display-listzset-window-marginszx-display-backing-storezgnutls-available-pz float-timez read-bufferzcoding-system-priority-listzskip-chars-forwardzwindow-hscrollry r3 z replace-matchzfont-xlfd-nameztext-properties-atZdingz file-exists-pz charset-afterzset-process-window-sizezunencodable-char-positionz window-parentz msdos-memputz char-charsetr� zwindow-total-heightzset-frame-positionz downcase-wordzx-open-connectionz image-mask-pzframe-char-widthzposix-string-matchZfontpzlookup-image-mapz keymap-promptz fontset-fontzfind-charset-stringz get-file-charzupcase-initials-regionz char-syntaxz file-locked-pzcurrent-active-mapszwindow-left-columnzbyte-code-function-pzterminal-local-valuezw32-register-hot-keyzprocess-commandzw32-get-console-codepagezset-process-plistzprofiler-cpu-startzstring-to-multibytezfile-regular-pz run-hookszget-screen-colorzwindow-new-totalr4 z gnutls-deinitzwindow-parameterzdelete-window-internalz discard-inputznext-single-property-changezmouse-positionzwindow-text-heightzwindow-marginsz window-endzset-file-timesz forward-pointz indent-tozstandard-category-tabler zbuffer-modified-tickzhash-table-countz read-functionztty-no-underlinezchar-table-subtypezwindow-new-normalzcurrent-case-tablezmake-variable-frame-localzencode-big5-charzmsdos-mouse-enablezterminal-live-pzinternal--track-mousezminibuffer-selected-windowz"display-supports-face-attributes-pz split-charz kill-emacsr' r/ r� z goto-charzmenu-or-popup-active-pz set-quit-charzminor-mode-key-bindingzset-input-interrupt-modez#set-keyboard-coding-system-internalz previous-single-property-changezuse-global-mapzdowncase-regionzfile-readable-pZasetzcoordinates-in-window-pz file-modeszmodify-category-entryzclear-image-cachezxw-display-color-pz x-file-dialogzexecute-kbd-macrozbuffer-swap-textzkill-local-variablezmarker-insertion-typezdefine-fringe-bitmapzfollowing-charz iconify-framezdump-frame-glyph-matrixzdefine-coding-system-aliaszmake-variable-buffer-localzfont-getzdefine-hash-table-testzfontset-list-allz plist-memberzterminal-coding-systemzchar-table-extra-slotz fontset-listzstring-as-unibytezx-own-selection-internalZlogxorZimagepzterminal-parameterZboundpzoverlay-recenterzmake-directory-internalz recent-keysz undo-boundaryzframe-scroll-bar-widthz w32-set-console-output-codepagez get-char-property-and-overlayzbackward-prefix-charszkey-descriptionzset-default-file-modesz w32-get-console-output-codepagezskip-syntax-backwardz default-valuer� zmodify-frame-parametersZnatnumpZsubrpz char-table-pZwindowpZbobpztty-display-color-cellszcategory-docstringz x-show-tipz quit-processzmake-byte-codez sleep-forr� z intern-softzw32-get-current-locale-idzget-internal-run-timezstring>zbuffer-enable-undozcolor-supported-pZeolpzwindow-prev-siblingzwindow-text-widthz tty-top-framezcurrent-time-zoner| zset-process-bufferznext-char-property-changezdefault-toplevel-valuezx-display-visual-classzstring-to-numberzset-syntax-tablez select-windowzframe-parameterszformat-network-addressztranspose-regionszcurrent-global-mapz field-end� documentationzmake-local-variablezw32-get-default-locale-idzsingle-key-descriptionzframe-text-lineszinsert-before-markersz delete-framezcompose-region-internal�eltzread-key-sequencez do-auto-savezbury-buffer-internalz yes-or-no-pzbuffer-local-variablesz system-groupsz font-speczw32-window-exists-pZ backtracez memory-infozframe-bottom-divider-widthzwindow-resize-apply-totalZfboundpzw32-battery-statuszminibuffer-depthz msdos-mouse-pzmap-charset-charsr� zinsert-buffer-substringz msdos-remember-default-colorsZarraypz lookup-imageZputhashr^ zdestroy-fringe-bitmap�ldexpzchar-table-parentZnreversez set-defaultZ mapconcatz#gnutls-peer-status-warning-describezx-display-screensr* r� zx-display-mm-heightzwindow-valid-pz internal-set-lisp-face-attributezlocate-file-internalzfind-charset-regionzbeginning-of-linezdelete-and-extract-regionz!internal-default-process-sentinelzplay-sound-internalZnlistpznumber-to-stringzprofiler-cpu-stopz lock-bufferz ccl-executezbuffer-substringzdefine-charset-aliasZprin1zinput-pending-pz%internal-event-symbol-parse-modifierszwindow-header-line-heightzdeclare-equiv-charsetzdelete-processz clear-string� byteorderzwindow-mode-line-heightzclear-this-command-keyszgfile-add-watchz lookup-keyz buffer-listzcoding-system-putz system-userszprevious-overlay-changez locale-infor� zfont-drive-otfzadd-name-to-filez match-endz minibuffer-completion-contentszwindow-pixel-topzfont-face-attributeszfont-get-system-fontzdbus--init-busznarrow-to-regionz$previous-single-char-property-changez.internal-set-lisp-face-attribute-from-resourcezlocal-variable-if-set-pz msdos-memgetZmapatomszgetenv-internalzmemory-use-countszbyte-to-positionzx-load-color-filezdbus-message-internalzx-create-framez window-redisplay-end-triggerzsplit-window-internalzcompare-stringsztext-property-not-allZashzcheck-coding-systemz compare-window-configurationsZ propertizezfunction-equalzprevious-framezredirect-debugging-outputzcurrent-minor-mode-mapsZfloatpz frame-focuszmap-char-tablezset-char-table-parentzvisited-file-modtimeZfuncallzmsdos-downcase-filenamezx-display-planeszfile-name-directoryzset-terminal-parameterzinternal-complete-bufferzoverlay-propertiesz load-averagezmax-charz move-overlayzkeyboard-coding-systemzset-frame-sizezfile-aclzwindow-body-heightzcapitalize-regionz sort-charsetszx-family-fontsr� zabort-recursive-editZpurecopy� macroexpandzbase64-encode-stringz invisible-pzcoding-system-aliaseszwindow-inside-pixel-edgeszwindow-fringeszlocal-key-bindingzfont-family-listZupcasezhash-table-sizezwindow-scroll-barsz draw-stringzxw-color-valueszset-window-pointzset-default-toplevel-valuezfile-attributeszw32-registered-hot-keyszw32-reconstruct-hot-keyzset-char-table-extra-slotzframe-right-divider-widthzwindow-top-linezdirectory-filesz scroll-leftzx-send-client-messagez scroll-rightzmodify-syntax-entryzcharset-priority-listZeobpr� ztrace-redisplay�messagezw32-get-valid-locale-idsztool-bar-pixel-widthzbyte-to-stringr� r1 zscroll-other-windowztool-bar-get-system-stylezsearch-forwardr� zsubstitute-in-file-namer0 r� znetwork-interface-listzset-window-configurationzframe-total-colszwindow-pixel-leftz delete-fieldzget-text-propertyr� z close-fontzwindow-dedicated-pZkeymappz lower-framezother-window-for-scrollingzframe-scroll-bar-heightzw32-get-codepage-charsetz process-markzset-window-startz rename-bufferzbase64-encode-regionzwindow-scroll-bar-widthZterprizx-get-resourcezbool-vector-notzwindow-body-widthzfile-name-all-completionszwindow-use-timezprefix-numeric-valuezframe-text-widthzw16-selection-exists-pzwaiting-for-user-input-pzx-register-dnd-atomZintegerpzset-category-tablez window-list-1ZsetcarZstringpzexternal-debugging-outputzchar-category-setzpoint-max-markerzdefault-printer-namez image-flushzgnutls-peer-statuszinternal-lisp-face-pz backward-charz copy-sequencez plist-getZint86zmake-category-tablezw32-default-color-mapzw32-shell-executezprocess-sentinelzx-wm-set-size-hintzset-case-tablez bool-vector-count-populationz posn-at-pointznext-overlay-changez other-bufferz"process-inherit-coding-system-flagzstring-make-unibytez set-markerz#find-coding-systems-region-internalzx-popup-dialogzfind-file-name-handlerz#set-terminal-coding-system-internalzcurrent-input-modez unhandled-file-name-directoryzcall-process-regionzshow-face-resourcesr� z forward-charzx-disown-selection-internalr, zdirectory-file-namezmove-point-visuallyzbuffer-local-valuez symbol-plistzcompare-buffer-substringszpoint-min-markerZmemqlz gnutls-errorpz safe-lengthzdelete-terminalzdefine-categoryz time-less-pzprofiler-memory-stopr� zw32-unregister-hot-keyzmarker-positionzmake-temp-namez match-dataz terminal-namez make-overlayz"window-inside-absolute-pixel-edgeszcheck-coding-systems-regionzdescribe-buffer-bindingszx-window-propertyzposition-byteszmake-char-tablezstring-collate-lesspz gnutls-bootzget-unused-categoryzwindow-display-tablezchar-or-string-pzw32-send-sys-commandzfile-newer-than-file-pz make-charz suspend-emacszx-change-window-propertyz write-regionzstring-as-multibytezset-window-vscrollzgpm-mouse-startz w32-get-valid-keyboard-layoutszframe-pixel-widthz eval-bufferzstring-to-charz char-beforezset-mouse-positionz internal-get-lisp-face-attributez query-fontsetr� zset-buffer-multibytezcdr-safezfont-get-glyphsZbufferpzdecode-coding-regionr rH zline-beginning-positionz buffer-stringz clear-buffer-auto-save-failurezvisible-frame-listzfuncall-interactivelyZmarkerpzstring-make-multibytezw16-get-clipboard-datazdump-tool-bar-row�insertzset-coding-system-priorityzset-visited-file-modtimezzlib-available-pzlibxml-parse-html-regionzhash-table-weaknesszbidi-resolved-levelszwindow-configuration-pzset-terminal-local-valuez eval-regionzstring-to-syntaxzcategory-tableznetwork-interface-infozlocal-variable-p�arefr5 Zsetplistz forward-wordz run-hook-with-args-until-successzself-insert-commandzencode-coding-stringz get-unicode-property-internalz copy-keymapz forward-linez!minibuffer-contents-no-propertieszw32-toggle-lock-keyz delete-other-windows-internalzwindow-top-childzdefault-boundpZatom�eqzinternal-lisp-face-empty-pzw32-get-valid-codepageszbool-vector-intersectionZfroundzactive-minibuffer-windowz delete-charzcolor-distancezsignal-processzframe-font-cachezset-mouse-pixel-positionzw32-get-keyboard-layoutzbool-vector-subsetprw zposix-search-forwardr+ z scroll-upzcopy-syntax-tablezmove-to-window-linezset-time-zone-ruleZsetcdrz decode-charzglobal-key-bindingr8 zuser-real-login-namez field-stringz memory-limitzmake-bool-vectorzprin1-to-stringzframe-fringe-widthZframepzfield-beginningzread-coding-systemz char-equalzdetect-coding-stringZ redisplayZsxhashzchar-to-stringzmsdos-long-file-namesZffloorzset-buffer-auto-savedzmove-to-columnz put-unicode-property-internalzmultibyte-char-to-unibytez1-zprocess-connectionzsend-string-to-terminalz looking-atzset-buffer-modified-pz font-infozdelete-overlayzprofiler-cpu-logzadd-face-text-propertyzmap-keymap-internalz bool-vector-count-consecutivezcurrent-local-mapzprocess-attributeszindirect-functionz next-windowz fontset-infozfont-get-system-normal-fontZgethashzpos-visible-in-window-pz directory-files-and-attributesz set-window-combination-limitzevent-convert-listz point-markerzset-text-propertiesz erase-bufferz window-bufferzdefine-prefix-commandzframe-face-alistzinternal-make-lisp-facezopen-termscriptr� zskip-syntax-forwardzframe-total-linesr� zmake-category-setzset-match-datazcompose-string-internalzset-window-prev-buffersz bool-vectorzcategory-set-mnemonicsz buffer-substring-no-properties�isnan�read-from-stringzset-process-filterr} zset-screen-colorzset-frame-selected-windowzresize-mini-window-internalzmake-sparse-keymapzprofiler-memory-startz remove-list-of-text-propertiesz keymap-parentz bitmap-spec-pzface-attributes-as-vectorz upcase-wordzdecode-coding-stringzcurrent-bufferzdump-redisplay-historyzhash-table-testzframe-char-heightZkeywordpr zbool-vector-exclusive-orzset-minibuffer-windowzset-standard-case-tablezread-key-sequence-vectorz set-process-filter-multibytez set-bufferzget-file-bufferZvconcatzx-uses-old-gtk-dialogzstring-collate-equalpz x-popup-menuzfile-symlink-pzsubst-char-in-regionz byte-codez posn-at-x-yzinteger-or-marker-pzset-marker-insertion-typezparse-partial-sexpzuser-login-namez x-synchronizez make-markerzexpand-file-namezset-window-new-pixelZ sequencepzfile-name-as-directory� capitalizez!internal-set-font-selection-orderz kill-bufferznumber-or-marker-pz key-bindingzminibuffer-contentsz emacs-pidz define-coding-system-internalz x-select-fontz gc-statuszrecursive-editzget-buffer-createzset-buffer-major-modez window-pointzdecode-big5-charzcurrent-indentationzcancel-kbd-macro-eventszwindow-normal-sizer� zinternal-char-fontzbuffer-has-markers-atzframe-parameterz find-operation-coding-systemz start-processzre-search-forwardz!insert-before-markers-and-inheritz next-single-char-property-changezselected-framez point-minzposix-looking-atzset-charset-priorityz encode-timez upcase-regionzx-server-vendorz copy-alist�/=zformat-mode-linez define-keyzcar-less-than-carZ characterpzset-window-parameterzcompleting-readzstandard-syntax-tablezcall-interactivelyzprocess-coding-systemz widget-putZfceilingzcontinue-processz process-listzxw-color-defined-pzbase64-decode-regionzremove-text-propertiesztext-property-anyzset-frame-heightzmake-symbolic-linkzwhere-is-internal�copysignz current-bidi-paragraph-directionzstring-to-unibytezprocess-query-on-exit-flagzw32-unload-winsockz window-edgesZvectorpz read-commandz window-systemz command-error-default-functionr� Z minibufferpzinternal-lisp-face-equal-pzset-charset-plistz time-subtractzstandard-case-tablezcoding-system-eol-typezwindow-next-buffersz copy-markerzhandle-save-sessionzprofiler-memory-running-pzx-backspace-delete-keys-pzunibyte-char-to-multibytezmsdos-set-keyboardzgpm-mouse-stopzw32-frame-menu-bar-sizezcoding-system-pzmatching-parenzframe-text-colszprevious-windowzmultibyte-string-pzfile-writable-pz font-match-pZmapcarz access-filezrecent-doskeyszrestore-buffer-modified-pzstore-kbd-macro-eventz overlay-listsr( zbacktrace-evalz bool-vector-pzprocess-datagram-addresszwindow-scroll-bar-heightzset-char-table-rangezcompute-motionztry-completionzcategory-table-pzwindow-inside-edgesztty-display-color-pzget-buffer-processz scan-listsr� z.frame-can-run-window-configuration-change-hookzposix-search-backwardZclrhashzw32-set-keyboard-layoutz string-bytesz string-equalzdaemon-initializedzrun-hook-with-argszget-bytezsuspicious-objectzminibuffer-promptzset-window-hscrollzwindow-absolute-pixel-edgeszprocess-running-child-pzmake-frame-visiblezwindow-configuration-framezset-window-scroll-barsz system-namezprocess-contactzinsert-startup-screenzminibuffer-prompt-endzerror-message-stringzw32notify-add-watchzchar-resolve-modifiersz run-hook-with-args-until-failurezdefault-file-modeszgap-sizezrun-hook-wrappedz widget-getzbacktrace-framezline-end-positionz window-atzset-fringe-bitmap-facezverify-visited-file-modtimezframe-root-windowzfetch-bytecodez syntax-tableZdaemonpzfile-directory-pzx-display-pixel-heightzline-pixel-heightzwindow-pixel-height�pointzx-close-connectionzdump-glyph-matrixzframe-or-buffer-changed-pzset-window-fringeszwindow-minibuffer-pzlibxml-parse-xml-regionzread-char-exclusivez$run-window-configuration-change-hookz internal-default-process-filterzwindow-vscrollr� zfile-name-completionzgnutls-error-fatalpz symbol-valuez assoc-stringz1+zbuffer-base-bufferzcommand-remappingzcurrent-idle-time� ftruncatezmake-terminal-framezvector-or-char-table-pzvariable-binding-locusz next-framezredraw-displayzccl-execute-on-stringz internal-merge-in-global-facezoverlay-bufferz combine-after-change-executezequal-including-propertiesz open-fontzget-pos-propertyzencode-coding-regionz char-afterz string-lesspzbuffer-modified-pr� z buffer-live-pzhash-table-rehash-thresholdzdecode-sjis-charzfield-string-no-propertiesZlshzw32-set-current-localeZlogior�put�logbzspecial-variable-pzgarbage-collectzapropos-internalzprevious-property-changezre-search-backwardzmsdos-mouse-initzframe-visible-pz image-sizez make-symbolzindirect-variablez set-file-aclzx-server-versionz lax-plist-getr� Zbolpz ccl-program-pzdelete-all-overlayszformat-time-stringz delete-regionzlast-nonminibuffer-framez map-keymapzface-attribute-relative-pzwindow-text-pixel-sizezbarf-if-buffer-read-onlyzrecent-auto-save-pzfile-name-absolute-pz current-timer� zput-text-propertyz iso-charsetzinvocation-namez*internal-set-alternative-font-family-alistz new-fontsetz x-focus-frameZwidenzwindow-resize-applyzwindow-combination-limitz terminal-listr� z hash-table-pzgnutls-error-stringzfont-otf-alternateszw32-frame-rectzget-buffer-windowzframe-border-widthr zwindow-parametersz x-list-fontsz overlay-endz list-fontsZmaphashZ fillarrayzregister-ccl-programr� zexit-recursive-editz overlay-startz#bidi-find-overridden-directionalityr� zwindow-total-width�fsetz decode-timezinternal-show-cursor-pzw32-set-process-priorityzx-selection-owner-pzframe-text-heightzskip-chars-backwardzset-input-meta-modezset-file-selinux-contextz call-processzx-display-mm-widthz(set-safe-terminal-coding-system-internalz end-of-lineznewline-cache-checkz overlays-atzmake-hash-tablezoptimize-char-tablez internal-face-x-get-resourcezget-load-suffixeszchar-table-rangezmessage-or-boxzbool-vector-unionz insert-byteZlogandzmsdos-set-mouse-buttonsz char-widthz process-plistz mark-markerzcar-safezpreceding-charzregion-beginningr6 z frame-listzx-display-save-underz process-typezprocess-exit-statusz unix-synczstring-greaterpzmerge-face-attributer� rI zx-get-selection-internalz window-framezgfile-rm-watchzsearch-backwardzsubstitute-command-keyszclear-face-cachezdescribe-vectorzw32notify-rm-watchZeqlzall-completionsz select-framezinternal-copy-lisp-facezunibyte-stringzwindow-left-childzframe-selected-windowz use-local-mapz,internal-set-alternative-font-registry-alistzstring=zsymbol-functionzread-non-nil-coding-systemzset-window-new-normalz secure-hashzset-fontset-fontzinterrupt-processzinit-image-libraryztranslate-region-internalz#w32-display-monitor-attributes-listz top-levelz dump-facez query-fontzcoding-system-plistzthis-command-keysznext-property-changezcurrent-time-stringzmake-network-processzprocess-filterzset-window-display-tablez make-keymapzcurrent-messagezcopy-category-tableztrace-to-stderrzprocess-send-string�equalzthis-command-keys-vectorzx-display-grayscale-pzserial-process-configurez get-bufferz raise-framezinotify-add-watchzprocess-bufferzlist-system-processesz gnutls-byer� zfile-selinux-contextzdetect-coding-regionzw32-set-clipboard-datazkill-all-local-variablesz(tty-suppress-bold-inverse-default-colorszset-frame-widthzclear-charset-mapsz marker-bufferZnthcdrzcharset-id-internalz frame-live-pZprocesspzw32-long-file-nameztty-typezwindow-right-divider-widthzsystem-move-file-to-trashzadd-text-propertiesztext-char-descriptionzset-window-next-buffersr� zprocess-send-eofz process-namezprofiler-cpu-running-pzdocumentation-propertyz buffer-sizeZmapcz redraw-framezbase64-decode-string> Zdefaliaszwith-electric-helpr Zfeaturepr Z defvaraliasz define-widgetr� zwith-no-warnings> z&allow-other-keysz&keyz&bodyz&restz &environmentz &optionalz&auxz&whole> z user-errorr� z cl-assert�warnz cl-check-typer� c c s� dg}t �| ||�D ]�\}}}|tju r�|tjv rB|tj|fV q|tjv rZ|t|fV q|tj v rt|tj |fV q|tj v r�|tj |fV q|tj v r�|tj |fV q|tjv r�|tj|fV q|||fV qd S r� )r r& r r( r r� r' r� r �error_keywords� Exception� builtin_function_highlightedr) r� r� �Pseudor� r1 r1 r2 r& � s, z%EmacsLispLexer.get_tokens_unprocessedr� rE r� rG rH z \?([^\\]|\\.)r� r� rI r� r� r� r� z\[|\]rJ z#\^\^?r� z#[bB][+-]?[01]+(/[01]+)?z#[oO][+-]?[0-7]+(/[0-7]+)?z&#[xX][+-]?[0-9a-fA-F]+(/[0-9a-fA-F]+)?z&#\d+r[+-]?[0-9a-zA-Z]+(/[0-9a-zA-Z]+)?r� r� z (,@|,|\.|:)r� r� r� r� r� rF z[^"\\`]+z\'rV z\\\n)rX r� rH N).rY rZ r[ r\ r] r_ r` ra r^ rb rc re rf r� r� r� r� r� r� r� r� r� r� r& r r r ro r rv r r) rt r r r; r: r r' rq rr rs rw r( r� ry r1 r1 r1 r2 r | s� 1 =� �� �C��r c @ sV e Zd ZdZdZdZdgZdgZddgZdZ d Z d Z d Z d Z d d� e D �Ze�dd� e D �� e�dd� e D �� dZe� d�Zde� d�Zde� d�Zdedfdejfdejfdefgd ejfd ejfd efd efd efd!efd"e fd#e j fd$e j fded%fee j!fd&e"j#fee fd'efgd(�Z$d)d*� Z%d+d,� Z&d-d.� Z'd/d0� Z(d1d2� Z)d3d4� Z*d5S )6r z% Lexer for Shen source code. �Shenzhttp://shenlanguage.org/�shenz*.shenz text/x-shenzapplication/x-shenr� ) �datatyper r� Z defprologZdefccZsynonymsr� �package�typer� )r� r� r� r Zcasesr� r� r# �freezer. r� rM �protectr r� r� r� �outputzprolog?z trap-errorr� r� z/.r� z@pz@sz@v)�r� r- r' r( r) r* r+ r. r/ r, z <-addressz<-vectorrN Z absvectorz absvector?z address->Zadjoinr3 Zarityr� rY r9 zbound?�call�cdr` Zcnrv r� ry rz �cutrf rg zelement?r� zenable-type-theoryzerror-to-stringr� zeval-kl� exceptionrs ZexternalZfailzfail-ifr �findallZfixZfstZfwhenr� zget-timer� ZhdZhdstrZhdv�headZ identical�implementationr� r zinclude-all-butZ inferences�inputzinput+r� r� � intersectionr� �kill�languager� �limitZlinereadZloaded�macror� r� ZmapcanZ maxinferences�modez n->string�nlr� r� r� Z occurrencesz occurs-checkr �os�out�portZporters�pos�prZprecludezpreclude-all-butr� Zprofilezprofile-resultsZps�quitr� zread+r� r� zread-file-as-bytelistzread-file-as-stringr� �releaser� r� r� �runr� r� z simple-errorZsndZ specialiseZspy�stepZstinputZstoutput�strz string->nr� r �substr Zsystemf�tailZtcztc?�thaw�tlZtlstrZtlv�track�tuple?Z undefmacror� zunify!�unionZ unprofileZ unspecialiseZuntrackz variable?r zvector->r$ Zverifiedr% r� r� r+ r- zy-or-n?)�where�skiprL r� rF z<e>z<!>c C s i | ] }|t �qS r1 �r ��.0�sr1 r1 r2 � <dictcomp>5 � zShenLexer.<dictcomp>c c s | ]}|t jfV qd S r$ )r r) r r1 r1 r2 � <genexpr>6 r zShenLexer.<genexpr>c c s | ]}|t fV qd S r$ r r r1 r1 r2 r 7 r z[\w!$%*+,<=>?/.\'@&#:-]r( z[a-z!$%*+,<=>?/.\'@&#_-]r' z[A-Z]rG rF z c#\d{1,3};z~[ARS%]z(?s).z(?s)\\\*.*?\*\\z\\\\.*rE z_{5,}z={5,}z(;|:=|\||--?>|<--?)z (:-|:|\{|\})z[+-]*\d*\.\d+(e[+-]?\d+)?z[+-]*\d+rH z(true|false|<>|\[\])z (\[|\]|\(|\)))rH rX c C s$ t �| |�}| �|�}| �|�}|S r$ )r r& �_process_symbols�_process_declarations)r* r+ ry r1 r1 r2 r& X s z ShenLexer.get_tokens_unprocessedc C s |t ttjtjfvS r$ )r r r ro rp )r* r- r1 r1 r2 � _relevant^ s zShenLexer._relevantc c sj d}|D ]\\}}}|||fV | � |�r|rT|tkrT|| jv rT|}| �||�E d H |dkob|tk}qd S �NF�()r r r� �_process_declarationr )r* ry � opening_parenr, r- r. � declarationr1 r1 r2 r a s z ShenLexer._process_declarationsc c sp d}|D ]b\}}}|r6|t tjfv r6| j�|tj�}n|t krN|| jv rNtj}|dko\|tk}|||fV qd S r ) r r r( �MAPPINGSr� r' �BUILTINS_ANYWHEREr) r )r* ry r r, r- r. r1 r1 r2 r k s zShenLexer._process_symbolsc c s� |D ]$\}}}| � |�r q*|||fV q|dkr�d}|tkrDtjn|}|||fV |D ]B\}}}|rt|tkrttj}|||fV | � |�rX|tko�|dk}qXn�|dkr�|tkr�tjn|}|||fV n�|dk�rp|tkr�tjn|}|||fV |D ](\}}}| � |��r �q |||fV q�|dk�rb|tk�rb|t|fV | �|�D ]\}}}|||fV �qFn |||fV n |tk�r�tjn|}|||fV d S )Nr� Fr� r� r �{) r r r r� r rA r' r �_process_signature)r* r ry r, r- r. Zprev_was_colonr1 r1 r2 r u s@ z ShenLexer._process_declarationc c sd |D ]Z\}}}|t kr0|dkr0|t|fV d S |t tjfv rR|�� rLtjntj}|||fV qd S )N�})r r r r' �istitler( r r� )r* ry r, r- r. r1 r1 r2 r � s z ShenLexer._process_signatureN)+rY rZ r[ r\ r] r^ r_ r` ra rb r� r� �BUILTINSr r �updateZvalid_symbol_charsrg Z symbol_name�variabler rx �Interpolr rp ro r r r r r: r; r r( r r� ry r& r r r r r r1 r1 r1 r2 r sZ ��� &r c @ s� e Zd ZdZdZdgZdgZg ZdZdZ dZ dZ d Z d d e jfd efd ejfdejfdefde ejfdejfdejfdefee dd�efde ejfde ejfee ddd�ej fde ej fe ejfde fde fgiZ d S ) r zF A CPSA lexer based on the CPSA language as of version 2.2.12 �CPSA�cpsaz*.cpsaz3https://web.cs.wpi.edu/~guttman/cs564/cpsauser.htmlr� )Zherald�varsr� r Z defprotocolZdefroleZ defskeletonZ defstrandZ deflistenerznon-origz uniq-origz pen-non-orig�precedesr� r �recvr] r+ ZskeyZakey�dataZmesg) �cat�encr� ZprivkZpubkZinvkZltk�genr� r# rX r� rE r� r� r� rI rK rL rM r� r� rN rO rP �rk r� r� r� N) rY rZ r[ r\ r] r_ r` ra r^ rb r; r< rg r ro r r r: r; r rt rv r rw r r r r( r) r' r ry r1 r1 r1 r2 r � s< ��r c @ s� e Zd ZdZdZdZdgZdgZg ZdZ dZ dZ d Z d Z d Zd Zd ZdZdZdZdedfdedfde ejfde ejfde ejfde ejfde ejfde ejfde ejfd e ejfd e ejfd e ejfd e d e d! e d" e d# ejfee d$d%�efeed$d%�ejfed&�eejfgd'e e j fd(e j fd)e fee d$d%�efeed$d%�ejfed&�eejfgd*e j!fd+e"fd,e#j$fd-e#j%fd.e#fd/e fd0ej&fee d$d%�efeed$d%�ejfd1efg ee d$d2d3�edfed4�gd5�Z'd6S )7r z�An xtlang lexer for the Extempore programming environment. This is a mixture of Scheme and xtlang, really. Keyword lists are taken from the Extempore Emacs mode (https://github.com/extemporelang/extempore-emacs-mode) �xtlangz http://extempore.moso.com.au� extemporez*.xtmz2.2) r� r r r r� r� r r� r� r r� r� ) r� r r� r� r% r� r� r r r� ) z bind-funczbind-valzbind-libz bind-typez bind-aliasz bind-polyz bind-dylibz bind-lib-funcz bind-lib-val)Zletz�memzone�cast�convertrk Zdoloop)Jr' r( r) r* r+ r, r- r. r/ rI r0 r1 r2 r3 r4 r5 r� r6 r7 r8 r9 r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ r� rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r� r^ ry r} r� r� r� r� r� r� r� r� r� r� r� r� r� r r r� r� r� r[ r� )�rK rL rM rN rO r_ r` ra rb rc rd re rf rg rh ri rj rk rl rm rn ro rp rq rr rs rt rw r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� zinteraction-environmentr� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� znull-environmentr� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� zscheme-report-environmentzset-car!zset-cdr!rH r� r� r� r� r r r r r r r r r r r r r r r r r r ztranscript-offz transcript-onr r r r! r" r# r$ r' r( r* r, r� )oZtoStringzafill!zpfill!ztfill!Ztbindzvfill!z array-fill!z pointer-fill!z tuple-fill!r" �freerT �tupler� r� zcset!ZcrefrH �borz ang-namesrK rL r� r� Zsprintfr� r� zpset!zpref-ptrzvset!Zvrefzaset!r� zaref-ptrztset!Ztrefztref-ptrZsallocZhallocZzallocZallocZscheduler� r� r� r} r r5 r1 r8 r� r� r� r^ r r� Z llvm_printfZ push_zoneZpop_zoner) r[ Z llvm_sprintfz make-arrayz array-set!z array-refz array-ref-ptrz pointer-set!z pointer-refzpointer-ref-ptrz stack-allocz heap-allocz zone-allocz make-tuplez tuple-set!z tuple-refz tuple-ref-ptrz closure-set!z closure-refZprefZpdrefZ impc_nullZbitcastr& Zifretzret->zclrun->z make-env-zone�make-envz<>ZdtofZftodZi1tofZi1todZi1toi8Zi1toi32Zi1toi64Zi8tofZi8todZi8toi1Zi8toi32Zi8toi64Zi32tofZi32todZi32toi1Zi32toi8Zi32toi64Zi64tofZi64todZi64toi1Zi64toi8Zi64toi32r# z[\w.!-]+z[]{}[\w<>,*/|!-]+r� rQ r� rF z(?<=bind-func\s)z(?<=bind-val\s)z(?<=bind-type\s)z(?<=bind-alias\s)z(?<=bind-poly\s)z(?<=bind-lib\s)z(?<=bind-dylib\s)z(?<=bind-lib-func\s)z(?<=bind-lib-val\s)r� z(<z>|\|z\||/z/|z\*)\**rP )rk �commonrI rK rM r� rE r� r� z(#b|#o|#x)[\d.]+r� rL r� r� r& r! )r' r! r0 rX N)(rY rZ r[ r\ r] r^ r_ r` ra rb Zcommon_keywordsr Zxtlang_bind_keywordsZxtlang_keywordsZcommon_functionsZscheme_functionsZxtlang_functionsZvalid_scheme_nameZvalid_xtlang_nameZvalid_xtlang_typer r r' r r� r r r( r rt rv r r ro r r r: r; rw ry r1 r1 r1 r2 r � s� # ������# �� ���r c @ s� e Zd ZdZdZdZddgZdgZdZdZ d Z d Z d Z d d e jfdefdefdejfdejfdefdejfde ejfee dd�efee dd�ejfee dd�ejfdej fe ej fde fde fde fde fgiZ d S ) r z�A lexer for the Fennel programming language. Fennel compiles to Lua, so all the Lua builtins are recognized as well as the special forms that are particular to the Fennel compiler. �Fennelzhttps://fennel-lang.org�fennel�fnlz*.fnlz2.3)?�#rI r' r( r) r� r� �-?>�-?>>r8 z..r* z//r� r+ r, r- r. r/ z?.rD � accumulater� �band�bnotr. �bxorZcollect�commentr� �docZdoto�eachz eval-compilerr� ZhashfnZicollectr z import-macrosr r� r� �lshift�luaZ macrodebugr= r� �not=r �partialz pick-argsz pick-valuesr� zrequire-macros�rshiftr� z set-forcibly!Ztsetr r� r� z with-openz~=)r� ry r� r r� r� �varr& )'Z_GZ_VERSION�arg�assertZbit32Zcollectgarbage� coroutinerd �dofiler� ZgetfenvZ getmetatable�ioZipairsr� ZloadfileZ loadstring�math�nextr� r� �pairsZpcallr� ZrawequalZrawgetZrawlenZrawsetr r� ZsetfenvZ setmetatablerH �tableZtonumberZtostringr� r� Zxpcallz0[a-zA-Z_!$%&*+/:<=>?^~|-][\w!$%&*+/:<=>?^~|\.-]*rX r� z,+rE r� r� r� z(true|false|nil)r� r� r� z\.\.\.r� r� r� r4 N) rY rZ r[ r\ r] r^ r_ r` rb r� r� r� rg r ro r r r r: r; r r rw rt r r ru r) r( r ry r1 r1 r1 r2 r � s< ��r c @ s� e Zd ZdZdZdZdgZddgZddgZd Z d Z d Z d Z d Z dZdZdZde� d�Ze� de� d�ZdZdZdZdZdZdejfdefd e� d e� d e� d �efd e� d!e� d �efd"e� d e� d#�ej fd$e� �ej fd%e� d e� d&e� d#�ej fd'e� d(e� d#�ej fd)e d*fd+e fd,e fd-e fe!eed.�e"j#fd/e� d0�e$j%fe!e ed.�e$j&j'fe!e d1ed2�e"j(fe!e d1ed2�e$j)fe!e d1ed2�e$j*fee$j&fgd3e j+fd4e j+fd5e j+fd6e d7fd8e fgd9�Z,d:S );r z0A lexer for the Janet programming language. �Janetzhttps://janet-lang.org/�janetz*.janetz*.jdnz text/x-janetzapplication/x-janetz2.18) �breakr� r� r� r r� r� Zsplicer� r� ZupscoperC r� )Qz%=z*=rJ z+=rE z-=r� r� r5 r6 r� r� zas->zas-macrozas?->rE r� Zcatseq�chrr; ZcompifZcomptimeZcompwhenr� �corozdef-r ZdefdynZdeferr� z defmacro-r� zdefn-r r< r= ZeachkZeachpZedeferz ev/do-threadz ev/gatherzev/spawnzev/spawn-threadzev/with-deadlinez ffi/defbindzfiber-fnr� �foreverZforv�generatezif-letrz zif-withr� Zjuxt�labelr� r� r= r �promptr� r� �seqzshort-fnZtabseq�toggleZtracev�tryr� Zusezvar-Zvarfnr� zwhen-letz when-with�withz with-dynsz with-symsz with-varsZeachy( rI r' r( r) r* r+ r, r- r. r/ z abstract?r7 Z accumulate2�allz all-bindingsz all-dynamicszany?r4 rT z array/clearz array/concatz array/ensurez array/fillz array/insertz array/newzarray/new-filledz array/peekz array/popz array/pushz array/removez array/slicez array/trimz array/weakrS �asmz bad-compilez bad-parser8 Zblshiftr9 r9 r. ZbrshiftZbrushift�bufferz buffer/bitzbuffer/bit-clearzbuffer/bit-setzbuffer/bit-togglez buffer/blitz buffer/clearz buffer/fillz buffer/formatzbuffer/from-bytesz buffer/newzbuffer/new-filledz buffer/popnz buffer/pushzbuffer/push-atzbuffer/push-bytezbuffer/push-stringzbuffer/push-wordz buffer/slicez buffer/trimzbuffer?r: r< �cancelz cfunction?zcli-main�cmp�comp�comparezcompare<z compare<=zcompare=zcompare>z compare>=rv Z complementr Zcurenvrd zdebug/arg-stackz debug/breakz debug/fbreakz debug/lineagez debug/stackzdebug/stacktracez debug/stepz debug/unbreakzdebug/unfbreakZdebuggerzdebugger-on-statusr� z deep-not=zdeep=Z defglobalZdescribez dictionary?Zdisasmr� ri zdoc*z doc-formatzdoc-ofrG r� z drop-untilz drop-whileZdynZeflushr� z env-lookupZeprinZeprinfZeprintr� r� Zerrorfzev/acquire-lockzev/acquire-rlockzev/acquire-wlockz ev/all-taskszev/callz ev/cancelz ev/capacityzev/chanz ev/chan-closezev/chunkzev/closezev/countz ev/deadlinezev/fullzev/givezev/give-supervisorzev/gozev/lockzev/readzev/release-lockzev/release-rlockzev/release-wlockz ev/rselectz ev/rwlockz ev/selectzev/sleepzev/takez ev/threadzev/thread-chanzev/writer� rp r� zevery?Zextremer� z ffi/alignzffi/callzffi/calling-conventionsz ffi/closez ffi/contextzffi/freez ffi/jitfnz ffi/lookupz ffi/mallocz ffi/nativezffi/pointer-bufferzffi/pointer-cfunctionzffi/readz ffi/signaturezffi/sizez ffi/structzffi/trampolinez ffi/writezfiber/can-resume?z fiber/currentz fiber/getenvzfiber/last-valuezfiber/maxstackz fiber/newz fiber/rootz fiber/setenvzfiber/setmaxstackz fiber/statuszfiber?z file/closez file/flushz file/linesz file/openz file/readz file/seekz file/tellz file/tempz file/writer� rv z find-indexr� r� z flatten-into�flushZflycheckr� Z frequenciesz from-pairsz function?Z gccollectZ gcintervalZ gcsetintervalr� r� zget-in�getlineZgetprotor� zhas-key?z has-value?r� z idempotent?r� zimport*r� r� zindex-ofzindexed?zint/s64z int/to-bytesz int/to-numberzint/u64zint?� interleaveZ interposer} zjuxt*Zkeepz keep-syntaxz keep-syntax!�keys�keywordz keyword/slicer� Zkvsr� r� z lengthable?z load-imageZmacexZmacex1Zmaclintfr/ z make-imager� Zmapcat�marshalzmath/absz math/acosz math/acoshz math/asinz math/asinhz math/atanz math/atan2z math/atanhz math/cbrtz math/ceilzmath/cosz math/coshzmath/erfz math/erfczmath/expz math/exp2z math/expm1z math/floorz math/gammazmath/gcdz math/hypotzmath/lcmzmath/logzmath/log-gammaz math/log10z math/log1pz math/log2z math/nextzmath/powz math/randomzmath/rngzmath/rng-bufferz math/rng-intzmath/rng-uniformz math/roundzmath/seedrandomzmath/sinz math/sinhz math/sqrtzmath/tanz math/tanhz math/truncr� zmax-of�meanZmemcmp�mergez merge-intoz merge-moduler� zmin-ofr� zmodule/add-pathszmodule/expand-pathz module/findz module/valuer� znat?�nativer� z net/acceptznet/accept-loopz net/addressznet/address-unpackz net/chunkz net/closez net/connectz net/flushz net/listenz net/localnamez net/peernameznet/readz net/recv-fromz net/send-toz net/serverznet/setsockoptz net/shutdownz net/writerJ r� r� r@ r� r� zone?zos/archzos/cdzos/chmodzos/clockz os/compilerz os/cpu-countz os/cryptorandzos/cwdzos/datezos/dirz os/environz os/executezos/exitz os/getenvz os/isattyzos/linkzos/lstatzos/mkdirz os/mktimezos/openz os/perm-intzos/perm-stringzos/pipez os/posix-execz os/posix-forkz os/proc-closez os/proc-killz os/proc-waitz os/readlinkz os/realpathz os/renamezos/rmzos/rmdirz os/setenvzos/shellz os/sigactionzos/sleepzos/spawnzos/statz os/strftimez os/symlinkzos/timezos/touchzos/umaskzos/whichrK r� z parse-allz parser/bytez parser/clonezparser/consumez parser/eofz parser/errorz parser/flushzparser/has-morez parser/insertz parser/newzparser/producez parser/statez parser/statusz parser/whererA r� z partition-byz peg/compilezpeg/findz peg/find-allz peg/matchz peg/replacezpeg/replace-allr� Zpostwalk�ppZprewalkZprinZprinfr� r� �product� propagater� zput-inr� r� �reduceZreduce2�replr �resumer� r� zreverse!z run-contextZsandboxz scan-numberZsetdynr� r� ZslurpZsomer� zsort-by�sortedz sorted-byZspitrH zstring/ascii-lowerzstring/ascii-upperz string/byteszstring/check-setz string/findzstring/find-allz string/formatzstring/from-byteszstring/has-prefix?zstring/has-suffix?z string/joinz string/repeatzstring/replacezstring/replace-allzstring/reversez string/slicez string/splitz string/trimz string/trimlz string/trimrr r zstruct/getprotozstruct/proto-flattenzstruct/to-tablezstruct/with-protor �sumr� z symbol/slicer rL z table/clearz table/cloneztable/getprotoz table/newztable/proto-flattenz table/rawgetztable/setprotoztable/to-structz table/weakztable/weak-keysztable/weak-valuesztable?r� z take-untilz take-whiler� r� r� ztruthy?r- ztuple/bracketsz tuple/setmapz tuple/sliceztuple/sourcemapz tuple/typer r� Z unmarshalZuntracer z update-inr Z varglobal�walkz warn-compileZxprinZxprinfZxprintZxprintf�yieldr� Zzipcollz tarray/bufferztarray/copy-bytesz tarray/lengthz tarray/newztarray/propertiesz tarray/sliceztarray/swap-bytesz thread/closezthread/currentz thread/exitz thread/newzthread/receivez thread/send)z debugger-envzdefault-peg-grammarz janet/buildzjanet/config-bitsz janet/versionzload-image-dictzmake-image-dictz math/-infzmath/ezmath/infz math/int-maxz math/int-minzmath/int32-maxzmath/int32-minzmath/nanzmath/piz module/cachezmodule/loaderszmodule/loadingz module/pathszroot-env�stderr�stdin�stdout)r r� r z(?=\s|#|[)\]]|$)z[a-zA-Z!$%&*+\-./<=>?@^_]z([0-9:]|r0 r z)*z[0-9a-zA-Z][0-9a-zA-Z_]*z&[+-]?[0-9a-zA-Z]+z[0-9a-fA-F][0-9a-fA-F_]*z [0-9][0-9_]*z[eE][+-]?[0-9]+r� rE z*(?x) [+-]? [0-9]{1,2} r z \. (z)? (z)? z0(?x) [+-]? [0-9]{1,2} r (\.)? z (z(?x) [+-]? 0x z)?z(?x) [+-]? 0x (\.)? z (?x) [+-]? z)? (z(?x) [+-]? (\.)? z (z@?"rH z@?(`+)(.|\n)+?\1z['~,;|]z@?[(\[{]|[)\]}]r� z(:(z)+|:)rP r& z#\\(u[0-9a-fA-F]{4}|U[0-9a-fA-F]{6})rU rV rG rF rW )rX rH N)-rY rZ r[ r\ r] r^ r_ r` ra rb r� Zbuiltin_macrosZbuiltin_functionsZbuiltin_variables� constantsZ _token_endZ _first_charZ _rest_charrg Z _radix_unitZ _radix_expZ _hex_unitZ _dec_unitZ_dec_expr ro r r rs r: r r r r r Z Constantsr rw r( r� �Reservedr) r' rx ry r1 r1 r1 r2 r s� ����������� � � � ��L��r )%r\ rc Zpygments.lexerr r r r r Zpygments.tokenr r r r r r r r r r r Zpygments.lexers.pythonr Z pygments.lexers._scheme_builtinsr r �__all__r r r r r r r r r r r r1 r1 r1 r2 �<module> sF 4 =q , %N LS
| ver. 1.1 | |
.
| PHP 8.3.30 | Ð“ÐµÐ½ÐµÑ€Ð°Ñ†Ð¸Ñ Ñтраницы: 0 |
proxy
|
phpinfo
|
ÐаÑтройка