3
� �X�% � @ s d Z ddlZddlmZmZmZmZmZ ddlm Z m
Z
m Z m Z m
Z
mZmZmZmZmZ ddlmZ dddd d
d d d
dg ZG dd� de�ZG dd� de�ZG dd� de�ZG dd � d e�ZG dd
� d
e�ZG dd � d e�ZG dd � d e�Z G dd
� d
e�Z G dd� de�Z dS )z�
pygments.lexers.lisp
~~~~~~~~~~~~~~~~~~~~
Lexers for Lispy languages.
:copyright: Copyright 2006-2017 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)� PythonLexer� SchemeLexer�CommonLispLexer�HyLexer� RacketLexer� NewLispLexer�EmacsLispLexer� ShenLexer� CPSALexer� XtlangLexerc � @ sp e Zd ZdZdZddgZddgZddgZ�dZ�dZ d�Z
d�e j fd�e j
d�fd�e d�fd�e fd�efd�ejfd�ejfd�efd�e
ejfd�ejfd�ejfd�efd�d�jd�d�� eD �� efd�e
ejfd�e
ejf�d d�j�dd�� e D �� ejf�de
ej fe
ejf�de f�de fgd�e j
�df�de j
�df�de j
f�d e j
fg�d
e �df�d e �df�d e fg�d
�Z �dS ( r a�
A Scheme lexer, parsing a stream and outputting the tokens
needed to highlight scheme code.
This lexer could be most probably easily subclassed to parse
other LISP-Dialects like Common Lisp, Emacs Lisp or AutoLisp.
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.
.. versionadded:: 0.6
ZScheme�schemeZscmz*.scmz*.ssz
text/x-schemezapplication/x-scheme�lambda�define�if�else�cond�and�or�case�let�let*�letrec�begin�do�delay�set!�=>�quote�
quasiquote�unquote�unquote-splicing�
define-syntax�
let-syntax�
letrec-syntax� syntax-rules�*�+�-�/�<�<=�=�>�>=�abs�acos�angle�append�apply�asin�assoc�assq�assv�atan�boolean?�caaaar�caaadr�caaar�caadar�caaddr�caadr�caar�cadaar�cadadr�cadar�caddar�cadddr�caddr�cadr� call-with-current-continuation�call-with-input-file�call-with-output-file�call-with-values�call/cc�car�cdaaar�cdaadr�cdaar�cdadar�cdaddr�cdadr�cdar�cddaar�cddadr�cddar�cdddar�cddddr�cdddr�cddr�cdr�ceiling�
char->integer�char-alphabetic?�
char-ci<=?� char-ci<?� char-ci=?�
char-ci>=?� char-ci>?�
char-downcase�char-lower-case?�
char-numeric?� char-ready?� char-upcase�char-upper-case?�char-whitespace?�char<=?�char<?�char=?�char>=?�char>?�char?�close-input-port�close-output-port�complex?�cons�cos�current-input-port�current-output-port� denominator�display� dynamic-wind� eof-object?�eq?�equal?�eqv?�eval�even?�exact->inexact�exact?�exp�expt�floor�for-each�force�gcd� imag-part�inexact->exact�inexact?� input-port?�
integer->char�integer?�interaction-environment�lcm�length�list� list->string� list->vector�list-ref� list-tail�list?�load�log� magnitude�
make-polar�make-rectangular� make-string� make-vector�map�max�member�memq�memv�min�modulo� negative?�newline�not�null-environment�null?�number->string�number?� numerator�odd?�open-input-file�open-output-file� output-port?�pair?� peek-char�port?� positive?�
procedure?�quotient� rational?� rationalize�read� read-char� real-part�real?� remainder�reverse�round�scheme-report-environment�set-car!�set-cdr!�sin�sqrt�string� string->list�string->number�string->symbol�
string-append� string-ci<=?� string-ci<?� string-ci=?� string-ci>=?� string-ci>?� string-copy� string-fill!�
string-length�
string-ref� string-set!� string<=?�string<?�string=?� string>=?�string>?�string?� substring�symbol->string�symbol?�tan�transcript-off�
transcript-on�truncate�values�vector� vector->list� vector-fill!�
vector-length�
vector-ref� vector-set!�vector?�with-input-from-file�with-output-to-file�write�
write-char�zero?z[\w!$%&*+,/:<=>?@^~|-]+z;.*$z#\|zmultiline-commentz#;\s*\(zcommented-formz#!r6rsz\s+z
-?\d+\.\d+z-?\d+z"(\\\\|\\"|[^"])*"�'u' #\\([()/'\"._!§$%& ?=+-]|[a-zA-Z0-9]+)z(#t|#f)z('|#|`|,@|,|\.)z(%s)�|c c s | ]}t j|�d V qdS )� N)�re�escape)�.0�entry� r �/usr/lib/python3.6/lisp.py� <genexpr>� s zSchemeLexer.<genexpr>z(?<='\()z(?<=#\()z (?<=\()(%s)c c s | ]}t j|�d V qdS )r N)r r )r r r r r r � s z(?<=\()z(\(|\))z(\[|\])z#pushz\|#z#popz[^|#]+z[|#]z\(z\)z[^()]+)�rootzmultiline-commentzcommented-formN)r r r r r r! r" r# r$ r% r& r' r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 )�r4 r5 r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk rl rm rn ro rp rq rr rs rt ru rv rw rx ry rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� ) �__name__�
__module__� __qualname__�__doc__�name�aliases� filenames� mimetypes�keywords�builtins�
valid_namer �Single� Multiliner r
�Float�Integerr �Symbol�Charr �Constantr �joinr
�Variable�Builtin�Functionr �tokensr r r r r s�
c , @ s2 e Zd ZdZdZdddgZddgZdgZej ej
B Z d Z e d
Z
d Zd e e
f Zd
d� Zdd� Zed�gdejdfdejdfdejfdejfgdejdfdejdfdejfgdefd ejfdejd fd ejfd efd e ejfd!e ejfd"e ejfd#e ejfd#efd$efd%e e j fd&e e fd'e e j fd(e ej fd)e ej fd*edfd+e j!fd,e ejfd-efd.e"j#fd/e j$fd0e j%fd1e j&fd2e fd3e'e e(�dfd4e'e j!e(�dfd5e'e j!e(�dfd6e j!fd7efd8efd9e d: ejd;fd<efd=efd>e e"j)fd?e d? e"j*j+fee"j*fde(dfde(dfg'd@�Z,dAS )Br z9
A Common Lisp lexer.
.. versionadded:: 0.9
z Common Lispz common-lispZclZlispz*.clz*.lispztext/x-common-lispz \\.|[\w!$%&*+-/<=>?@\[\]^{}~]z|[#.:]z(?=[ "()\'\n,;`])z(\|[^|]+\||(?:%s)(?:%s)*)c K s` ddl m}m}m}m}m}m}m} || _|| _ || _
|| _ || _ || _
|| _tj| f|� 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__) �selfZoptionsr r! r" r# r$ r% r& r r r r. � s $zCommonLispLexer.__init__c c s� dg}x�t j| ||�D ]�\}}}|tjkr�|| jkrD|tj|fV q|| jkr\|t|fV q|| jkrv|tj|fV q|| j kr�|t|fV q|| j
kr�|t|fV q|| j kr�|tj |fV q|| j
kr�|tj|fV q|||fV qW d S )Nr )r �get_tokens_unprocessedr r r' r r( r
r) r* r+ r, �Typer- �Class)r/ �text�stack�index�token�valuer r r r0 � s2
z&CommonLispLexer.get_tokens_unprocessed�bodyz#\|z#pushz\|#z#popz[^|#]+z[|#]z\(z\)z[^()]+z\s+z;.*$zmultiline-commentz#\d*Y.*$z"(\\.|\\\n|[^"\\])*"�:z::z:#r� �`z [-+]?\d+\.?z [-+]?\d+/\d+z<[-+]?(\d*\.\d+([defls][-+]?\d+)?|\d+(\.\d*)?[defls][-+]?\d+)z#\\.z#\\z#\(z #\d*\*[01]*z#:z#[.,]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?"(\\.|[^"])*"z#\d+=z#\d+#z#+nilz\s*\(zcommented-formz#[+-]z (,@|,|\.)z(t|nil)z\*)r zmultiline-commentzcommented-formr8 N)-r r
r r r
r r r r �
IGNORECASE� MULTILINE�flags�nonmacro� constituent�
terminated�symbolr. r0 r r r �Preprocr r �Specialr r r r
r r r r ZOtherr r �Bin�Oct�Hexr r r r �Globalr r r r r r � sx
c % @ s6 e Zd ZdZdZdgZdgZddgZdhZdiZ f Z
djZ e
e Z dLZ
dMdN� ZdOejfdPefdQejfdRejfdSejfdTejfdUefdVe
ejfdWejfdXeeej�fdYeeej�fdZe
ejfd[e fe d\�e d]�ee�e fee �e j fee �e j!fd^e
e j"fe
e j#fd_e$fd`e$fdae$fge%j&db e%j&dc dd�Z&dedf� Z'dgS )kr zV
Lexer for `Hy <http://hylang.org/>`_ source code.
.. versionadded:: 2.0
ZHyZhylangz*.hyz text/x-hyzapplication/x-hyr �for�->�->>r[ rj �first�restr$ �when�unless�importr( �progn�get�slicerC �with-decorator�,� list_comp�kwapply�~�is�in�is-not�not-inr- r. �unquote-splicer, r� �<<=�>>=�foreach�while�eval-and-compile�eval-when-compile�def�defn�defun�defmacro�defclassr �fn�setv�cycle�dec�distinct�drop�even?�filter�inc� instance?� iterable?�iterate� iterator?�neg?�none?�nth�numeric?�odd?�pos?�remove�repeat�
repeatedly�take�take_nth�
take_while�zero?z(?!#)[\w!$%*+<=>?/.#-]+c C s t | dd�S )Nr )�suffix)r )Zentriesr r r �
_multi_escape� s zHyLexer._multi_escapez;.*$z[,\s]+z
-?\d+\.\d+z-?\d+z 0[0-7]+j?z0[xX][a-fA-F0-9]+z"(\\\\|\\"|[^"])*"r� z \\(.|[a-z]+)z"^(\s*)([rRuU]{,2}"""(?:.|\n)*?""")z"^(\s*)([rRuU]{,2}'''(?:.|\n)*?''')z::?z
~@|[`\'#^~&@]z py-keywordsz py-builtinsz(?<=\()z(\[|\])z(\{|\})z(\(|\))r r )r z py-keywordsz py-builtinsc C s d| ksd| krdS d S )Nz(import z(defn g�������?r )r3 r r r � analyse_text� s zHyLexer.analyse_textN)%r rH rI rJ r[ rj rK rL r$ rM rN rO r( rP rQ rR rC rS rT rU rV rW rX rY rZ r[ r- r. r\ r, r� r] r^ r_ r` ra rb )rc rd re rf rg r rh ri )rj rk rl rm rn ro rp rq rr rs rt ru rv rw rx ry rz r{ r| r} r~ r r� r� )(r r
r r r
r r r r( r+ Z hy_builtinsZhy_corer r r� r r r r
r r rE rF r r r r ZDocr r r
� Declarationr r r r r r r r� r r r r r Z s^
c � @ s e Zd ZdZdZddgZdddgZdd gZ� d�Z� d�Z � dxZ
� dyZ � dzZ � d{e Z
� d|Z� d}Z� d~Z� de Z� d�eef Z� d�eef Z� d�Z� d�eef Z� d�eef Ze ef� d�e� d�fg� d�ef� d�ejf� d�ej� d�f� d�ef� d�ee f e j � d�f� d�ee f e j � d�f� d�eeeee f e � d�f� d�eeeeee f e j � d�f� d�ee f e j � d�f� d�e
e j � d�f� d�e
e j � d�f� d�e
e j!� d�f� d�e
e j � d�f� d�e"j#� d�f� d�e"j$� d�f� d�e"j%� d�f� d�e"j%� d�f� d�e"j&� d�f� d�e'j(� d�f� d�e
e)j*� d�f� d�e+e)j,e'j,�f� d�e)j,� d�f� d�e e-f� d�e
e-� d�fg� d�e-fe
e"j.� d�f� d�efe/� d��ge e0� d�fge1� d��� d�e e)� d�f� d�e-� d�f� d�e e)� d�fe
e0� d�fe2e� d�� d�e � d��e)� d�fe2e � d�� d�e � d��e'j3� d�fe
e'� d�fe1� d��g e1�d��� d�e� d�fge1� d��� d�e-� d�f� d�e e)� d�fe
e0� d�fe1� d��ge1�d��� d�e� d�fge1� d��e
e0� d�fe1� d��ge1�d��� d�e� d�fg� d�ej� d�f� d�ej� d�f� d�ejfg� d�e"j#� d�f� d�e"j4f� d�e"j#fg� d�� Z5� d�S (� r z�
Lexer for `Racket <http://racket-lang.org/>`_ source code (formerly
known as PLT Scheme).
.. versionadded:: 1.6
ZRacketZracketZrktz*.rktz*.rktdz*.rktlz
text/x-racketzapplication/x-racket�#%app�#%datum� #%declare� #%expression�#%module-begin� #%plain-app�#%plain-lambda�#%plain-module-begin�#%printing-module-begin� #%provide� #%require�#%stratified-body�#%top�#%top-interaction�#%variable-reference�->�->*�->*m�->d�->dm�->i�->m�...�:do-in�==�=>�_�absent�abstract�all-defined-out� all-from-outr! �any�augment�augment*�
augment-final�augment-final*�augride�augride*r' �begin-for-syntax�begin0r# �case->�case->m� case-lambda�class�class*�class-field-accessor�class-field-mutator�class/c�
class/derived�
combine-in� combine-out� command-line�
compound-unit�compound-unit/inferr �cons/dc�contract� contract-out�contract-struct�
contractedr �define-compound-unit�define-compound-unit/infer�define-contract-struct�define-custom-hash-types�define-custom-set-types�define-for-syntax�define-local-member-name�
define-logger�define-match-expander�define-member-name� define-module-boundary-contract�define-namespace-anchor� define-opt/c�define-sequence-syntax�define-serializable-class�define-serializable-class*�define-signature�define-signature-form�
define-struct�define-struct/contract�define-struct/derived�
define-syntax�define-syntax-rule�define-syntaxes� define-unit�define-unit-binding�define-unit-from-context�define-unit/contract� define-unit/new-import-export�
define-unit/s�
define-values�define-values-for-export�define-values-for-syntax�define-values/invoke-unit� define-values/invoke-unit/infer�define/augment�define/augment-final�define/augride�define/contract�define/final-prop� define/match�define/overment�define/override�define/override-final�define/private�
define/public�define/public-final�define/pubment� define/subexpression-pos-prop�"define/subexpression-pos-prop/namer) �
delay/idle�
delay/name� delay/strict�
delay/sync� delay/threadr( r �except� except-in�
except-out�export�extends� failure-cont�false�false/c�field� field-bound?�file�flat-murec-contract�flat-rec-contractrH �for*�for*/and�
for*/async�
for*/first� for*/fold�for*/fold/derived� for*/hash� for*/hasheq� for*/hasheqv� for*/last� for*/list�
for*/lists�for*/mutable-set�for*/mutable-seteq�for*/mutable-seteqv�for*/or� for*/product�for*/set�
for*/seteq� for*/seteqv� for*/stream�for*/sum� for*/vector�
for*/weak-set�for*/weak-seteq�for*/weak-seteqv� for-label�for-meta�
for-syntax� for-template�for/and� for/async� for/first�for/fold�for/fold/derived�for/hash�
for/hasheq� for/hasheqv�for/last�for/list� for/lists�for/mutable-set�for/mutable-seteq�for/mutable-seteqv�for/or� for/product�for/set� for/seteq�
for/seteqv�
for/stream�for/sum�
for/vector� for/weak-set�for/weak-seteq�for/weak-seteqv�gen:custom-write�gen:dict�gen:equal+hash�gen:set�
gen:stream�generic� get-field�hash/dcr �impliesrO r �include-at/relative-to� include-at/relative-to/reader�include/reader�inherit�
inherit-field�
inherit/inner�
inherit/super�init� init-depend�
init-field� init-rest�inner�inspect� instantiate� interface�
interface*�invariant-assertion� invoke-unit�invoke-unit/inferr �lazyr$ �let*� let*-values�
let-syntax� let-syntaxes�
let-values�let/cc�let/ecr& �
letrec-syntax�letrec-syntaxes�letrec-syntaxes+values�
letrec-values�lib�link�local�
local-require� log-debug� log-error� log-fatal�log-info� log-warning�match�match*�match*/derived� match-define�match-define-values� match-lambda�
match-lambda*�match-lambda**� match-let�
match-let*�match-let*-values�match-let-values� match-letrec�match-letrec-values�
match/derived� match/values�member-name-key�mixin�module�module*�module+�nand�new�nor�object-contract�object/c�only�only-in� only-meta-in�open�opt/cr" �overment� overment*�override� override*�override-final�override-final*� parameterize�
parameterize*�parameterize-break�parametric->/c�place�place*�
place/context�planet�prefix� prefix-in�
prefix-out�private�private*� prompt-tag/c� protect-out�provide�provide-signature-elements�provide/contract�public�public*� public-final�
public-final*�pubment�pubment*r- � quasisyntax�quasisyntax/locr, � quote-syntax�quote-syntax/prune�recontract-out�recursive-contract� relative-in�rename� rename-in� rename-inner�
rename-out� rename-super�require�send�send*�send+� send-generic�
send/apply�send/keyword-apply�set!� set!-values�
set-field!�shared�stream�stream*� stream-cons�struct�struct*� struct-copy�struct-field-index�
struct-out�struct/c�
struct/ctc� struct/dc�submod�super�super-instantiate�super-make-object� super-new�syntax� syntax-case� syntax-case*�syntax-id-rules� syntax-rules�
syntax/loc�tag�this�this%�thunk�thunk*�time�unconstrained-domain->�unit�unit-from-context�unit/c�unit/new-import-export�unit/srN r. �unquote-splicing�unsyntax�unsyntax-splicing� values/droprM �with-continuation-mark�
with-contract� with-contract-continuation-mark�
with-handlers�with-handlers*� with-method� with-syntax� λr4 �*list/cr5 r6 r7 r8 �</c�<=�<=/cr: �=/cr; �>/c�>=�>=/c�abort-current-continuationr= �absolute-path?r> � add-between�add1� alarm-evt�
always-evt�and/c�andmapr? �any/cr@ �append*�
append-maprA �argmax�argmin�arithmetic-shift�arity-at-least�arity-at-least-value�arity-at-least?�arity-checking-wrapper�arity-includes?�arity=?�arrow-contract-info�#arrow-contract-info-accepts-arglist�'arrow-contract-info-chaperone-procedure�%arrow-contract-info-check-first-order�arrow-contract-info?rB �assfrC rD rE rF �bad-number-of-results�banner�
base->-doms/c�
base->-rngs/c�base->?� between/c� bitwise-and�bitwise-bit-field�bitwise-bit-set?� bitwise-ior� bitwise-not� bitwise-xor�blame-add-car-context�blame-add-cdr-context�blame-add-context�blame-add-missing-party�blame-add-nth-arg-context�blame-add-range-context�blame-add-unknown-context�
blame-context�blame-contract�blame-fmt->-string�blame-missing-party?�blame-negative�blame-original?�blame-positive�blame-replace-negative� blame-source�
blame-swap�blame-swapped?� blame-update� blame-value�blame?� boolean=?�boolean?�bound-identifier=?�box�box-cas!�
box-immutable�box-immutable/c�box/c�box?�
break-enabled�break-parameterization?� break-thread�!build-chaperone-contract-property�build-compound-type-name�build-contract-property� build-flat-contract-property�
build-list�
build-path�build-path/convention-type� build-string� build-vector� byte-pregexp�
byte-pregexp?� byte-ready?� byte-regexp� byte-regexp?�byte?�bytes�bytes->immutable-bytes� bytes->list� bytes->path�bytes->path-element�bytes->string/latin-1�bytes->string/locale�bytes->string/utf-8� bytes-append�
bytes-append*�bytes-close-converter�
bytes-convert�bytes-convert-end�bytes-converter?�
bytes-copy� bytes-copy!� bytes-environment-variable-name?� bytes-fill!�
bytes-join� bytes-length�bytes-no-nuls?�bytes-open-converter� bytes-ref�
bytes-set!�bytes-utf-8-index�bytes-utf-8-length�bytes-utf-8-ref�bytes<?�bytes=?�bytes>?�bytes?rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU �call-in-nested-thread� call-with-atomic-output-file� call-with-break-parameterization�!call-with-composable-continuation� call-with-continuation-barrier� call-with-continuation-prompt� call-with-current-continuation�*call-with-default-reading-parameterization� call-with-escape-continuation�call-with-exception-handler�call-with-file-lock/timeout�%call-with-immediate-continuation-mark�call-with-input-bytes�call-with-input-file�call-with-input-file*�call-with-input-string�call-with-output-bytes�call-with-output-file�call-with-output-file*�call-with-output-string�call-with-parameterization�call-with-semaphore� call-with-semaphore/enable-break�call-with-values�call/cc�call/ecr[ �cartesian-productr\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk � channel-get� channel-put�channel-put-evt�channel-put-evt?�channel-try-get� channel/c�channel?�
chaperone-box�chaperone-channel� chaperone-continuation-mark-key� chaperone-contract-property?�chaperone-contract?�
chaperone-evt�chaperone-hash�chaperone-hash-set�
chaperone-of?�chaperone-procedure�chaperone-procedure*�chaperone-prompt-tag�chaperone-struct�chaperone-struct-type�chaperone-vector�
chaperone?�
char->integer�char-alphabetic?� char-blank?�
char-ci<=?� char-ci<?� char-ci=?�
char-ci>=?� char-ci>?�
char-downcase�
char-foldcase�char-general-category�
char-graphic?�char-in� char-in/c�char-iso-control?�char-lower-case?�
char-numeric?�char-punctuation?� char-ready?�char-symbolic?�char-title-case?�char-titlecase� char-upcase�char-upper-case?�char-utf-8-length�char-whitespace?�char<=?�char<?�char=?�char>=?�char>?�char?�check-duplicate-identifier�check-duplicates�#checked-procedure-check-and-extract�
choice-evt�class->interface�
class-info�
class-seal� class-unseal�class?� cleanse-path�close-input-port�close-output-port�coerce-chaperone-contract�coerce-chaperone-contracts�coerce-contract�coerce-contract/f�coerce-contracts�coerce-flat-contract�coerce-flat-contracts�collect-garbage�collection-file-path�collection-path� combinations�compile� compile-allow-set!-undefined�$compile-context-preservation-enabled� compile-enforce-module-constants�compile-syntax� compiled-expression-recompile�compiled-expression?�compiled-module-expression?�complete-path?�complex?�compose�compose1�conjoin� conjugater� �cons/c�cons?�const�continuation-mark-key/c�continuation-mark-key?� continuation-mark-set->context�continuation-mark-set->list� continuation-mark-set->list*�continuation-mark-set-first�continuation-mark-set?�continuation-marks� continuation-prompt-available?�continuation-prompt-tag?�
continuation?� contract-continuation-mark-key�#contract-custom-write-property-proc�contract-exercise�contract-first-order� contract-first-order-passes?� contract-late-neg-projection�
contract-name�
contract-proc�contract-projection�contract-property?�contract-random-generate� contract-random-generate-fail� contract-random-generate-fail?�0contract-random-generate-get-current-environment� contract-random-generate-stash� contract-random-generate/choose�contract-stronger?�contract-struct-exercise�contract-struct-generate�#contract-struct-late-neg-projection� contract-struct-list-contract?� contract-val-first-projection� contract?�convert-stream�copy-directory/files� copy-file� copy-portr� �cosh�count�current-blame-format� current-break-parameterization�current-code-inspector� current-command-line-arguments�current-compile�current-compiled-file-roots�current-continuation-marks�current-contract-region�current-custodian�current-directory�current-directory-for-user�
current-drive� current-environment-variables�current-error-port� current-eval�#current-evt-pseudo-random-generator� current-force-delete-permissions�current-future�current-gc-milliseconds�"current-get-interaction-input-port� current-inexact-milliseconds�current-input-port�current-inspector� current-library-collection-links� current-library-collection-paths� current-load�current-load-extension� current-load-relative-directory�current-load/use-compiled�current-locale�current-logger�current-memory-use�current-milliseconds�current-module-declare-name� current-module-declare-source� current-module-name-resolver� current-module-path-for-load�current-namespace�current-output-port�current-parameterization�current-plumber�$current-preserved-thread-cell-values�
current-print� current-process-milliseconds�current-prompt-read� current-pseudo-random-generator�current-read-interaction�current-reader-guard�current-readtable�current-seconds�current-security-guard�!current-subprocess-custodian-mode�current-thread�current-thread-group�!current-thread-initial-stack-size� current-write-relative-directory�curry�curryr�custodian-box-value�custodian-box?�custodian-limit-memory�custodian-managed-list�&custodian-memory-accounting-available?�custodian-require-memory�custodian-shutdown-all�
custodian?� custom-print-quotable-accessor�custom-print-quotable?�custom-write-accessor�custom-write-property-proc�
custom-write?�date�date*�date*-nanosecond�date*-time-zone-name�date*?�date-day� date-dst?� date-hour� date-minute�
date-month� date-second�date-time-zone-offset�
date-week-day� date-year�
date-year-day�date?�
datum->syntax�datum-intern-literal� default-continuation-prompt-tag�degrees->radians�delete-directory�delete-directory/files� delete-filer� �
dict->list�dict-can-functional-set?�dict-can-remove-keys?�
dict-clear� dict-clear!� dict-copy�
dict-count� dict-empty?�
dict-for-each�
dict-has-key?�dict-implements/c�dict-implements?�dict-iter-contract�dict-iterate-first�dict-iterate-key�dict-iterate-next�dict-iterate-value�dict-key-contract� dict-keys�dict-map�
dict-mutable?�dict-ref� dict-ref!� dict-remove� dict-remove!�dict-set� dict-set!� dict-set*�
dict-set*!� dict-update� dict-update!�dict-value-contract� dict-values�dict?�directory-exists?�directory-list�disjoinr� �
display-lines�display-lines-to-file�display-to-file� displayln�double-flonum?rm �drop-common-prefix�
drop-right�dropf� dropf-right�dump-memory-stats�dup-input-port�dup-output-port�
dynamic->*�dynamic-get-field�dynamic-object/c�
dynamic-place�dynamic-place*�dynamic-require�dynamic-require-for-syntax� dynamic-send�dynamic-set-field!� dynamic-wind�eighth�empty�empty-sequence� empty-stream�empty?�environment-variables-copy�environment-variables-names�environment-variables-ref�environment-variables-set!�environment-variables?�eof�eof-evt� eof-object?�ephemeron-value�
ephemeron?�eprintf�eq-contract-val� eq-contract?� eq-hash-code�eq?�equal-contract-val�equal-contract?�equal-hash-code�equal-secondary-hash-code�equal<%>�equal?� equal?/recur�
eqv-hash-code�eqv?�error�error-display-handler�error-escape-handler�error-print-context-length�error-print-source-location�error-print-width�error-value->string-handlerr� �eval-jit-enabled� eval-syntax�even?�evt/c�evt?�exact->inexact�
exact-ceiling� exact-floor�exact-integer?�exact-nonnegative-integer?�exact-positive-integer?� exact-round�exact-truncate�exact?�executable-yield-handler�exit� exit-handler�exn�exn-continuation-marks� exn-message� exn:break�exn:break-continuation�exn:break:hang-up�exn:break:hang-up?�exn:break:terminate�exn:break:terminate?�
exn:break?�exn:fail�exn:fail:contract�exn:fail:contract:arity�exn:fail:contract:arity?�exn:fail:contract:blame� exn:fail:contract:blame-object�exn:fail:contract:blame?� exn:fail:contract:continuation� exn:fail:contract:continuation?� exn:fail:contract:divide-by-zero�!exn:fail:contract:divide-by-zero?�#exn:fail:contract:non-fixnum-result�$exn:fail:contract:non-fixnum-result?�exn:fail:contract:variable� exn:fail:contract:variable-id�exn:fail:contract:variable?�exn:fail:contract?�exn:fail:filesystem�exn:fail:filesystem:errno� exn:fail:filesystem:errno-errno�exn:fail:filesystem:errno?�exn:fail:filesystem:exists�exn:fail:filesystem:exists?�"exn:fail:filesystem:missing-module�'exn:fail:filesystem:missing-module-path�#exn:fail:filesystem:missing-module?�exn:fail:filesystem:version� exn:fail:filesystem:version?�exn:fail:filesystem?�exn:fail:network�exn:fail:network:errno� exn:fail:network:errno-errno�exn:fail:network:errno?�exn:fail:network?�exn:fail:object�exn:fail:object?�exn:fail:out-of-memory�exn:fail:out-of-memory?�
exn:fail:read�exn:fail:read-srclocs�exn:fail:read:eof�exn:fail:read:eof?�exn:fail:read:non-char�exn:fail:read:non-char?�exn:fail:read?�exn:fail:syntax�exn:fail:syntax-exprs� exn:fail:syntax:missing-module�#exn:fail:syntax:missing-module-path� exn:fail:syntax:missing-module?�exn:fail:syntax:unbound�exn:fail:syntax:unbound?�exn:fail:syntax?�exn:fail:unsupported�exn:fail:unsupported?�
exn:fail:user�exn:fail:user?� exn:fail?�exn:misc:match?�exn:missing-module-accessor�exn:missing-module?�exn:srclocs-accessor� exn:srclocs?�exn?r� �expand� expand-once�
expand-syntax�expand-syntax-once�expand-syntax-to-top-form�expand-to-top-form�expand-user-path� explode-pathr� �externalizable<%>�failure-result/c�false?� field-names�fifth� file->bytes�file->bytes-lines� file->lines�
file->list� file->string� file->value� file-exists?�file-name-from-path�file-or-directory-identity� file-or-directory-modify-seconds� file-or-directory-permissions�
file-position�file-position*� file-size�file-stream-buffer-mode�file-stream-port?�
file-truncate�filename-extension�filesystem-change-evt� filesystem-change-evt-cancel�filesystem-change-evt?�filesystem-root-listro �
filter-map�
filter-not�filter-read-input-port�find-executable-path�
find-files� find-library-collection-links� find-library-collection-paths�find-relative-path�find-system-path�findfrK �
first-or/c�fixnum?�
flat-contract�flat-contract-predicate�flat-contract-property?�flat-contract?�flat-named-contract�flatten�floating-point-bytes->real�flonum?r� � flush-output�
fold-files�foldl�foldr�for-eachr� �format�fourth�fprintf�free-identifier=?�free-label-identifier=?�free-template-identifier=?� free-transformer-identifier=?�fsemaphore-count�fsemaphore-post�fsemaphore-try-wait?�fsemaphore-wait� fsemaphore?�future�future?�futures-enabled?r� �generate-member-key�generate-temporaries� generic-set?�generic?�gensym�get-output-bytes�get-output-string�get-preference� get/build-late-neg-projection� get/build-val-first-projection�getenv�global-port-print-handler�group-by�group-execute-bit�group-read-bit�group-write-bit� guard-evt�
handle-evt� handle-evt?�
has-blame?�
has-contract?�hash�
hash->list�
hash-clear� hash-clear!� hash-copy�hash-copy-clear�
hash-count� hash-empty?�hash-eq?� hash-equal?� hash-eqv?�
hash-for-each�
hash-has-key?�hash-iterate-first�hash-iterate-key�hash-iterate-key+value�hash-iterate-next�hash-iterate-pair�hash-iterate-value� hash-keys�hash-map�hash-placeholder?�hash-ref� hash-ref!� hash-remove� hash-remove!�hash-set� hash-set!� hash-set*�
hash-set*!� hash-update� hash-update!� hash-values�
hash-weak?�hash/c�hash?�hasheq�hasheqv�identifier-binding�identifier-binding-symbol�identifier-label-binding� identifier-prune-lexical-context�!identifier-prune-to-source-module�)identifier-remove-from-definition-context�identifier-template-binding� identifier-transformer-binding� identifier?�identity�if/c� imag-part�
immutable?�impersonate-box�impersonate-channel�!impersonate-continuation-mark-key�impersonate-hash�impersonate-hash-set�impersonate-procedure�impersonate-procedure*�impersonate-prompt-tag�impersonate-struct�impersonate-vector�impersonator-contract?�impersonator-ephemeron�impersonator-of?�"impersonator-prop:application-mark�impersonator-prop:blame� impersonator-prop:contracted�)impersonator-property-accessor-procedure?�impersonator-property?�
impersonator?�implementation?�implementation?/c�in-bytes�in-bytes-lines�in-combinations�in-cycle�in-dict� in-dict-keys�
in-dict-pairs�in-dict-values� in-directory�in-hash� in-hash-keys�
in-hash-pairs�in-hash-values�in-immutable-hash�in-immutable-hash-keys�in-immutable-hash-pairs�in-immutable-hash-values�in-immutable-set�
in-indexed�in-input-port-bytes�in-input-port-chars�in-lines�in-list�in-mlist�in-mutable-hash�in-mutable-hash-keys�in-mutable-hash-pairs�in-mutable-hash-values�in-mutable-set� in-naturals� in-parallel�in-permutations�in-port� in-producer�in-range� in-sequences�in-set�in-slice� in-stream� in-string� in-syntax�in-value�in-values*-sequence�in-values-sequence� in-vector� in-weak-hash�in-weak-hash-keys�in-weak-hash-pairs�in-weak-hash-values� in-weak-set�inexact->exact�
inexact-real?�inexact?� infinite?�input-port-append� input-port?�
inspector?� instanceof/c�
integer->char�integer->integer-bytes�integer-bytes->integer�
integer-in�integer-length� integer-sqrt�integer-sqrt/remainder�integer?�interface->method-names�interface-extension?�
interface?�/internal-definition-context-binding-identifiers�%internal-definition-context-introduce� internal-definition-context-seal� internal-definition-context?�is-a?�is-a?/c�keyword->string�
keyword-apply� keyword<?�keyword?�keywords-match� kill-thread�last� last-pairr� r� �liberal-define-context?� link-exists?r� �list*�list*of� list->bytes�list->mutable-set�list->mutable-seteq�list->mutable-seteqv� list->set� list->seteq� list->seteqv� list->string� list->vector�list->weak-set�list->weak-seteq�list->weak-seteqv�list-contract?� list-prefix?�list-ref�list-set� list-tail� list-update�list/c�list?�listen-port-number?�listofr� �load-extension�load-on-demand-enabled�
load-relative�load-relative-extension�load/cd�load/use-compiled� local-expand�local-expand/capture-lifts�local-transformer-expand�&local-transformer-expand/capture-lifts�locale-string-encodingr� �log-all-levels�
log-level-evt�
log-level?�
log-max-level� log-message�
log-receiver?� logger-name�logger?r� �make-arity-at-least�make-base-empty-namespace�make-base-namespace�
make-bytes� make-channel�make-chaperone-contract�make-continuation-mark-key� make-continuation-prompt-tag�
make-contract�make-custodian�make-custodian-box�make-custom-hash�make-custom-hash-types�make-custom-set�make-custom-set-types� make-date�
make-date*�make-derived-parameter�make-directory�make-directory*�make-do-sequence�make-empty-namespace�make-environment-variables�make-ephemeron�make-exn�make-exn:break�make-exn:break:hang-up�make-exn:break:terminate�
make-exn:fail�make-exn:fail:contract� make-exn:fail:contract:arity� make-exn:fail:contract:blame�#make-exn:fail:contract:continuation�%make-exn:fail:contract:divide-by-zero�(make-exn:fail:contract:non-fixnum-result� make-exn:fail:contract:variable�make-exn:fail:filesystem� make-exn:fail:filesystem:errno� make-exn:fail:filesystem:exists�'make-exn:fail:filesystem:missing-module� make-exn:fail:filesystem:version�make-exn:fail:network�make-exn:fail:network:errno�make-exn:fail:object�make-exn:fail:out-of-memory�make-exn:fail:read�make-exn:fail:read:eof�make-exn:fail:read:non-char�make-exn:fail:syntax�#make-exn:fail:syntax:missing-module� make-exn:fail:syntax:unbound�make-exn:fail:unsupported�make-exn:fail:user�make-file-or-directory-link�make-flat-contract�make-fsemaphore� make-generic�!make-handle-get-preference-locked� make-hash�make-hash-placeholder� make-hasheq�make-hasheq-placeholder� make-hasheqv�make-hasheqv-placeholder�make-immutable-custom-hash�make-immutable-hash�make-immutable-hasheq�make-immutable-hasheqv�make-impersonator-property�make-input-port� make-input-port/read-to-peek�make-inspector�make-keyword-procedure�make-known-char-range-list�make-limited-input-port� make-list�make-lock-file-name�make-log-receiver� make-logger�make-mixin-contract�make-mutable-custom-set� make-none/c� make-object�make-output-port�make-parameter�make-parent-directory*�make-phantom-bytes� make-pipe�make-pipe-with-specials�make-placeholder� make-plumber�
make-polar�make-prefab-struct�make-primitive-class�make-proj-contract� make-pseudo-random-generator�make-reader-graph�make-readtable�make-rectangular�make-rename-transformer�make-resolved-module-path�make-security-guard�make-semaphore�make-set!-transformer�make-shared-bytes�make-sibling-inspector�make-special-comment� make-srcloc� make-string�make-struct-field-accessor�make-struct-field-mutator�make-struct-type�make-struct-type-property� make-syntax-delta-introducer�make-syntax-introducer�make-temporary-file�'make-tentative-pretty-print-output-port�make-thread-cell�make-thread-group� make-vector�
make-weak-box�make-weak-custom-hash�make-weak-custom-set�make-weak-hash�make-weak-hasheq�make-weak-hasheqv�make-will-executorr� �match-equality-test�matches-arity-exactly?r� �mcar�mcdr�mconsr� �member-name-key-hash-code�member-name-key=?�member-name-key?�memfr� r� � merge-input�method-in-interface?r� �mixin-contract�module->exports�module->imports�module->language-info�module->namespace�'module-compiled-cross-phase-persistent?�module-compiled-exports�module-compiled-imports� module-compiled-language-info�module-compiled-name�module-compiled-submodules�module-declared?�module-path-index-join�module-path-index-resolve�module-path-index-split�module-path-index-submodule�module-path-index?� module-path?�module-predefined?�module-provide-protected?r� �mpair?� mutable-set�
mutable-seteq�mutable-seteqv�n->th�nack-guard-evt�!namespace-anchor->empty-namespace�namespace-anchor->namespace�namespace-anchor?�namespace-attach-module�#namespace-attach-module-declaration�namespace-base-phase�namespace-mapped-symbols�namespace-module-identifier�namespace-module-registry�namespace-require�namespace-require/constant�namespace-require/copy� namespace-require/expansion-time� namespace-set-variable-value!� namespace-symbol->identifier�namespace-syntax-introduce� namespace-undefine-variable!�namespace-unprotect-module�namespace-variable-value�
namespace?�nan?�natural-number/c�negate� negative?� never-evt� new-∀/c� new-∃/cr� �ninth�non-empty-listof�non-empty-string?�none/c�normal-case-path�normalize-arity�normalize-path�normalized-arity?r� �not/c�null�null?�number->string�number?r� �object%�object->vector� object-info�object-interface� object-method-arity-includes?� object-name�object-or-false=?�object=?�object?�odd?�one-of/c�open-input-bytes�open-input-file�open-input-output-file�open-input-string�open-output-bytes�open-output-file�open-output-nowhere�open-output-string�or/c�order-of-magnitude�ormap�other-execute-bit�other-read-bit�other-write-bit� output-port?�pair?�parameter-procedure=?� parameter/c�
parameter?�parameterization?�parse-command-line� partition� path->bytes�path->complete-path�path->directory-path� path->string�path-add-suffix�path-convention-type�path-element->bytes�path-element->string�
path-element?�path-for-some-system?�path-list-string->path-list� path-only�path-replace-suffix� path-string?�path<?�path?�pathlist-closure� peek-byte�peek-byte-or-special�
peek-bytes� peek-bytes!�peek-bytes!-evt�peek-bytes-avail!�peek-bytes-avail!*�peek-bytes-avail!-evt� peek-bytes-avail!/enable-break�peek-bytes-evt� peek-char�peek-char-or-special� peek-string� peek-string!�peek-string!-evt�peek-string-evt�peeking-input-port� permutations�phantom-bytes?�pi�pi.f�pipe-content-length� place-break�
place-channel�place-channel-get�place-channel-put�place-channel-put/get�place-channel?�place-dead-evt�place-enabled?�
place-kill�place-location?�place-message-allowed?� place-sleep�
place-wait�place?�placeholder-get�placeholder-set!� placeholder?�plumber-add-flush!�plumber-flush-all� plumber-flush-handle-remove!�plumber-flush-handle?�plumber?�poll-guard-evt� port->bytes�port->bytes-lines� port->lines�
port->list� port->string�port-closed-evt� port-closed?�port-commit-peeked�port-count-lines!�port-count-lines-enabled�port-counts-lines?�port-display-handler�port-file-identity�port-file-unlock�port-next-location� port-number?�port-print-handler�port-progress-evt� port-provides-progress-evts?�port-read-handler�port-try-file-lock?�port-write-handler�port-writes-atomic?�port-writes-special?�port?� positive?� predicate/c�prefab-key->struct-type� prefab-key?�prefab-struct-key�preferences-lock-file-mode�pregexp�pregexp?�pretty-display�
pretty-format� pretty-print�"pretty-print-.-symbol-without-bars�#pretty-print-abbreviate-read-macros�pretty-print-columns� pretty-print-current-style-table�pretty-print-depth� pretty-print-exact-as-decimal� pretty-print-extend-style-table�pretty-print-handler�pretty-print-newline� pretty-print-post-print-hook�pretty-print-pre-print-hook�pretty-print-print-hook�pretty-print-print-line�pretty-print-remap-stylable� pretty-print-show-inexactness�pretty-print-size-hook�pretty-print-style-table?�pretty-printing� pretty-write�primitive-closure?�primitive-result-arity�
primitive?�print�print-as-expression�print-boolean-long-form� print-box� print-graph�print-hash-table�print-mpair-curly-braces�print-pair-curly-braces�print-reader-abbreviations� print-struct�print-syntax-width�print-unreadable�print-vector-length� printable/c� printable<%>�printf�println�procedure->method�procedure-arity�procedure-arity-includes/c�procedure-arity-includes?�procedure-arity?� procedure-closure-contents-eq?�procedure-extract-target�procedure-keywords�procedure-reduce-arity� procedure-reduce-keyword-arity�procedure-rename�procedure-result-arity�procedure-specialize�procedure-struct-type?�
procedure?�process�process*�process*/ports�
process/ports�processor-count�
progress-evt?�promise-forced?�promise-running?� promise/c�
promise/name?�promise?�prop:arity-string�prop:arrow-contract� prop:arrow-contract-get-info�prop:arrow-contract?�
prop:blame�prop:chaperone-contract�prop:checked-procedure�
prop:contract�prop:contracted�prop:custom-print-quotable�prop:custom-write� prop:dict�prop:dict/contract�prop:equal+hash�prop:evt�prop:exn:missing-module�prop:exn:srclocs�prop:expansion-contexts�prop:flat-contract�prop:impersonator-of�prop:input-port�prop:liberal-define-context�prop:object-name�prop:opt-chaperone-contract�$prop:opt-chaperone-contract-get-test� prop:opt-chaperone-contract?�prop:orc-contract�"prop:orc-contract-get-subcontracts�prop:orc-contract?�prop:output-port�prop:place-location�prop:procedure�prop:recursive-contract� prop:recursive-contract-unroll�prop:recursive-contract?�prop:rename-transformer�
prop:sequence�prop:set!-transformer� prop:stream�proper-subset?� pseudo-random-generator->vector� pseudo-random-generator-vector?�pseudo-random-generator?�put-preferences�putenvr� �quotient/remainder�radians->degrees�raise�raise-argument-error�raise-arguments-error�raise-arity-error�raise-blame-error�raise-contract-error�raise-mismatch-error�raise-not-cons-blame-error�raise-range-error�raise-result-error�raise-syntax-error�raise-type-error�raise-user-error�random� random-seed�range� rational?r� r� �read-accept-bar-quote�read-accept-box�read-accept-compiled�read-accept-dot�read-accept-graph�read-accept-infix-dot�read-accept-lang�read-accept-quasiquote�read-accept-reader� read-byte�read-byte-or-special�
read-bytes� read-bytes!�read-bytes!-evt�read-bytes-avail!�read-bytes-avail!*�read-bytes-avail!-evt� read-bytes-avail!/enable-break�read-bytes-evt�read-bytes-line�read-bytes-line-evt�read-case-sensitive� read-cdot� read-char�read-char-or-special�read-curly-brace-as-paren�read-curly-brace-with-tag�read-decimal-as-inexact�read-eval-print-loop�
read-language� read-line�
read-line-evt�read-on-demand-source� read-square-bracket-as-paren� read-square-bracket-with-tag� read-string� read-string!�read-string!-evt�read-string-evt� read-syntax�read-syntax/recursive�read/recursive�readtable-mapping�
readtable?�real->decimal-string�real->double-flonum�real->floating-point-bytes�real->single-flonum�real-in� real-part�real?�reencode-input-port�reencode-output-port�regexp� regexp-match�
regexp-match*�regexp-match-evt�regexp-match-exact?�regexp-match-peek�regexp-match-peek-immediate�regexp-match-peek-positions� regexp-match-peek-positions*�%regexp-match-peek-positions-immediate�)regexp-match-peek-positions-immediate/end� regexp-match-peek-positions/end�regexp-match-positions�regexp-match-positions*�regexp-match-positions/end�regexp-match/end�
regexp-match?�regexp-max-lookbehind� regexp-quote�regexp-replace�regexp-replace*�regexp-replace-quote�regexp-replaces� regexp-split�regexp-try-match�regexp?�relative-path?�relocate-input-port�relocate-output-portr� �remf�remf*r{ �remove*�remove-duplicates�remq�remq*�remv�remv*�rename-contract�rename-file-or-directory�rename-transformer-target�rename-transformer?� replace-evt� reroot-path� resolve-path�resolved-module-path-name�resolved-module-path?rL r� r� �second�
seconds->date�security-guard?�semaphore-peek-evt�semaphore-peek-evt?�semaphore-post�semaphore-try-wait?�semaphore-wait�semaphore-wait/enable-break�
semaphore?�sequence->list�sequence->stream�sequence-add-between�sequence-andmap�sequence-append�sequence-count�sequence-filter�
sequence-fold�sequence-for-each�sequence-generate�sequence-generate*�sequence-length� sequence-map�sequence-ormap� sequence-ref�
sequence-tail�
sequence/c� sequence?�set�set!-transformer-procedure�set!-transformer?� set->list� set->stream�set-add�set-add!�set-box!� set-clear�
set-clear!�set-copy�set-copy-clear� set-count�
set-empty?�set-eq?�
set-equal?�set-eqv?� set-first� set-for-each�set-implements/c�set-implements?�
set-intersect�set-intersect!�set-map� set-mcar!� set-mcdr!� set-member?� set-mutable?�set-phantom-bytes!�set-port-next-location!�
set-remove� set-remove!�set-rest�set-some-basic-contracts!� set-subtract�
set-subtract!�set-symmetric-difference�set-symmetric-difference!� set-union�
set-union!� set-weak?�set/c�set=?�set?�seteq�seteqv�seventh�sgn� shared-bytes�
shell-execute�shrink-path-wrt�shuffle�simple-form-path�
simplify-pathr� �single-flonum?�sinh�sixth�skip-projection-wrapper?�sleep�some-system-path->string�sort�special-comment-value�special-comment?�special-filter-input-port�split-at�split-at-right�split-common-prefix�
split-path� splitf-at�splitf-at-right�sqrr� �srcloc�srcloc->string�
srcloc-column� srcloc-line�srcloc-position�
srcloc-source� srcloc-span�srcloc?�
stop-after� stop-before� stream->list�stream-add-between�
stream-andmap�
stream-append� stream-count�
stream-empty?�
stream-filter� stream-first� stream-fold�stream-for-each�
stream-length�
stream-map� stream-ormap�
stream-ref� stream-rest� stream-tail�stream/c�stream?r� �string->bytes/latin-1�string->bytes/locale�string->bytes/utf-8�string->immutable-string�string->keyword� string->list�string->number� string->path�string->path-element�string->some-system-path�string->symbol�string->uninterned-symbol�string->unreadable-symbol�
string-append�string-append*� string-ci<=?� string-ci<?� string-ci=?� string-ci>=?� string-ci>?�string-contains?� string-copy� string-copy!�string-downcase�!string-environment-variable-name?� string-fill!�string-foldcase� string-join� string-len/c�
string-length�string-locale-ci<?�string-locale-ci=?�string-locale-ci>?�string-locale-downcase�string-locale-upcase�string-locale<?�string-locale=?�string-locale>?�string-no-nuls?�string-normalize-nfc�string-normalize-nfd�string-normalize-nfkc�string-normalize-nfkd�string-normalize-spaces� string-port?�string-prefix?�
string-ref�string-replace� string-set!� string-split�string-suffix?�string-titlecase� string-trim�
string-upcase�string-utf-8-length� string<=?�string<?�string=?� string>=?�string>?�string?�struct->vector�struct-accessor-procedure?� struct-constructor-procedure?� struct-info�struct-mutator-procedure?�struct-predicate-procedure?�struct-type-info� struct-type-make-constructor�struct-type-make-predicate�(struct-type-property-accessor-procedure?�struct-type-property/c�struct-type-property?� struct-type?�struct:arity-at-least�struct:arrow-contract-info� struct:date� struct:date*�
struct:exn�struct:exn:break�struct:exn:break:hang-up�struct:exn:break:terminate�struct:exn:fail�struct:exn:fail:contract� struct:exn:fail:contract:arity� struct:exn:fail:contract:blame�%struct:exn:fail:contract:continuation�'struct:exn:fail:contract:divide-by-zero�*struct:exn:fail:contract:non-fixnum-result�!struct:exn:fail:contract:variable�struct:exn:fail:filesystem� struct:exn:fail:filesystem:errno�!struct:exn:fail:filesystem:exists�)struct:exn:fail:filesystem:missing-module�"struct:exn:fail:filesystem:version�struct:exn:fail:network� struct:exn:fail:network:errno�struct:exn:fail:object� struct:exn:fail:out-of-memory�struct:exn:fail:read�struct:exn:fail:read:eof� struct:exn:fail:read:non-char�struct:exn:fail:syntax�%struct:exn:fail:syntax:missing-module� struct:exn:fail:syntax:unbound�struct:exn:fail:unsupported�struct:exn:fail:user�
struct:srcloc� struct:wrapped-extra-arg-arrow�struct?�sub1�subbytes� subclass?� subclass?/c�
subprocess�subprocess-group-enabled�subprocess-kill�subprocess-pid�subprocess-status�subprocess-wait� subprocess?�subset?r� � suggest/c�symbol->string�symbol-interned?�symbol-unreadable?�symbol<?�symbol=?�symbol?�symbols�sync�sync/enable-break� sync/timeout�sync/timeout/enable-break�
syntax->datum� syntax->list�
syntax-arm�
syntax-column�syntax-debug-info�
syntax-disarm�syntax-e� syntax-line�syntax-local-bind-syntaxes�syntax-local-certifier�syntax-local-context� syntax-local-expand-expression�syntax-local-get-shadower�"syntax-local-identifier-as-binding�syntax-local-introduce�syntax-local-lift-context� syntax-local-lift-expression�syntax-local-lift-module�(syntax-local-lift-module-end-declaration�syntax-local-lift-provide�syntax-local-lift-require�#syntax-local-lift-values-expression�$syntax-local-make-definition-context�"syntax-local-make-delta-introducer�'syntax-local-module-defined-identifiers�syntax-local-module-exports�(syntax-local-module-required-identifiers�syntax-local-name�syntax-local-phase-level�syntax-local-submodules�*syntax-local-transforming-module-provides?�syntax-local-value� syntax-local-value/immediate�syntax-original?�syntax-position�syntax-property�syntax-property-preserved?�syntax-property-symbol-keys�syntax-protect� syntax-rearm�syntax-recertify�syntax-shift-phase-level�
syntax-source�syntax-source-module� syntax-span� syntax-taint�syntax-tainted?�syntax-track-origin�&syntax-transforming-module-expression?� syntax-transforming-with-lifts?�syntax-transforming?�syntax/c�syntax?�system�system*�system*/exit-code�system-big-endian?�system-idle-evt�system-language+country�system-library-subpath�system-path-convention-type� system-type�system/exit-code�tail-marks-match?r~ �take-common-prefix�
take-right�takef� takef-rightr� �tanh�tcp-abandon-port�
tcp-accept�tcp-accept-evt�tcp-accept-ready?�tcp-accept/enable-break�
tcp-addresses� tcp-close� tcp-connect�tcp-connect/enable-break�
tcp-listen�
tcp-listener?� tcp-port?�"tentative-pretty-print-port-cancel�$tentative-pretty-print-port-transfer�tenth�terminal-port?�the-unsupplied-arg�third�thread�thread-cell-ref�thread-cell-set!�thread-cell-values?� thread-cell?�thread-dead-evt� thread-dead?�
thread-group?�thread-receive�thread-receive-evt�
thread-resume�thread-resume-evt�thread-rewind-receive�thread-running?� thread-send�thread-suspend�thread-suspend-evt�thread-try-receive� thread-wait�thread/suspend-to-kill�thread?�
time-apply�touch�transplant-input-port�transplant-output-port�truer� �
udp-addresses� udp-bind!�
udp-bound?� udp-close� udp-connect!�udp-connected?�udp-multicast-interface�udp-multicast-join-group!�udp-multicast-leave-group!�udp-multicast-loopback?� udp-multicast-set-interface!�udp-multicast-set-loopback!�udp-multicast-set-ttl!�udp-multicast-ttl�udp-open-socket� udp-receive!�
udp-receive!*�udp-receive!-evt�udp-receive!/enable-break�udp-receive-ready-evt�udp-send� udp-send*� udp-send-evt�udp-send-ready-evt� udp-send-to� udp-send-to*�udp-send-to-evt�udp-send-to/enable-break�udp-send/enable-break�udp?�unbox�uncaught-exception-handler�unit?�unspecified-dom�unsupplied-arg?�use-collection-link-paths�use-compiled-file-paths� use-user-specific-search-paths�user-execute-bit�
user-read-bit�user-write-bit� value-blame�value-contractr� �#variable-reference->empty-namespace�%variable-reference->module-base-phase�0variable-reference->module-declaration-inspector�%variable-reference->module-path-index�!variable-reference->module-source� variable-reference->namespace�variable-reference->phase�(variable-reference->resolved-module-path� variable-reference-constant?�variable-reference?r� �vector->immutable-vector� vector->list� vector->pseudo-random-generator� vector->pseudo-random-generator!�vector->values�
vector-append�
vector-argmax�
vector-argmin� vector-copy� vector-copy!� vector-count� vector-drop�vector-drop-right� vector-fill!�
vector-filter�vector-filter-not�vector-immutable�vector-immutable/c�vector-immutableof�
vector-length�
vector-map� vector-map!�
vector-member� vector-memq� vector-memv�
vector-ref� vector-set!� vector-set*!� vector-set-performance-stats!�vector-split-at�vector-split-at-right� vector-take�vector-take-right�vector/c�vector?�vectorof�version�void�void?�weak-box-value� weak-box?�weak-set�
weak-seteq� weak-seteqv� will-execute�will-executor?�
will-register�will-try-execute�with-input-from-bytes�with-input-from-file�with-input-from-string�with-output-to-bytes�with-output-to-file�with-output-to-string�would-be-future�wrap-evt�wrapped-extra-arg-arrow�0wrapped-extra-arg-arrow-extra-neg-party-argument�!wrapped-extra-arg-arrow-real-func�wrapped-extra-arg-arrow?� writable<%>r� �
write-byte� write-bytes�write-bytes-avail�write-bytes-avail*�write-bytes-avail-evt� write-bytes-avail/enable-break�
write-char�
write-special�write-special-avail*�write-special-evt� write-string�
write-to-file�writeln�xor�zero?�~.a�~.s�~.v�~a�~e�~r�~s�~vz[([{]z[)\]}]z()[\]{}",\'`;\sz%(?u)(?:\|[^|]*\||\\[\w\W]|[^|\\%s]+)+z(?:#e)?(?:#d)?(?:#e)?z(?:[defls][-+]?\d+)z (?:\d+(?:/\d+|\.\d*)?|\.\d+)z>(?:%s|(?:\d+#+(?:\.#*|/\d+#*)?|\.\d+#+|\d+(?:\.\d*#+|/\d+#+)))z (?:%s%s?)z(?:(?:inf|nan)\.[0f])z(?:[-+]?%s|[-+]%s)z (?:%s|%s)z(?!\Z)�unquoted-datumz(?s)#;|#*u ;[^\n\r
]*z#\|z
block-commentz(?u)\s+z(?i)%s[-+]?\d+(?=[%s])�#popz9(?i)%s[-+]?(\d+(\.\d*)?|\.\d+)([deflst][-+]?\d+)?(?=[%s])z+(?i)%s[-+]?(%s([-+]%s?i)?|[-+]%s?i)(?=[%s])z/(?i)(#d)?(%s([-+]%s?i)?|[-+]%s?i|%s@%s)(?=[%s])z1(?i)(([-+]?%st[-+]?\d+)|[-+](inf|nan)\.t)(?=[%s])z(?i)(#[ei])?#b%sz(?i)(#[ei])?#o%sz(?i)(#[ei])?#x%sz
(?i)(#d)?#i%sz#?"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])z#:%sz(#lang |#!)(\S+)z#reader� quoted-datumz (?i)\.(?=[%s])|#c[is]|#['`]|#,@?z '|#[s&]|#hash(eqv?)?|#\d*(?=%s)z`|,@?z[|\\]�datumz
quote(?=[%s])r: �quasiquoted-datumzquasiquote(?=[%s])�
unquoted-listz(?u)z(?=[%s]))r� r� zdatum*z,@?zunquote(-splicing)?(?=[%s])�quasiquoted-list� quoted-listz#pushz\|#z[^#|]+|.�"zG(?s)\\([0-7]{1,3}|x[\da-fA-F]{1,2}|u[\da-fA-F]{1,4}|U[\da-fA-F]{1,8}|.)z[^\\"]+) r r�
zdatum*r� zunquoted-datumz
unquoted-listzquasiquoted-datumzquasiquoted-listz quoted-datumz quoted-listz
block-commentr� N(~ r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r! r� r� r� r� r� r� r� r' r� r� r# r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r� r� r� r� r� r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r) r� r� r� r� r� r( r r� r� r� r� r� r� r� r� r r r r r rH r r r r r r
r r r
r r r r r r r r r r r r r r r r r r r r! r" r# r$ r% r& r' r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC r rD rO r rE rF rG rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU rV rW r rX r$ rY rZ r[ r\ r] r^ r_ r& r` ra rb rc rd re rf rg rh ri rj rk rl rm rn ro rp rq rr rs rt ru rv rw rx ry rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r" r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r- r� r� r, r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� rN r. r� r� r� r� rM r� r� r� r� r� r� r� r� (� r4 r� r5 r6 r7 r8 r� r� r� r: r� r; r� r� r� r� r= r� r> r� r� r� r� r� r� r? r� r@ r r rA r r r r r r r r r
r r r
r r rB r rC rD rE rF r r r r r r r r r r r r r r r r r! r" r# r$ r% r& r' r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU rl rm rn ro rp rq rr rs rt ru rv rw rx ry rz r{ r| r} r~ r r� r� r� r� r� r� r[ r� r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r r r r r r r r r r
r r� r r
r r r r r r r r r r r r r r r r r r r r! r" r# r$ r% r& r' r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk r� rl rm rn ro rp rq rr rs rt ru rv rw rx ry rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� rm r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r r r r r r r r r r
r r r
r r r r r r r r r r r r r r r r r r r r! r" r# r$ r% r� r& r' r( r) r* r+ r, r- r� r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF rG rH ro rI rJ rK rL rM rN rO rP rQ rR rK rS rT rU rV rW rX rY rZ r[ r\ r� r] r^ r_ r` ra r� rb rc rd re rf rg rh ri rj rk rl rm rn ro rp r� rq rr rs rt ru rv rw rx ry rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r r r r r r r r r r
r r r
r r r r r r r r r r r r r r r r r r r r� r� r! r" r� r# r$ r% r& r' r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r� r; r< r= r> r? r@ rA rB rC rD rE r� rF rG rH rI rJ rK rL rM r� rN rO rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk rl rm rn ro rp rq rr rs rt ru rv rw rx ry rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r r r r r r r r r r
r r r� r
r r r r r r r r� r r r r r r� r r r r r r r r! r" r# r$ r% r& r' r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk rl rm rn ro rp rq rr rs rt ru rv rw rx ry rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r r r r r r r r r r
r� r r r
r r r r r r r r r r r r r r r r r� r� r r r r! r" r# r$ r% r& r' r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk rl rm rn ro r� rp rq r{ rr rs rt ru rv rw rx ry rz r{ r| r} r~ r r� rL r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r r r r r r r r r r
r r r
r r r r r r r r r r r r r r r r r r r r! r" r# r$ r% r& r' r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk rl rm rn ro rp rq rr rs rt ru rv rw rx ry r� rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r~ r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r!
r� r"
r#
r$
r%
r&
r'
r(
r)
r*
r+
r� r,
r-
r.
r/
r0
r1
r2
r3
r4
r5
r6
r7
r8
r9
r:
r;
r<
r=
r>
r?
r@
rA
rB
rC
rD
rE
rF
rG
rH
rI
rJ
rK
rL
rM
rN
rO
rP
rQ
rR
rS
rT
rU
rV
rW
rX
rY
rZ
r[
r\
r]
r^
r_
r`
ra
rb
rc
rd
re
rf
rg
rh
r� ri
rj
rk
rl
rm
rn
ro
rp
rq
rr
rs
rt
ru
rv
rw
rx
ry
rz
r{
r|
r}
r~
r
)r�
r� )r�
r�
)r�
r�
)r�
r�
)r�
r�
)r�
r�
)r�
r�
)r�
r�
)r�
r�
)r�
r�
)6r r
r r r
r r r � _keywords� _builtinsZ_opening_parenthesisZ_closing_parenthesisZ _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 r r r
r r rD rE rF r �DoubleZHeredocr ZRegexr r r
r� r � Namespacer r r r r r r �Escaper r r r r r � s�
c � @ s e Zd ZdZdZdgZdddgZddgZej ej
B ej B Z �d�Z
�d�Z�d�ejf�d�ejf�d�ejf�d�ef�d�ef�d�e�d�f�d�e�d�f�d�efee
�d��d��ef�d�e ejfeejf�d�efg �d�e�d�f�d�e�d�f�d�efg�d�e�d�fg�d��Z�d�S (� r zd
For `newLISP. <www.newlisp.org>`_ source code (version 10.3.0).
.. versionadded:: 1.5
ZNewLispZnewlispz*.lspz*.nlz*.kifztext/x-newlispzapplication/x-newlisp�^�--r6 r9 �!�!=�?�@r4 r7 �&�%r5 �++r8 �<<�<=r: r; �>=�>>r� rW �$�$0�$1�$10�$11�$12�$13�$14�$15�$2�$3�$4�$5�$6�$7�$8�$9�$args�$idx�$it�
$main-args�abortr= r> �acosh�add�address�ambr! � append-filer@ rA �args�
array-list�array?�arrayrB �asinhrC rF �atan2�atanh�atom?�
base64-dec�
base64-enc� bayes-query� bayes-trainr' �beta�betai�bind�binomial�bits�callbackr# �catch�ceil�
change-dir�char�chopr2 �clean�close�
command-eventr r� �constant�context?�context� copy-file�copyr� r r
�cpymem�crc32� crit-chi2�crit-z� current-linerF � date-list�
date-parse�
date-valuerU �debugrk �def-newr � define-macror � delete-file�
delete-url�delete�destroy�det�device�
difference�
directory?� directory�div�do-until�do-while�doargs�dolist�dostring�dotimes�dotree�dump�dup�empty?�encrypt� ends-with�env�erf� error-event� eval-stringr� �exec�existsr� r� r& �explode�extend�factor�fft� file-info�file?ro �find-all�findrK �flat�float?�floatr� �fltrh �for-allrH �forkrb �fv�gammai�gammalnr� �get-char� get-float�get-int�get-long�
get-string�get-url�global?�global�if-notr �ifftrO rp r5 �inf?�int�integer?�integer� intersect�invert�irrr � lambda-macro�lambda?r �
last-errorr �legal?r� r$ �letex�letn�list?r� r� rf r� �lookup�
lower-case�macro?� main-args�MAIN�make-dirr� �matrm r� r� r� �modr �mul�multiply�NaN?�
net-accept� net-close� net-connect� net-error�net-eval�
net-interface�net-ipv�
net-listen� net-local�
net-lookup�
net-packet�net-peek�net-peer�net-ping�net-receive-from�net-receive-udp� net-receive�
net-select� net-send-to� net-send-udp�net-send� net-service� net-sessionsr� �nil?�nil�normalr� �now�nper�npvrw �null?�number?r� r" �ostype�pack�
parse-date�parse�peek�pipe�pmt� pop-assoc�pop�post-url�powr� � pretty-print�
primitive?r� r� � prob-chi2�prob-zr� � prompt-event�
protected?�push�put-url�pv�quote?r, �randr � randomizer� � read-char� read-expr� read-file�read-key� read-line� read-utf8� reader-event� real-path�receive�ref-all�ref�
regex-comp�regex�
remove-dir� rename-file�replace�resetrL r� �rotater� �save�search�seed�seek�selectr/ � semaphorer� �sequence�series�
set-locale� set-ref-all�set-refr� �setf�setqr� �share�signal�silentr� r� r� rR r� �source�spawnr� � starts-with�string?r� �sub�swap�sym�symbol?r� r� � sys-error�sys-infor� r� �term� throw-error�throw� time-of-dayr� �timer�
title-case�trace-highlight�trace� transpose�Tree�trim�true?r� �unicode�unify�uniquerN �unpack�until�
upper-case�utf8�utf8len�uuid�wait-pidrM r` r� �
write-char�
write-file�
write-line�
xfer-event� xml-error� xml-parse�
xml-type-tags�zero?z$([\w!$%&*+.,/<=>?@^~|-])+|(\[.*?\])+z#!(.*?)$z;.*$z#.*$z\s+z"(\\\\|\\"|[^"])*"z\{� bracestringz \[text\]*� tagstringz('|:)z\b)r� z(?<=\()z(\(|\))z#pushz\}z#popz[^{}]+z(?s)(.*?)(\[/text\]))r r� r� N(� r�
r�
r6 r9 r�
r�
r�
r�
r4 r7 r�
r�
r5 r�
r8 r�
r�
r: r; r�
r�
r� rW r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r= r> r�
r�
r�
r�
r! r�
r@ rA r�
r�
r�
r�
rB r�
rC rF r�
r�
r�
r�
r�
r�
r�
r' r�
r�
r�
r�
r�
r�
r# r�
r�
r�
r�
r�
r2 r�
r�
r�
r r� r�
r�
r�
r�
r�
r� r r
r�
r�
r�
r�
r�
rF r�
r�
r�
rU r�
rk r�
r r�
r r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r� r�
r�
r� r� r& r�
r�
r�
r�
r r ro r r rK r r r r� r rh r rH r rb r
r r r� r
r r r r r r r r r r rO rp r5 r r r r r r r r r r r r r r! r� r$ r" r# r$ r� r� rf r� r% r& r' r( r) r* r� r+ rm r� r� r� r, r r- r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF r� rG rH rI r� rJ rK rL rw rM rN r� r" rO rP rQ rR rS rT rU rV rW rX rY r� rZ r[ r� r� r\ r] r� r^ r_ r` ra rb rc r, rd r re r� rf rg rh ri rj rk rl rm rn ro rp rq rr rs rt ru rv rL r� rw r� rx ry rz r{ r| r/ r} r� r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� rR r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� rN r� r� r� r� r� r� r� rM r` r� r� r� r� r� r� r� r� r� ) r r
r r r
r r r r r; r< �UNICODEr= r r r rB r r r r r r
r r r r r r r r r r y s�
c @ s( e Zd ZdZdZdddgZdgZddgZej Z
d Z e d
Z d Z
d e e f Ze�d��Ze�d��Ze�d��Ze�d��Ze�d��Ze�d��Z�dѐd҄ Ze�dӃg�d�ef�d�ejf�d�e�d�f�d�ej f�d�e e j f�d�e ej f�d�e ej f�d�e f�d�e f�d�e
e!j"f�d�e
e!f�d�e
e!j#f�d�e$f�d�e ej f�d�e f�d�e j%f�d�e!j&f�d�e!j'f�d�e!j(f�d�e!f�d�e f�d�e f�d�e f�d�e
e j)f�d�e �d� e j*j+fee j*f�d�e �d�f�d�e$�d�f�d�e$�d�fg �d�ef�d�e ej f�d�ef�d�ef�d�ef�d�e�d�fg�d�Z,�d�S (� r z�
An ELisp lexer, parsing a stream and outputting the tokens
needed to highlight elisp code.
.. versionadded:: 2.1
Z EmacsLispZemacsZelispz
emacs-lispz*.elz text/x-elispzapplication/x-elispz\\.|[\w!$%&*+-/<=>?@^{}~|]z|[#.:]z(?=[ "()\]\'\n,;`])z((?:%s)(?:%s)*)�atomic-change-groupr# �block�cl-block�cl-callf� cl-callf2�cl-case�cl-decf�
cl-declaim�
cl-declare�cl-define-compiler-macro� cl-defmacro� cl-defstruct� cl-defsubst�
cl-deftype�cl-defun�cl-destructuring-bind�cl-do�cl-do*�cl-do-all-symbols�
cl-do-symbols� cl-dolist�
cl-dotimes�cl-ecase� cl-etypecase� eval-when� cl-eval-when�cl-flet�cl-flet*� cl-function�cl-incf� cl-labels�cl-letf�cl-letf*�cl-load-time-value�
cl-locally�cl-loop� cl-macrolet�cl-multiple-value-bind�cl-multiple-value-setq�cl-progv�cl-psetf�cl-psetq�
cl-pushnew�cl-remf� cl-return�cl-return-from�
cl-rotatef� cl-shiftf�cl-symbol-macrolet�
cl-tagbody�cl-the� cl-typecase�combine-after-change-calls�condition-case-unless-debug�decf�declaim�declare�declare-function�def-edebug-spec� defadvicerg � defcustom�defface�
defgeneric�defgroup�
define-advice�define-alternatives�define-compiler-macro�define-derived-mode�define-generic-mode�define-global-minor-mode� define-globalized-minor-mode�define-minor-mode�define-modify-macro�define-obsolete-face-alias� define-obsolete-function-alias� define-obsolete-variable-alias�define-setf-expander�define-skeletonrf � defmethod�defsetf� defstruct�defsubst�deftheme�deftypere � defvar-local�delay-mode-hooks�destructuring-bindr( �do*�do-all-symbols�
do-symbolsr�
� dont-compiler�
� dotimes-with-progress-reporter�ecase� ert-deftest� etypecase�eval-and-compile�eval-when-compile�flet�
ignore-errors�incf�labelsr r& � lexical-let� lexical-let*�loop�multiple-value-bind�multiple-value-setq�noreturn�oref� oref-default�oset� oset-default�pcase�pcase-defmacro� pcase-dolist�pcase-exhaustive� pcase-let�
pcase-let*rW �psetf�psetqr` �pushnewrp �return�rotatef�rx�save-match-data�save-selected-window�save-window-excursionr� �
setq-local�shiftf� track-mouse�typecaserN � use-packagerM �while-no-input�with-case-table�with-category-table�with-coding-priority�with-current-buffer�with-demoted-errors�with-eval-after-load�with-file-modes�with-local-quit�with-output-to-string�with-output-to-temp-buffer�with-parsed-tramp-file-name�with-selected-frame�with-selected-window�with-silent-modifications�
with-slots�with-syntax-table�with-temp-buffer�with-temp-file�with-temp-message� with-timeout� with-tramp-connection-property�with-tramp-file-property� with-tramp-progress-reporter�with-wrapper-hook�load-time-value�locally�macrolet�progv� return-fromr! r�
r �condition-case�defconst�defvar�functionr � interactiver$ �let*r" �prog1�prog2rP r, �save-current-buffer�save-excursion�save-restrictionr� � setq-default�
subr-arity�unwind-protectr` r�
r4 r5 r6 r7 �/=�1+�1-r8 �<=r: r; �>=�Snarf-documentation�abort-recursive-editr= �accept-process-output� access-file�accessible-keymapsr> �active-minibuffer-window�add-face-text-property�add-name-to-file�add-text-properties�all-completionsr@ rA �apropos-internal�aref�arrayp�aset�ashrB rC � assoc-stringrD rF �atom�autoload�autoload-do-load� backtrace�backtrace--locals�backtrace-debug�backtrace-eval�backtrace-frame�
backward-char�backward-prefix-chars�barf-if-buffer-read-only�base64-decode-region�base64-decode-string�base64-encode-region�base64-encode-string�beginning-of-line�#bidi-find-overridden-directionality�bidi-resolved-levels�
bitmap-spec-p�bobp�bolp� bool-vector� bool-vector-count-consecutive� bool-vector-count-population�bool-vector-exclusive-or�bool-vector-intersection�bool-vector-not�
bool-vector-p�bool-vector-set-difference�bool-vector-subsetp�bool-vector-union�boundp�buffer-base-buffer�buffer-chars-modified-tick�buffer-enable-undo�buffer-file-name�buffer-has-markers-at� buffer-list�
buffer-live-p�buffer-local-value�buffer-local-variables�buffer-modified-p�buffer-modified-tick� buffer-name� buffer-size�
buffer-string�buffer-substring� buffer-substring-no-properties�buffer-swap-text�bufferp�bury-buffer-internal� byte-code�byte-code-function-p�byte-to-position�byte-to-string� byteorder�call-interactively�call-last-kbd-macro� call-process�call-process-region�cancel-kbd-macro-events�
capitalize�capitalize-region�capitalize-wordr[ �car-less-than-car�car-safe� case-table-p�category-docstring�category-set-mnemonics�category-table�category-table-p� ccl-execute�ccl-execute-on-string�
ccl-program-prj �cdr-saferk �
char-after� char-before�char-category-set� char-charset�
char-equal�char-or-string-p�char-resolve-modifiers� char-syntax�char-table-extra-slot� char-table-p�char-table-parent�char-table-range�char-table-subtype�char-to-string�
char-width�
characterp�
charset-after�charset-id-internal�
charset-plist�charset-priority-list�charsetp�check-coding-system�check-coding-systems-region� clear-buffer-auto-save-failure�clear-charset-maps�clear-face-cache�clear-font-cache�clear-image-cache� clear-string�clear-this-command-keys�
close-font�clrhash�coding-system-aliases�coding-system-base�coding-system-eol-type�coding-system-p�coding-system-plist�coding-system-priority-list�coding-system-put�color-distance� color-gray-p�color-supported-p� combine-after-change-execute� command-error-default-function�command-remapping�commandp�compare-buffer-substrings�compare-strings� compare-window-configurations�completing-read�compose-region-internal�compose-string-internal�composition-get-gstring�compute-motion�concatr� �consp�constrain-to-field�continue-process�controlling-tty-p�coordinates-in-window-p�
copy-alist�copy-category-table� copy-file�copy-hash-table� copy-keymap� copy-marker�
copy-sequence�copy-syntax-table�copysignr� �current-active-maps� current-bidi-paragraph-direction�current-buffer�current-case-table�current-column�current-global-map�current-idle-time�current-indentation�current-input-mode�current-local-map�current-message�current-minor-mode-maps� current-time�current-time-string�current-time-zone� current-window-configuration�%cygwin-convert-file-name-from-windows�#cygwin-convert-file-name-to-windows�daemon-initialized�daemonp�dbus--init-bus�dbus-get-unique-name�dbus-message-internal�debug-timer-check�declare-equiv-charset�decode-big5-char� decode-char�decode-coding-region�decode-coding-string�decode-sjis-char� decode-time�default-boundp�default-file-modes�default-printer-name�default-toplevel-value�
default-value�define-category�define-charset-alias�define-charset-internal�define-coding-system-alias� define-coding-system-internal�define-fringe-bitmap�define-hash-table-test�
define-key�define-prefix-commandr�
�delete-all-overlays�delete-and-extract-region� delete-char�delete-directory-internal� delete-field� delete-file� delete-frame� delete-other-windows-internal�delete-overlay�delete-process�
delete-region�delete-terminal�delete-window-internal�delq�describe-buffer-bindings�describe-vector�destroy-fringe-bitmap�detect-coding-region�detect-coding-string�ding�directory-file-name�directory-files� directory-files-and-attributes�
discard-input�"display-supports-face-attributes-p� do-auto-save�
documentation�documentation-property�downcase�downcase-region�
downcase-word� draw-string� dump-colors�
dump-emacs� dump-face�dump-frame-glyph-matrix�dump-glyph-matrix�dump-glyph-row�dump-redisplay-history�dump-tool-bar-row�elt� emacs-pid�encode-big5-char� encode-char�encode-coding-region�encode-coding-string�encode-sjis-char� encode-time�
end-kbd-macro� end-of-line�eobp�eolp�eq�eql�equal�equal-including-properties� erase-buffer�error-message-stringr� � eval-buffer� eval-region�event-convert-list�execute-kbd-macro�exit-recursive-editr� �expand-file-namer� �external-debugging-output�face-attribute-relative-p�face-attributes-as-vector� face-font�fboundp�fceiling�fetch-bytecode�ffloor�field-beginning� field-end� field-string�field-string-no-properties�file-accessible-directory-p�file-acl�file-attributes�file-attributes-lessp�file-directory-p�file-executable-p�
file-exists-p�
file-locked-p�
file-modes�file-name-absolute-p�file-name-all-completions�file-name-as-directory�file-name-completion�file-name-directory�file-name-nondirectory�file-newer-than-file-p�file-readable-p�file-regular-p�file-selinux-context�file-symlink-p�file-system-info�file-writable-p� fillarray�find-charset-region�find-charset-string�#find-coding-systems-region-internal�find-composition-internal�find-file-name-handler� find-font� find-operation-coding-systemr �
float-time�floatpr� � fmakunbound�following-char�font-at�font-drive-otf�font-face-attributes�font-family-list�font-get�font-get-glyphs�font-get-system-font�font-get-system-normal-font� font-info� font-match-p�font-otf-alternates�font-put�font-shape-gstring� font-spec�font-variation-glyphs�font-xlfd-name�fontp� fontset-font� fontset-info� fontset-list�fontset-list-all�force-mode-line-update�force-window-updaterb �format-mode-line�format-network-address�format-time-string� forward-char�forward-comment� forward-line� forward-word�frame-border-width�frame-bottom-divider-width�.frame-can-run-window-configuration-change-hook�frame-char-height�frame-char-width�frame-face-alist�frame-first-window� frame-focus�frame-font-cache�frame-fringe-width�
frame-list� frame-live-p�frame-or-buffer-changed-p�frame-parameter�frame-parameters�frame-pixel-height�frame-pixel-width�frame-pointer-visible-p�frame-right-divider-width�frame-root-window�frame-scroll-bar-height�frame-scroll-bar-width�frame-selected-window�frame-terminal�frame-text-cols�frame-text-height�frame-text-lines�frame-text-width�frame-total-cols�frame-total-lines�frame-visible-p�framep�frexp�fringe-bitmaps-at-pos�fround�fset� ftruncate�funcall�funcall-interactively�function-equal� functionp� gap-position�gap-size�garbage-collect� gc-status�generate-new-buffer-namerQ �
get-buffer�get-buffer-create�get-buffer-process�get-buffer-window�get-byte�get-char-property� get-char-property-and-overlay�get-file-buffer�
get-file-char�get-internal-run-time�get-load-suffixes�get-pos-property� get-process�get-screen-color�get-text-property� get-unicode-property-internal�get-unused-category�get-unused-iso-final-char�getenv-internal�gethash�gfile-add-watch�gfile-rm-watch�global-key-binding�gnutls-available-p� gnutls-boot�
gnutls-bye�
gnutls-deinit�gnutls-error-fatalp�gnutls-error-string�
gnutls-errorp�gnutls-get-initstage�gnutls-peer-status�#gnutls-peer-status-warning-describe� goto-char�gpm-mouse-start�gpm-mouse-stop� group-gid�group-real-gid�handle-save-session�handle-switch-frame�hash-table-count� hash-table-p�hash-table-rehash-size�hash-table-rehash-threshold�hash-table-size�hash-table-test�hash-table-weakness�
iconify-framer� � image-flush� image-mask-p�image-metadata�
image-size�imagemagick-types�imagep� indent-to�indirect-function�indirect-variable�init-image-library�inotify-add-watch�inotify-rm-watch�input-pending-p�insert�insert-and-inherit�insert-before-markers�!insert-before-markers-and-inherit�insert-buffer-substring� insert-byte� insert-char�insert-file-contents�insert-startup-screen�int86�integer-or-marker-p�integerp�interactive-form�intern� intern-soft�internal--track-mouse�internal-char-font�internal-complete-buffer�internal-copy-lisp-face� internal-default-process-filter�!internal-default-process-sentinel� internal-describe-syntax-value�%internal-event-symbol-parse-modifiers� internal-face-x-get-resource� internal-get-lisp-face-attribute�#internal-lisp-face-attribute-values�internal-lisp-face-empty-p�internal-lisp-face-equal-p�internal-lisp-face-p�internal-make-lisp-face� internal-make-var-non-special� internal-merge-in-global-face�*internal-set-alternative-font-family-alist�,internal-set-alternative-font-registry-alist�!internal-set-font-selection-order� internal-set-lisp-face-attribute�.internal-set-lisp-face-attribute-from-resource�internal-show-cursor�internal-show-cursor-p�interrupt-process� invisible-p�invocation-directory�invocation-name�isnan� iso-charset� key-binding�key-description�keyboard-coding-system�
keymap-parent�
keymap-prompt�keymapp�keywordp�kill-all-local-variables� kill-buffer�
kill-emacs�kill-local-variable� kill-process�last-nonminibuffer-frame�
lax-plist-get�
lax-plist-put�ldexpr� �libxml-parse-html-region�libxml-parse-xml-region�line-beginning-position�line-end-position�line-pixel-heightr� �
list-fonts�list-system-processes�listpr� � load-average�local-key-binding�local-variable-if-set-p�local-variable-p� locale-info�locate-file-internal� lock-bufferr� �logand�logb�logior�lognot�logxor�
looking-at� lookup-image�lookup-image-map�
lookup-key� lower-frame�lsh� macroexpand�make-bool-vector�make-byte-code�make-category-set�make-category-table� make-char�make-char-table�make-directory-internal�make-frame-invisible�make-frame-visible�make-hash-table�make-indirect-buffer� make-keymap� make-list�make-local-variable� make-marker�make-network-process� make-overlay�make-serial-process�make-sparse-keymap� make-string� make-symbol�make-symbolic-link�make-temp-name�make-terminal-frame�make-variable-buffer-local�make-variable-frame-local� make-vector�
makunbound�map-char-table�map-charset-chars�
map-keymap�map-keymap-internal�mapatoms�mapc�mapcar� mapconcat�maphash� mark-marker�
marker-buffer�marker-insertion-type�marker-position�markerp�match-beginning�
match-data� match-end�matching-parenr� �max-char�md5r� � memory-info� memory-limit�memory-use-countsr� �memql�menu-bar-menu-at-x-y�menu-or-popup-active-p�merge-face-attribute�message� message-box�message-or-boxr� � minibuffer-completion-contents�minibuffer-contents�!minibuffer-contents-no-properties�minibuffer-depth�minibuffer-prompt�minibuffer-prompt-end�minibuffer-selected-window�minibuffer-window� minibufferp�minor-mode-key-bindingr, �modify-category-entry�modify-frame-parameters�modify-syntax-entry�mouse-pixel-position�mouse-position� move-overlay�move-point-visually�move-to-column�move-to-window-line�msdos-downcase-filename�msdos-long-file-names� msdos-memget� msdos-memput�msdos-mouse-disable�msdos-mouse-enable�msdos-mouse-init�
msdos-mouse-p� msdos-remember-default-colors�msdos-set-keyboard�msdos-set-mouse-buttons�multibyte-char-to-unibyte�multibyte-string-p�narrow-to-region�natnump�nconc�network-interface-info�network-interface-list� new-fontset�newline-cache-check�next-char-property-change�
next-frame�next-overlay-change�next-property-change� next-read-file-uses-dialog-p� next-single-char-property-change�next-single-property-change� next-window�nlistp�nreverserw �nthcdrr �number-or-marker-p�number-to-string�numberp�open-dribble-file� open-font�open-termscript�optimize-char-table� other-buffer�other-window-for-scrolling�overlay-buffer� overlay-end� overlay-get�
overlay-lists�overlay-properties� overlay-put�overlay-recenter�
overlay-start�overlayp� overlays-at� overlays-in�parse-partial-sexp�play-sound-internal� plist-get� plist-member� plist-put�point� point-marker� point-max�point-max-marker� point-min�point-min-marker�pos-visible-in-window-p�position-bytes�posix-looking-at�posix-search-backward�posix-search-forward�posix-string-match�
posn-at-point� posn-at-x-y�preceding-char�prefix-numeric-value� previous-char-property-change�previous-frame�previous-overlay-change�previous-property-change�$previous-single-char-property-change� previous-single-property-change�previous-window�prin1�prin1-to-string�princr� �process-attributes�process-buffer�process-coding-system�process-command�process-connection�process-contact�process-datagram-address�process-exit-status�process-filter�process-filter-multibyte-p�
process-id�"process-inherit-coding-system-flag� process-list� process-mark� process-name�
process-plist�process-query-on-exit-flag�process-running-child-p�process-send-eof�process-send-region�process-send-string�process-sentinel�process-status�process-tty-name� process-type�processp�profiler-cpu-log�profiler-cpu-running-p�profiler-cpu-start�profiler-cpu-stop�profiler-memory-log�profiler-memory-running-p�profiler-memory-start�profiler-memory-stop�
propertize�purecopy�put�put-text-property� put-unicode-property-internal�puthash�
query-font�
query-fontset� quit-process� raise-framer �rassoc�rassq�re-search-backward�re-search-forwardr� � read-buffer� read-char�read-char-exclusive�read-coding-system� read-command�
read-event�read-from-minibuffer�read-from-string�
read-function�read-key-sequence�read-key-sequence-vector�read-no-blanks-input�read-non-nil-coding-system� read-string�
read-variable�recent-auto-save-p�recent-doskeys� recent-keys�recenter�recursion-depth�recursive-edit�redirect-debugging-output�redirect-frame-focus� redisplay�redraw-display� redraw-frame� regexp-quote�region-beginning�
region-end�register-ccl-program� register-code-conversion-map�remhash� remove-list-of-text-properties�remove-text-properties�
rename-buffer� rename-file�
replace-match�reset-this-command-lengths�resize-mini-window-internal�restore-buffer-modified-p�
resume-ttyr� r� �run-hook-with-args� run-hook-with-args-until-failure� run-hook-with-args-until-success�run-hook-wrapped� run-hooks�$run-window-configuration-change-hook�run-window-scroll-functions� safe-length�
scan-lists�
scan-sexps� scroll-down� scroll-left�scroll-other-window� scroll-right� scroll-up�search-backward�search-forward� secure-hash� select-frame�
select-window�selected-frame�selected-window�self-insert-command�send-string-to-terminal� sequencep�serial-process-configurer� �
set-buffer�set-buffer-auto-saved�set-buffer-major-mode�set-buffer-modified-p�set-buffer-multibyte�set-case-table�set-category-table�set-char-table-extra-slot�set-char-table-parent�set-char-table-range�set-charset-plist�set-charset-priority�set-coding-system-priority�set-cursor-size� set-default�set-default-file-modes�set-default-toplevel-value� set-file-acl�set-file-modes�set-file-selinux-context�set-file-times�set-fontset-font�set-frame-height�set-frame-position�set-frame-selected-window�set-frame-size�set-frame-width�set-fringe-bitmap-face�set-input-interrupt-mode�set-input-meta-mode�set-input-mode�#set-keyboard-coding-system-internal�set-keymap-parent�
set-marker�set-marker-insertion-type�set-match-data�set-message-beep�set-minibuffer-window�set-mouse-pixel-position�set-mouse-position�set-network-process-option�set-output-flow-control�set-process-buffer�set-process-coding-system� set-process-datagram-address�set-process-filter� set-process-filter-multibyte�&set-process-inherit-coding-system-flag�set-process-plist� set-process-query-on-exit-flag�set-process-sentinel�set-process-window-size�
set-quit-char�(set-safe-terminal-coding-system-internal�set-screen-color�set-standard-case-table�set-syntax-table�#set-terminal-coding-system-internal�set-terminal-local-value�set-terminal-parameter�set-text-properties�set-time-zone-rule�set-visited-file-modtime�set-window-buffer� set-window-combination-limit�set-window-configuration�set-window-dedicated-p�set-window-display-table�set-window-fringes�set-window-hscroll�set-window-margins�set-window-new-normal�set-window-new-pixel�set-window-new-total�set-window-next-buffers�set-window-parameter�set-window-point�set-window-prev-buffers� set-window-redisplay-end-trigger�set-window-scroll-bars�set-window-start�set-window-vscroll�setcar�setcdr�setplist�show-face-resourcesr� �signal-processr� �single-key-description�skip-chars-backward�skip-chars-forward�skip-syntax-backward�skip-syntax-forward� sleep-forr� �
sort-charsets�special-variable-p�
split-char�split-window-internalr� �standard-case-table�standard-category-table�standard-syntax-table�start-kbd-macro�
start-process� stop-process�store-kbd-macro-eventr� �string-as-multibyte�string-as-unibyte� string-bytes�string-collate-equalp�string-collate-lessp� string-equal� string-lessp�string-make-multibyte�string-make-unibyte� string-match�string-to-char�string-to-multibyte�string-to-number�string-to-syntax�string-to-unibyte� string-width�stringp� subr-name�subrp�subst-char-in-region�substitute-command-keys�substitute-in-file-namer� �substring-no-properties�
suspend-emacs� suspend-tty�suspicious-object�sxhash�symbol-function� symbol-name� symbol-plist� symbol-value�symbolp� syntax-table�syntax-table-p�
system-groups�system-move-file-to-trash� system-name� system-usersr� �terminal-coding-system�
terminal-list�terminal-live-p�terminal-local-value�
terminal-name�terminal-parameter�terminal-parameters�terpri�test-completion�text-char-description�text-properties-at�text-property-any�text-property-not-all�this-command-keys�this-command-keys-vector�this-single-command-keys� this-single-command-raw-keys�time-add� time-less-p�
time-subtract�tool-bar-get-system-style�tool-bar-height�tool-bar-pixel-width� top-level�trace-redisplay�trace-to-stderr�translate-region-internal�transpose-regionsr� �try-completion�tty-display-color-cells�tty-display-color-p�tty-no-underline�(tty-suppress-bold-inverse-default-colors�
tty-top-frame�tty-type�type-of�
undo-boundary�unencodable-char-position� unhandled-file-name-directory�unibyte-char-to-multibyte�unibyte-string� unicode-property-table-internal�
unify-charset�unintern� unix-sync�
unlock-buffer�upcase�upcase-initials�upcase-initials-region�
upcase-region� upcase-word�use-global-map�
use-local-map�user-full-name�user-login-name�user-real-login-name�
user-real-uid�user-uid�variable-binding-locus�vconcatr� �vector-or-char-table-p�vectorp�verify-visited-file-modtime�vertical-motion�visible-frame-list�visited-file-modtime�w16-get-clipboard-data�w16-selection-exists-p�w16-set-clipboard-data�w32-battery-status�w32-default-color-map�w32-define-rgb-color�#w32-display-monitor-attributes-list�w32-frame-menu-bar-size�w32-frame-rect�w32-get-clipboard-data�w32-get-codepage-charset�w32-get-console-codepage� w32-get-console-output-codepage�w32-get-current-locale-id�w32-get-default-locale-id�w32-get-keyboard-layout�w32-get-locale-info�w32-get-valid-codepages� w32-get-valid-keyboard-layouts�w32-get-valid-locale-ids�w32-has-winsock�w32-long-file-name�w32-reconstruct-hot-key�w32-register-hot-key�w32-registered-hot-keys�w32-selection-exists-p�w32-send-sys-command�w32-set-clipboard-data�w32-set-console-codepage� w32-set-console-output-codepage�w32-set-current-locale�w32-set-keyboard-layout�w32-set-process-priority�w32-shell-execute�w32-short-file-name�w32-toggle-lock-key�w32-unload-winsock�w32-unregister-hot-key�w32-window-exists-p�w32notify-add-watch�w32notify-rm-watch�waiting-for-user-input-p�where-is-internal�widen� widget-apply�
widget-get�
widget-put�window-absolute-pixel-edges� window-at�window-body-height�window-body-width�window-bottom-divider-width�
window-buffer�window-combination-limit�window-configuration-frame�window-configuration-p�window-dedicated-p�window-display-table� window-edges�
window-end� window-frame�window-fringes�window-header-line-height�window-hscroll�"window-inside-absolute-pixel-edges�window-inside-edges�window-inside-pixel-edges�window-left-child�window-left-column�window-line-height� window-list�
window-list-1�
window-live-p�window-margins�window-minibuffer-p�window-mode-line-height�window-new-normal�window-new-pixel�window-new-total�window-next-buffers�window-next-sibling�window-normal-size�window-old-point�window-parameter�window-parameters�
window-parent�window-pixel-edges�window-pixel-height�window-pixel-left�window-pixel-top�window-pixel-width� window-point�window-prev-buffers�window-prev-sibling� window-redisplay-end-trigger�window-resize-apply�window-resize-apply-total�window-right-divider-width�window-scroll-bar-height�window-scroll-bar-width�window-scroll-bars� window-start�
window-system�window-text-height�window-text-pixel-size�window-text-width�window-top-child�window-top-line�window-total-height�window-total-width�window-use-time�window-valid-p�window-vscroll�windowp�
write-char� write-region�x-backspace-delete-keys-p�x-change-window-property�x-close-connection�x-create-frame�x-delete-window-property�x-disown-selection-internal�x-display-backing-store�x-display-color-cells�x-display-grayscale-p�x-display-list�x-display-mm-height�x-display-mm-width�!x-display-monitor-attributes-list�x-display-pixel-height�x-display-pixel-width�x-display-planes�x-display-save-under�x-display-screens�x-display-visual-class�x-family-fonts�
x-file-dialog�
x-focus-frame�x-frame-geometry�x-get-atom-name�x-get-resource�x-get-selection-internal�
x-hide-tip� x-list-fonts�x-load-color-file�x-menu-bar-open-internal�x-open-connection�x-own-selection-internal�x-parse-geometry�x-popup-dialog� x-popup-menu�x-register-dnd-atom�
x-select-font�x-selection-exists-p�x-selection-owner-p�x-send-client-message�x-server-max-request-size�x-server-vendor�x-server-version�
x-show-tip�
x-synchronize�x-uses-old-gtk-dialog�x-window-property�x-wm-set-size-hint�xw-color-defined-p�xw-color-values�xw-display-color-p� yes-or-no-p�zlib-available-p�zlib-decompress-region�
forward-point� defvaraliasr� r� �with-no-warnings�
define-widget�with-electric-helpr� �defalias�featurep�&allow-other-keys�&aux�&body� &environment�&key� &optional�&rest�&whole� cl-assert�
cl-check-typer� �
user-error�warnc c s� dg}x�t j| ||�D ]�\}}}|tjkr�|tjkrD|tj|fV q|tjkr\|t|fV q|tj krv|tj
|fV q|tj kr�|tj |fV q|tj
kr�|tj |fV q|tjkr�|tj|fV q|||fV qW d S )Nr )r r0 r r r r' r r( r
�error_keywords� Exception� builtin_function_highlightedr r) r* �Pseudo)r/ r3 r4 r5 r6 r7 r r r r0 s,
z%EmacsLispLexer.get_tokens_unprocessedr8 z\s+z;.*$r�
z
\?([^\\]|\\.)r9 z::r� r: z [-+]?\d+\.?z [-+]?\d+/\d+z<[-+]?(\d*\.\d+([defls][-+]?\d+)?|\d+(\.\d*)?[defls][-+]?\d+)z\[|\]z#:z#\^\^?z#\'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]+)?z#\d+=z#\d+#z (,@|,|\.|:)z(t|nil)z\*z#\(z\(z\)z#popz[^"\\`]+z`%s\'z\\.z\\\n)r r8 r� N)�r� r# r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� rg r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r rf r r r r r r re r r r r( r
r r r�
r
r�
r r r r r r r r r r r r& r r r r r r r r r r! r" r# r$ r% r& r' rW r( r) r` r* rp r+ r, r- r. r/ r0 r� r1 r2 r3 r4 rN r5 rM r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN rO rP rQ rR rS )r! r�
r rT rU rV rW r rX r$ rY r" rZ r[ rP r, r\ r] r^ r� r_ r` ra r` ( r�
r4 r5 r6 r7 rb rc rd r8 re r: r; rf rg rh r= ri rj rk r> rl rm rn ro rp r@ rA rq rr rs rt ru rB rC rv rD rF rw rx ry rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r[ r� r� r� r� r� r� r� r� r� r� rj r� rk r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r
r
r
r
r
r
r
r� r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r
r!
r"
r#
r$
r%
r&
r'
r(
r)
r*
r+
r,
r-
r.
r/
r0
r1
r2
r3
r�
r4
r5
r6
r7
r8
r9
r:
r;
r<
r=
r>
r?
r@
rA
rB
rC
rD
rE
rF
rG
rH
rI
rJ
rK
rL
rM
rN
rO
rP
rQ
rR
rS
rT
rU
rV
rW
rX
rY
rZ
r[
r\
r]
r^
r_
r`
ra
rb
rc
rd
re
rf
rg
rh
ri
rj
rk
rl
rm
r� rn
ro
rp
rq
rr
r� rs
r� rt
ru
rv
rw
rx
ry
rz
r{
r|
r}
r~
r
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r r�
r�
r� r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
rb r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
rQ r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r�
r r r r r r r r r r r
r r r
r r r r r r r r r r r r r r r r r� r r r r! r" r# r$ r% r& r' r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r_ r` ra rb rc rd re rf rg r� rh ri rj rk rl r� rm rn ro r� rp rq rr rs rt ru rv r� rw rx ry rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r, r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� rw r� r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r r r r r r r r r r
r r r
r r r r r r r r r r r r r r r r r r r r! r� r" r# r$ r% r& r' r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM r rN rO rP rQ r� rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk rl rm rn ro rp rq rr rs rt ru rv rw rx ry rz r� r� r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r r r r r r r r r r
r r r
r r r r r r� r r r r r r r r r r r r r r r! r" r� r# r$ r% r& r' r( r) r* r+ r, r- r. r/ r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 r: r; r< r= r> r� r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r� r_ r` ra rb rc rd re rf rg rh ri rj rk rl rm rn ro rp rq rr rs rt ru rv rw rx ry rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r r r r r r r r r r r r r r r r r
r
r r r r
r r ) r r� r� r r r r� r r )r r r r r r r r )r r r� r� r r! )-r r
r r r
r r r r r< r= r> r? r@ rA r� r) r( r' r$ r* r" r0 r r r r r r r r r r r
r r r r rD rE rF r r rG r r r r r r � sL
c � @ sH e Zd ZdZdZdgZdgZddgZd�Zd�Z d�Z
d�Z e d�dЄ eD ��Z
e
jd�dЄ e
D �� e
jd�dЄ e D �� d�Zd�e Zd�e Zd�e Zd�ed�fd�ejfd�ejfd�efgd�ejfd�ejfd�efd�efd�efd�efd�efd�e j fd�e j fd�ed�fee j fd�e!j"feefd�efgd�Z#d�d� Z$d�d� Z%d�d� Z&d�d� Z'd�d� Z(d�d� Z)d�S )�r z^
Lexer for `Shen <http://shenlanguage.org/>`_ source code.
.. versionadded:: 2.1
ZShenZshenz*.shenz text/x-shenzapplication/x-shen�datatyper rf � defprolog�defcc�synonymsr� �package�typerW r rQ r$ r �casesr rF r� �freezer7 r� r�
�protectr" r! r� r( �output�prolog?�
trap-errorr� � make-string�/.r� �@p�@s�@v�==r: r4 r5 r6 r7 r8 r; �>=�<=� <-address�<-vectorr�
� absvector�
absvector?� address->�adjoinr@ �arityrC r�
�boolean?�bound?�call�cdr�
�cnr� r� r� �cons?�cutr�
r�
�element?�empty?�enable-type-theory�error-to-stringr� �eval-kl� exceptionr�
�external�fail�fail-ifr �findall�fix�fst�fwhenru �get-timer� �hd�hdstr�hdv�head� identical�implementationrY r �include-all-but�
inferences�input�input+�integer?r8 � intersectionrX �kill�languager� �limit�lineread�loaded�macror� r� �mapcan�
maxinferences�mode� n->string�nlrw r �number?� occurrences� occurs-checkr� �os�out�port�porters�pos�pr�preclude�preclude-all-butr� �profile�profile-results�ps�quitr� �read+� read-byte� read-file�read-file-as-bytelist�read-file-as-string�read-from-string�releaser{ r+ r� �runrx � simple-error�snd�
specialise�spy�step�stinput�stoutput�str� string->n�string->symbol�string?�subst�symbol?�systemf�tail�tc�tc?�thaw�tl�tlstr�tlv�track�tuple?�
undefmacror� �unify!�union� unprofile� unspecialise�untrack� variable?r� �vector->�vector?�verifiedrP
r! rM �
write-byte�
write-to-file�y-or-n?�where�skip�>>r� r�
�<e>�<!>c c s | ]}|t fV qd S )N)r
)r �sr r r r � s zShenLexer.<genexpr>c c s | ]}|t jfV qd S )N)r r )r r� r r r r � s c c s | ]}|t fV qd S )N)r
)r r� r r r r � s z[\w!$%*+,<=>?/.\'@&#:-]z%s+z [a-z!$%%*+,<=>?/.\'@&#_-]%s*z[A-Z]%s*r�
z#popz
c#\d{1,3};z~[ARS%]z(?s).z(?s)\\\*.*?\*\\z\\\\.*z\s+z_{5,}z={5,}z(;|:=|\||--?>|<--?)z (:-|:|\{|\})z[+-]*\d*\.\d+(e[+-]?\d+)?z[+-]*\d+r� z(true|false|<>|\[\])z
(\[|\]|\(|\)))r� r c C s$ t j| |�}| j|�}| j|�}|S )N)r r0 �_process_symbols�_process_declarations)r/ r3 r r r r r0 � s
z ShenLexer.get_tokens_unprocessedc C s |t tjtjfkS )N)r r r r )r/ r6 r r r � _relevant� s zShenLexer._relevantc c s� d}xz|D ]r\}}}|||fV | j |�r
|rl|tkrl|| jkrl|}x&| j||�D ]\}}}|||fV qRW |dkoz|tk}q
W d S )NF�()r� r
r$ �_process_declarationr )r/ r �
opening_parenr5 r6 r7 � declarationr r r r� � s
z ShenLexer._process_declarationsc c st d}xj|D ]b\}}}|r8|t tjfkr8| jj|tj�}n|t krP|| jkrPtj}|dko^|tk}|||fV q
W d S )NFr� ) r r r �MAPPINGSrQ r �BUILTINS_ANYWHEREr r )r/ r r� r5 r6 r7 r r r r� � s zShenLexer._process_symbolsc c s� x*|D ]"\}}}| j |�r P |||fV qW |dkr�d}|tkrFtjn|}|||fV xJ|D ]B\}}}|rx|tkrxtj}|||fV | j |�r\|tko�|dk}q\W n�|dkr�|tkr�tjn|}|||fV n�|dk�rz|tkr�tjn|}|||fV x,|D ]$\}}}| j |��rP |||fV q�W |dk�rl|tk�rl|t|fV x4| j|�D ]\}}}|||fV �qNW n |||fV n |tk�r�tjn|}|||fV t �d S )Nr& Fr9 r* r �{)
r� r r
r1 r r�
r r �_process_signature�
StopIteration)r/ r� r r5 r6 r7 Zprev_was_colonr r r r� � s@
z ShenLexer._process_declarationc c sh xb|D ]Z\}}}|t kr2|dkr2|t|fV t�n"|t tjfkrT|j� rNtjntj}|||fV qW d S )N�}) r r r� r r �istitler r
r1 )r/ r r5 r6 r7 r r r r� s z ShenLexer._process_signatureN)
r& r rf r' r( r) r� r* r+ rW )r rQ r$ r r, r rF r� r- r7 r� r�
r. r" r! r� r( r/ r0 r1 r� r2 r3 r� r4 r5 r6 )�r7 r: r4 r5 r6 r7 r8 r; r8 r9 r: r; r�
r< r= r> r? r@ r@ rC r�
rA rB rC rD r�
rE r� r� r� rF rG r�
r�
rH rI rJ rK r� rL rM r�
rN rO rP r rQ rR rS rT ru rU r� rV rW rX rY rZ r[ rY r r\ r] r^ r_ r` r8 ra rX rb rc r� rd re rf rg r� r� rh ri rj rk rl rw r rm rn ro r� rp rq rr rs rt ru rv rw r� rx ry rz r{ r� r| r} r~ r r� r� r� r{ r+ r� r� rx r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� rP
r! rM r� r� r� )r� r� r� r� r�
r� r� )*r r
r r r
r r r r$ r! ZBUILTINSr� �dictr� �updateZvalid_symbol_charsr Z symbol_nameZvariabler r�
ZInterpolr r r r r r r
r r r r r
r% r r0 r� r� r� r� r� r r r r r � s�
&c @ s� e Zd ZdZdZdgZdgZg Zd8Zd9Z d$Z
d%d&e j fd'e
fd(ejfd)ejfd*efd+e
ejfd,ejfd-ejfd.efeed/d0�efd1e
ejfd2e
ejfee d3d/d4�ejfd3e
ejfe
ejfd5e fd6e fgiZ d7S ):r za
A CPSA lexer based on the CPSA language as of version 2.2.12
.. versionadded:: 2.1
ZCPSAZcpsaz*.cpsa�herald�varsrf r � defprotocol�defrole� defskeleton� defstrand� deflistener�non-orig� uniq-orig� pen-non-orig�precedesr� r� �recvr
r3 �skey�akey�data�mesg�cat�encr� �privk�pubk�invk�ltk�genr� z[\w!$%&*+,/:<=>?@^~|-]+r z;.*$z\s+z
-?\d+\.\d+z-?\d+z"(\\\\|\\"|[^"])*"r� u' #\\([()/'\"._!§$%& ?=+-]|[a-zA-Z0-9]+)z(#t|#f)z('|#|`|,@|,|\.)z\b)r� z(?<='\()z(?<=#\()z(?<=\())r� r� z(\(|\))z(\[|\])N)r� r� rf r r� r� r� r� r� r� r� r� r� r� r� r� r
r3 r� r� r� r� ) r� r� r� r� r� r� r� r� r� ) r r
r r r
r r r r�
r�
r r r r r
r r r r r r r r r r
r r r r r r r r r r & s: c � @ sb e Zd ZdZdZdgZdgZg Z�dyZ�dzZ �d{Z
�d|Z �d}Z �d~Z
�dZ�dPZ�dQZ�dRZ�dSe�dTf�dUe�dVf�dWe ejf�dXe ejf�dYe ejf�dZe ejf�d[e ejf�d\e ejf�d]e ejf�d^e ejf�d_e ejf�d`e ejf�dae �db e �dc e �dd e �de ejfee �df�dg�efee�df�dg�ejfe�dh�eejfg�die ejf�djej f�dke fee �df�dg�efee
�df�dg�ejfe�dh�eejfg�dle j f�dme f�dne!j"f�doe!j#f�dpe!f�dqef�drej$fee�df�dg�efee �df�dg�ejf�dsefg
ee
�df�dt�du�edfe�dv�g�dw�Z%�dxS (� r a+ An xtlang lexer for the `Extempore programming environment
<http://extempore.moso.com.au>`_.
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)
.. versionadded:: 2.2
�xtlangZ extemporez*.xtmr r r r r r! r" r$ r' �set!r� �for-eachr( r) r- r. �unquote-splicingr� r# �let*r& r, � bind-func�bind-val�bind-lib� bind-type�
bind-alias� bind-poly�
bind-dylib�
bind-lib-func� bind-lib-val�letz�memzone�cast�convertr�
�doloopr4 r5 r6 r7 r8 �<=r: r; �>=r�
r= r> r? r@ rA rB rC rD rE rF �boolean?rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU r[ r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r �null?r�
rJ � call-with-current-continuation�call-with-input-file�call-with-output-file�call-with-values�call/cc�
char->integer�char-alphabetic?�
char-ci<=?� char-ci<?� char-ci=?�
char-ci>=?� char-ci>?�
char-downcase�char-lower-case?�
char-numeric?� char-ready?� char-upcase�char-upper-case?�char-whitespace?�char<=?�char<?�char=?�char>=?�char>?�char?�close-input-port�close-output-port�complex?�current-input-port�current-output-portr� r� � dynamic-wind� eof-object?�eq?�equal?�eqv?�even?�exact->inexact�exact?r� r� r� r� � imag-part�inexact->exact�inexact?� input-port?�
integer->char�integer?�interaction-environmentr� � list->string� list->vector�list-ref� list-tail�list?r� r� �
make-polar�make-rectangular� make-string� make-vectorr� r� � negative?r� �null-environment�number->string�number?r� �odd?�open-input-file�open-output-file� output-port?�pair?� peek-char�port?� positive?�
procedure?r� � rational?r� r� � read-char� real-part�real?r� �scheme-report-environment�set-car!�set-cdr!r� � string->list�string->number�string->symbol�
string-append� string-ci<=?� string-ci<?� string-ci=?� string-ci>=?� string-ci>?� string-copy� string-fill!�
string-length�
string-ref� string-set!� string<=?�string<?�string=?� string>=?�string>?�string?�symbol->string�symbol?�transcript-off�
transcript-onr� r� r� � vector->list� vector-fill!�
vector-length�vector?�with-input-from-file�with-output-to-filer� �
write-char�zero?�toString�afill!�pfill!�tfill!�tbind�vfill!� array-fill!�
pointer-fill!� tuple-fill!�freer�
�tuplerW �cset!�crefr�
�bor� ang-names�<<�>>rH r� �sprintfr �pset!�pref-ptr�vset!�vref�aset!rr �aref-ptr�tset!�tref�tref-ptr�salloc�halloc�zalloc�alloc�schedule� llvm_printf� push_zone�pop_zone� llvm_sprintf�
make-array�
array-set!� array-ref�
array-ref-ptr� pointer-set!� pointer-ref�pointer-ref-ptr� stack-alloc�
heap-alloc�
zone-alloc�
make-tuple�
tuple-set!� tuple-ref�
tuple-ref-ptr� closure-set!� closure-ref�pref�pdref� impc_null�bitcastrQ
�ifret�ret->�clrun->�
make-env-zone�make-env�<>�dtof�ftod�i1tof�i1tod�i1toi8�i1toi32�i1toi64�i8tof�i8tod�i8toi1�i8toi32�i8toi64�i32tof�i32tod�i32toi1�i32toi8�i32toi64�i64tof�i64tod�i64toi1�i64toi8�i64toi32z[\w!$%&*+,/:<=>?@^~|-]+z[\w.!-]+z[]{}[\w<>,*/|!-]+z\(z#pushz\)z#popz(?<=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)r9 z(<z>|\|z\||/z/|z\*)\**z(?<=\())r� �commonr� u' #\\([()/'\"._!§$%& ?=+-]|[a-zA-Z0-9]+)z('|#|`|,@|,|\.)z;.*$z\s+z
-?\d+\.\d+z-?\d+z(#b|#o|#x)[\d.]+z"(\\\\|\\"|[^"])*"z(#t|#f)z(\(|\))z\b)r� r� r )r� r r� r N) r r r r r r! r" r$ r' r� r� r� )
r( r) r- r. r� r� r# r� r& r, ) r� r� r� r� r� r� r� r� r� )r� r� r� r� r�
r� )Jr4 r5 r6 r7 r8 r� r: r; r� r�
r= r> r? r@ rA rB rC rD rE rF r� rH rI rJ rK rL rM rN rO rP rQ rR rS rT rU r[ r\ r] r^ r_ r` ra rb rc rd re rf rg rh ri rj rk r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r� r�
rJ )�r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r r r r r r r r r r� r� r
r r r
r r r r r� r� r� r� r r r r r r r r� r r r r r r� r� r r r r! r� r� r" r� r# r$ r% r� r& r' r( r) r* r+ r, r- r. r� r/ r� r� r0 r1 r2 r� r3 r4 r5 r� r6 r7 r8 r9 r: r; r< r= r> r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM r� r� r� rN rO rP rQ rR rS r� rT rU )orV rW rX rY rZ r[ r\ r] r^ rO r_ r�
r` r� rW ra rb r�
rc rd re rf rH r� rg r rJ rh ri rj rk rl rr rm rn ro rp rq rr rs rt ru r� r� r� r� r� rB r> rF r� r� r� rk r� r� rv rw rx r� r�
ry rz r{ r| r} r~ r r� r� r� r� r� r� r� r� r� r� r� r� r� r� rQ
r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� )&r r
r r r
r r r Zcommon_keywordsZscheme_keywordsZxtlang_bind_keywordsZxtlang_keywordsZcommon_functionsZscheme_functionsZxtlang_functionsZvalid_scheme_nameZvalid_xtlang_nameZvalid_xtlang_typer r r r
r1 r r r r r r r r r r r
r r r r r r r r r t s� ,
) r r Zpygments.lexerr r r r r Zpygments.tokenr r r r
r r r
r r r Zpygments.lexers.pythonr �__all__r r r r r r r r r r r r r �<module>
s@ 0 3q 5 'N