文件操作 - lisp.cpython-311.pyc
返回文件管理
返回主菜单
删除本文件
文件: /usr/lib/python3/dist-packages/pygments/lexers/__pycache__/lisp.cpython-311.pyc
编辑文件内容
� �E�c�2 � � � d Z ddlZddlmZmZmZmZmZ ddlm Z m Z m Z m Z m Z mZmZmZmZmZmZ ddlmZ ddlmZmZ g d�Z G d� d e� � Z G d � d e� � Z G d � d e� � Z G d� de� � Z G d� de� � Z G d� de� � Z G d� de� � Z G d� de� � Z! G d� de� � Z" G d� de� � Z#dS ) z� pygments.lexers.lisp ~~~~~~~~~~~~~~~~~~~~ Lexers for Lispy languages. :copyright: Copyright 2006-2022 by the Pygments team, see AUTHORS. :license: BSD, see LICENSE for details. � N)� RegexLexer�include�bygroups�words�default) �Text�Comment�Operator�Keyword�Name�String�Number� Punctuation�Literal�Error� Whitespace)� PythonLexer)�scheme_keywords�scheme_builtins) � SchemeLexer�CommonLispLexer�HyLexer� RacketLexer� NewLispLexer�EmacsLispLexer� ShenLexer� CPSALexer� XtlangLexer� FennelLexerc �� � � e Zd ZdZdZdZddgZddgZdd gZe j e j z Z d Z d Z� fd �Zi Zd D ]~Zedk rdZdZn edk rdZdZnedk rdZdZn edk rdZdZde� de� d �Zde� d e� d �Zedk r d Zd e� d!e� d"�Zd#Zd$e� d%e� d&�Zde� d'e� d(e� d)e� d*e� d+� Zd,e� d-e� d.e� d/�Zeee< �d0� Z e d1� � g e d2� � gd3e j fd4e j d5fd6e d7fd8e d9fd:e fd;e fed e!j" d<fed e!j# d<fed ed<fed e!j$ d<fd=e%d>fd?e z e%j& d<fd@e z e'j( d<fdAe%j) d<fdBe*j+ d<fdCe,fdDe z e*j- d<fdEe z e*j- d<fdFe z e*j. d<fe e*j- d<fdGe/d1fdHe/dIfgd4e j dJfdKe j d<fdLe j fdMe j fgdGe dJfdHe d<fdNe fgdOe� �e d<fgd=e%dPfdQe%j0 fdRe%j0 fdSe%j0 fdTe%j0 fdUe%j0 fdVe%fgdW�Z1� xZ2S )Xr z� A Scheme lexer. This parser is checked with pastes from the LISP pastebin at http://paste.lisp.org/ to cover as much syntax as possible. It supports the full Scheme syntax as defined in R5RS. .. versionadded:: 0.6 �Schemez http://www.scheme-reports.org/�scheme�scmz*.scmz*.ssz text/x-schemezapplication/x-scheme�[\w!$%&*+,/:<=>?@^~|-]+z� (?= \s # whitespace | ; # comment | \#[;|!] # fancy comments | [)\]] # end delimiters | $ # end of file ) c # � �K � t � � � |� � D ]b\ }}}|t j u s|t j u r9|t v r |t |fV � �8|t v r|t j |fV � �S|||fV � �[|||fV � �cd S �N) �super�get_tokens_unprocessedr �Function�Variabler r r �Builtin)�self�text�index�token�value� __class__s ��6/usr/lib/python3/dist-packages/pygments/lexers/lisp.pyr( z"SchemeLexer.get_tokens_unprocessed> s� �� � � �#(�7�7�#A�#A�$�#G�#G� *� *� �E�5�%��� �%�%��$�-�)?�)?��O�+�+� ��%�/�/�/�/�/��o�-�-� �� �u�4�4�4�4�4� ���-�-�-�-�-��U�E�)�)�)�)�)� *� *� )� � � � r4 z[01]z ( \#[bB] )r5 z[0-7]z ( \#[oO] )r6 z[0-9]z ( (\#[dD])? )r7 z [0-9a-fA-F]z ( \#[xX] )z ( z$ (\#[iIeE])? | \#[iIeE] z ) z+ ( / z+ )? ) a� ( # Decimal part ( [0-9]+ ([.][0-9]*)? | [.][0-9]+ ) # Optional exponent ( [eEsSfFdDlL] [+-]? [0-9]+ )? # Optional mantissa width ( \|[0-9]+ )? ) z! ( z (?!/) | z ) z (nan.0|inf.0)z ( [+-] z' # Sign mandatory | [+-]? z( # Sign optional ) z ? [+-] (�|z)? i | z (@ z)? ) z (?x) ( z z� ) # Need to ensure we have a full token. 1+ is not a # number followed by something else, but a function # name. z c # � K � d|� � � v r t j }n t j }|� � � ||� � � fV � d S )N�.)�groupr �Float�Integer�start)r, �match� token_types r2 � decimal_cbzSchemeLexer.decimal_cb� sR � � � � �%�+�+�-�-� � � � �J�J� � �J��k�k�m�m�Z���� � �6�6�6�6�6�6r3 � scheme-rootr0 z;.*?$�#\|�multiline-commentz#;[([]�commented-formz#;�commented-datumz#!r6rs�\s+�#pop�"�string�'�#:�' #\\([()/'\"._!§$%& ?=+-]|[a-zA-Z0-9]+)�(#t|#f)�('|#|`|,@|,|\.)�(?<='\()�(?<=#\()�(?<=\()z[([]z[)\]]z#pop:3�#push�\|#�[^|#]+�[|#]z [^()[\]]+z(?x).*?z#pop:2z\\x[0-9a-fA-F]+;z\\x[0-9a-fA-F]{2}z\\u[0-9a-fA-F]{4}z\\U[0-9a-fA-F]{6}�\\.�[^\\"]+)�rootrB r0 rD rE rF rJ )3�__name__� __module__� __qualname__�__doc__�name�url�aliases� filenames� mimetypes�re�DOTALL� MULTILINE�flags� valid_name� token_endr( � number_rules�base�digit�radix�prefix�ureal�decimal�naninf�real�complex_�numrA r r �Single� Multiliner r �Bin�Oct�Hexr �Symbolr � Declaration�Charr �Constantr r* r) r �Escape�tokens� __classcell__)r1 s @r2 r r sz �� � � � � � � � �D� *�C��� �G��&�!�I� �"8�9�I� �I�� � $�E� ,�J��I� *� *� *� *� *�, �L� � V!� V!�� �1�9�9��E�!�E�E� �Q�Y�Y� �E�!�E�E� �R�Z�Z� �E�$�E�E� �R�Z�Z�"�E�!�E� � � � � � � � �� � � � � � � � �� �2�:�:��G�&��� � �� � �E� "�� �� � � � � � �� � � � � #� � �&+� � � � � � � � � �� � � � � � � � � � � �� !� �T��� 7� 7� 7�, �G�M� "� "� � �G�G� � � � �w�~� &� �W�&�(;� <� ��!1� 2� �G� .� /� �� � �Z� � �!�_�f�j�&� 1� �!�_�f�j�&� 1� �"� �z�6� 2� �"� �v�z�6� 2� �6�8� $� �J� �� �v� 6� �Z� ��!4�f� =� 7���f� M� �� �� /� �� *� �:� %�t�}�f� =� �:� %�t�}�f� =� �*� $�d�m�V� <� �� �� /� �k�=� 1� �{�H� -�q9 �v �W�&�� 0� �W�&�� /� ��)� *� �g�'� (� � �g�w� '� �w�� '� �7� #� � $� � #� #�W�f� 5� � �&�(� #� �&�-� 0� !�6�=� 1� !�6�=� 1� !�6�=� 1� �V�]� #� �� � �_`� `�F�F�F�F�Fr3 r c �� � e Zd ZdZdZdZg d�ZddgZdgZe j e j z Z dZ e d z Zd Zd e �d e�d �Zd� Zd� Z ed� � gdej dfdej dfdej fdej fgdej dfdej dfdej fgg def�dej f�dej d f�d ej f�d ef�d ez ej f�d ez ej f�d!ez ej f�d"ez ej f�d"e f�d#e f�d$ez e j f�d%ez e f�d&ez e j f�d'ez ej f�d(ez ej f�d)e df�d*e!j" f�d+ez ej f�d,e f�d-e#j$ f�d.e j% f�d/e j& f�d0e j' f�d1e f�d2 e(e e)� � df�d3 e(e!j" e)� � df�d4 e(e!j" e)� � df�d5e!j" f�d6e f�d7e f�d8ez d9z ej d:f�d;e f�d<e f�d=ez e#j* f�d>ez d>z e#j+ j, f�ee#j+ f�de)df�de)df�d?�Z-d@S )Ar z9 A Common Lisp lexer. .. versionadded:: 0.9 z Common Lispzhttps://lisp-lang.org/)z common-lisp�cl�lispz*.clz*.lispztext/x-common-lispz \\.|[\w!$%&*+-/<=>?@\[\]^{}~]�|[#.:]z(?=[ "()\'\n,;`])z(\|[^|]+\||(?:�)(?:�)*)c � � ddl m}m}m}m}m}m}m} || _ || _ || _ || _ || _ || _ || _ t j | fi |�� d S )Nr )�BUILTIN_FUNCTIONS� SPECIAL_FORMS�MACROS�LAMBDA_LIST_KEYWORDS� DECLARATIONS� BUILTIN_TYPES�BUILTIN_CLASSES)� pygments.lexers._cl_builtinsr� r� r� r� r� r� r� �builtin_function� special_forms�macros�lambda_list_keywords� declarations� builtin_types�builtin_classesr �__init__) r, �optionsr� r� r� r� r� r� r� s r2 r� zCommonLispLexer.__init__A s� � � +� +� +� +� +� +� +� +� +� +� +� +� +� +� +� +� +� +� !2�� � *��� �� �$8��!� (��� *��� .�� ���D�,�,�G�,�,�,�,�,r3 c # �� K � dg}t j | ||� � D ]�\ }}}|t j u r�|| j v r|t j |fV � �/|| j v r |t |fV � �E|| j v r|t j |fV � �`|| j v r |t |fV � �v|| j v r |t |fV � ��|| j v r|t j |fV � ��|| j v r|t j |fV � ��|||fV � ��d S �NrY )r r( r r* r� r+ r� r r� r� r� r� �Typer� �Class�r, r- �stackr. r/ r0 s r2 r( z&CommonLispLexer.get_tokens_unprocessedN sc � � � ����#-�#D�T�4�QV�#W�#W� &� &� �E�5�%��� �%�%��D� 1�1�1� �� �u�4�4�4�4� ��D� .�.�.� ��%�/�/�/�/� ��D�K�'�'� �� �u�4�4�4�4� ��D� 5�5�5� ��%�/�/�/�/� ��D� -�-�-� ��%�/�/�/�/� ��D� .�.�.� �� �u�4�4�4�4� ��D� 0�0�0� ���U�2�2�2�2� ����%� %� %� %� %�/ &� &r3 �bodyrC rS rT rH rU rV �\(�\)z[^()]+rG �;.*$rD z#\d*Y.*$z"(\\.|\\\n|[^"\\])*"�:�::z:#rK �`� [-+]?\d+\.?� [-+]?\d+/\d+�<[-+]?(\d*\.\d+([defls][-+]?\d+)?|\d+(\.\d*)?[defls][-+]?\d+)z#\\.z#\\�#\(z #\d*\*[01]*rL z#[.,]�#\'z#b[+-]?[01]+(/[01]+)?z#o[+-]?[0-7]+(/[0-7]+)?z #x[+-]?[0-9a-f]+(/[0-9a-f]+)?z #\d+r[+-]?[0-9a-z]+(/[0-9a-z]+)?z(#c)(\()z (#\d+a)(\()z(#s)(\()z#p?"(\\.|[^"])*"�#\d+=�#\d+#z#+nilz\s*\(rE z#[+-]z (,@|,|\.)�(t|nil)�\*)rY rD rE r� N).rZ r[ r\ r] r^ r_ r` ra rb rc � IGNORECASEre rf �nonmacro� constituent� terminated�symbolr� r( r r ru �Preprocr rt �Specialr ry r r r= r< r{ r �Otherr r) rv rw rx r r r| r* �Globalr~ � r3 r2 r r ( sp � � � � � �� � �D� "�C�+�+�+�G���"�I�%�&�I� �M�B�L� (�E� 0�H��X�%�K�%�J�J� .6�X�X�{�{�{� C�F� -� -� -�&� &� &�: �G�F�O�O� � �W�&�� 0� �W�&�� /� ��)� *� �g�'� (� � �G�O�W� -� �G�O�V� ,� ��� (� � _ � �Z� �_ � �g�n� %� _ � �W�&�(;� <�_ � �'�/� *�_ � %�f� -� _ � �F�]�F�M� *�!_ �" �V�^�V�]� +�#_ �$ �V�^�V�]� +�%_ �& �F�]�F�M� *�'_ �( �8� �)_ �* �8� �+_ �0 �j� (�&�.� 9�1_ �2 �z� )�6� 2�3_ �4 M� �� � � '�5_ �< �z� !�6�;� /�=_ �> �f�_�f�k� *�?_ �D �X�v� &�E_ �J �W�]� +�K_ �P �V�^�V�]� +�Q_ �V �x� �W_ �\ �T�]� #�]_ �b &�v�z� 2�c_ �h (��� 4�i_ �n .�v�z� :�o_ �t 1�&� 9�u_ �z �(�(�6�;�7�7�� @�{_ �@ �X�X�g�m�[� A� A�6� J�A_ �F �(�(�7�=�+�>�>�� G�G_ �L !�'�-� 0�M_ �R �x� �S_ �T �x� �U_ �Z � � "�X� -�w��@P� Q�[_ �` �x� �a_ �f �8� $�g_ �l �*� $�d�m� 4�m_ �r �V�^�e� #�T�]�%9� :�s_ �t �T�]� #�u_ �z �K�� (�{_ �| �K�� (�}_ � o� o�F�F�Fr3 r c �8 � e Zd ZdZdZdZdgZdgZddgZdZ d Z d Z d Z e e z Z d Zd � Zdej fdefdefdej fdej fdej fdej fdefdez ej fdej fd e eej � � fd e eej � � fdez ej fde f e d � � e d � � ee � � e f ee � � e j! f ee � � e"j# fd ez e"j$ fee"j% fd e&fd e&fd!e&fge'j( d" e'j( d# d$�Z(d%� Z)d&S )'r z> Lexer for Hy source code. .. versionadded:: 2.0 �Hyzhttp://hylang.org/�hylangz*.hyz text/x-hyzapplication/x-hy)%�cond�for�->�->>�car�cdr�first�rest�let�when�unless�import�do�progn�get�slice�assoczwith-decorator�,� list_comp�kwapply�~�is�inzis-notznot-in� quasiquote�unquotezunquote-splice�quoter8 z<<=z>>=�foreach�while�eval-and-compile�eval-when-compile)�def�defn�defun�defmacro�defclass�lambda�fn�setvr� )�cycle�dec�distinct�drop�even?�filter�incz instance?z iterable?�iteratez iterator?zneg?znone?�nthznumeric?�odd?zpos?�remove�repeat� repeatedly�take�take_nth� take_while�zero?z(?!#)[\w!$%*+<=>?/.#:-]+c �$ � t | d�� � S )N� ��suffix)r )�entriess r2 � _multi_escapezHyLexer._multi_escape s � ��W�S�)�)�)�)r3 r� �,+rG � -?\d+\.\d+�-?\d+z 0[0-7]+j?z0[xX][a-fA-F0-9]+�"(\\\\|\\[^\\]|[^"\\])*"rK z \\(.|[a-z]+)z"^(\s*)([rRuU]{,2}"""(?:.|\n)*?""")z"^(\s*)([rRuU]{,2}'''(?:.|\n)*?''')z::?z ~@|[`\'#^~&@]� py-keywords� py-builtinsrR �(\[|\])�(\{|\})�(\(|\))�keywords�builtins)rY r� r� c � � d| v sd| v rdS d S )Nz(import z(defn g�������?r� )r- s r2 � analyse_textzHyLexer.analyse_textI s$ � � �� � ��T�!1�!1��3� "2�!1r3 N)*rZ r[ r\ r] r^ r_ r` ra rb r� r� � hy_builtins�hy_corer rg r� r rt r r r r< r= rw rx r ry r{ r �Docr r r rz r r+ r) r* r r r~ r r� r3 r2 r r � s � � � � � �� � �D� �C��j�G���I� � 0�1�I��M��L� �K��G� �W�$�H� -�J�*� *� *� �g�n� %� �D�M� �Z� � �F�L� )� �v�~� &� �6�:� &� !�6�:� .� )�&� 1� �J� �� � .� �f�k� *� 2�H�H�T�6�:�4N�4N� O� 2�H�H�T�6�:�4N�4N� O� �j� �&�-� 0� �x� (� �G�M� "� "� �G�M� "� "� �]�=� )� )�7� 3� �]�<� (� (�'�*=� >� �]�8� $� $�d�l� 3� �*� $�d�m� 4� �� � '� �� %� �� %� �� %�s; �x #�)�*�5�"�)�*�5�}?� ?�F�B� � � � r3 r c � � e Zd ZdZdZdZddgZg d�ZddgZd Z d Z d Z d Z d Z de z ZdZdZdZdez Zde�e�d�Zde�e�d�ZdZde�de�d�Zde�de�d�Ze efdedfgd efd ej fd ej d fd e fd!e�d"e �d#�e j d$fd!e�d%e �d#�e j d$fd!e�d&e�d'e�d(e�d)e �d#� e d$fd*e�d'e�d(e�d+e�d,e�d-e �d#� e j d$fd.e�d/e �d#�e j d$fd0ez e j! d$fd1ez e j" d$fd2ez e j# d$fd3ez e j d$fd4e$j% d5fd6e$j& d$fd7e$j' d$fd8e$j' d$fd9e$j( d$fd:e)j* d$fd;ez e+j, d$fd< e-e+j. e)j. � � fd=e+j. d>fd?e z e/fd@e z e/dAfgdBe/fee$j0 d$fdCef e1d$� � ge e2d$fg e3dD� � dEe z e+dAfdFe/dGfdHe z e+dGfe e2dIf e4e dJe z �K� � e+d$f e4e dJe z �K� � e)j5 d$fee)d$f e3dL� � g e3dM� � dedfg e3dD� � dNe/dOfdPe z e+dOfe e2dQf e3dL� � g e3dM� � dedRfg e3dD� � e e2dSf e3dL� � g e3dM� � ded>fgd ej dTfdUej d$fdVej fgdWe$j% d$fdXe$j6 fdYe$j% fgdZ� Z7d[S )\r ze Lexer for Racket source code (formerly known as PLT Scheme). .. versionadded:: 1.6 �Racketzhttp://racket-lang.org/�racket�rkt)z*.rktz*.rktdz*.rktlz text/x-racketzapplication/x-racket(~ z#%appz#%datumz #%declarez #%expressionz#%module-beginz #%plain-appz#%plain-lambdaz#%plain-module-beginz#%printing-module-beginz #%providez #%requirez#%stratified-bodyz#%topz#%top-interactionz#%variable-referencer� z->*z->*mz->dz->dmz->iz->mz...z:do-in�==z=>�_�absent�abstractzall-defined-outz all-from-out�and�any�augmentzaugment*z augment-finalzaugment-final*�augridezaugride*�beginzbegin-for-syntax�begin0�casezcase->zcase->mz case-lambda�classzclass*zclass-field-accessorzclass-field-mutatorzclass/cz class/derivedz combine-inz combine-outz command-linez compound-unitzcompound-unit/inferr� zcons/dc�contractz contract-outzcontract-struct� contracted�definezdefine-compound-unitzdefine-compound-unit/inferzdefine-contract-structzdefine-custom-hash-typeszdefine-custom-set-typeszdefine-for-syntaxzdefine-local-member-namez define-loggerzdefine-match-expanderzdefine-member-namez define-module-boundary-contractzdefine-namespace-anchorz define-opt/czdefine-sequence-syntaxzdefine-serializable-classzdefine-serializable-class*zdefine-signaturezdefine-signature-formz define-structzdefine-struct/contractzdefine-struct/derivedz define-syntaxzdefine-syntax-rulezdefine-syntaxesz define-unitzdefine-unit-bindingzdefine-unit-from-contextzdefine-unit/contractz define-unit/new-import-exportz define-unit/sz define-valueszdefine-values-for-exportzdefine-values-for-syntaxzdefine-values/invoke-unitz define-values/invoke-unit/inferzdefine/augmentzdefine/augment-finalzdefine/augridezdefine/contractzdefine/final-propz define/matchzdefine/overmentzdefine/overridezdefine/override-finalzdefine/privatez define/publiczdefine/public-finalzdefine/pubmentz define/subexpression-pos-propz"define/subexpression-pos-prop/name�delayz delay/idlez delay/namez delay/strictz delay/syncz delay/threadr� �else�exceptz except-inz except-out�export�extendsz failure-cont�falsezfalse/c�fieldz field-bound?�filezflat-murec-contractzflat-rec-contractr� zfor*zfor*/andz for*/asyncz for*/firstz for*/foldzfor*/fold/derivedz for*/hashz for*/hasheqz for*/hasheqvz for*/lastz for*/listz for*/listszfor*/mutable-setzfor*/mutable-seteqzfor*/mutable-seteqvzfor*/orz for*/productzfor*/setz for*/seteqz for*/seteqvz for*/streamzfor*/sumz for*/vectorz for*/weak-setzfor*/weak-seteqzfor*/weak-seteqvz for-labelzfor-metaz for-syntaxz for-templatezfor/andz for/asyncz for/firstzfor/foldzfor/fold/derivedzfor/hashz for/hasheqz for/hasheqvzfor/lastzfor/listz for/listszfor/mutable-setzfor/mutable-seteqzfor/mutable-seteqvzfor/orz for/productzfor/setz for/seteqz for/seteqvz for/streamzfor/sumz for/vectorz for/weak-setzfor/weak-seteqzfor/weak-seteqvzgen:custom-writezgen:dictzgen:equal+hashzgen:setz gen:stream�genericz get-fieldzhash/dc�if�impliesr� r zinclude-at/relative-toz include-at/relative-to/readerzinclude/reader�inheritz inherit-fieldz inherit/innerz inherit/super�initz init-dependz init-fieldz init-rest�inner�inspect� instantiate� interfacez interface*zinvariant-assertionz invoke-unitzinvoke-unit/inferr� �lazyr� �let*z let*-valuesz let-syntaxz let-syntaxesz let-valueszlet/cczlet/ec�letrecz letrec-syntaxzletrec-syntaxeszletrec-syntaxes+valuesz letrec-values�lib�link�localz local-requirez log-debugz log-errorz log-fatalzlog-infoz log-warningr? zmatch*zmatch*/derivedz match-definezmatch-define-valuesz match-lambdaz match-lambda*zmatch-lambda**z match-letz match-let*zmatch-let*-valueszmatch-let-valuesz match-letreczmatch-letrec-valuesz match/derivedz match/valueszmember-name-key�mixin�modulezmodule*zmodule+�nand�new�norzobject-contractzobject/c�onlyzonly-inz only-meta-in�openzopt/c�or�overmentz overment*�overridez override*zoverride-finalzoverride-final*� parameterizez parameterize*zparameterize-breakzparametric->/c�placezplace*z place/context�planetrm z prefix-inz prefix-out�privatezprivate*z prompt-tag/cz protect-out�providezprovide-signature-elementszprovide/contract�publiczpublic*z public-finalz public-final*�pubmentzpubment*r� � quasisyntaxzquasisyntax/locr� z quote-syntaxzquote-syntax/prunezrecontract-outzrecursive-contractz relative-in�renamez rename-inz rename-innerz rename-outz rename-super�require�sendzsend*zsend+z send-genericz send/applyzsend/keyword-apply�set!z set!-valuesz set-field!�shared�streamzstream*z stream-cons�structzstruct*z struct-copyzstruct-field-indexz struct-outzstruct/cz struct/ctcz struct/dc�submodr' zsuper-instantiatezsuper-make-objectz super-new�syntaxz syntax-casez syntax-case*zsyntax-id-rulesz syntax-rulesz syntax/loc�tag�thiszthis%�thunkzthunk*�timezunconstrained-domain->�unitzunit-from-contextzunit/czunit/new-import-exportzunit/sr� r� �unquote-splicing�unsyntaxzunsyntax-splicingz values/dropr� zwith-continuation-markz with-contractz with-contract-continuation-markz with-handlerszwith-handlers*z with-methodz with-syntax� λ(� �*z*list/c�+�-�/�<z</c�<=z<=/c�=z=/c�>z>/c�>=z>=/czabort-current-continuation�abszabsolute-path?�acosz add-between�add1z alarm-evtz always-evtzand/c�andmap�anglezany/c�appendzappend*z append-map�apply�argmax�argminzarithmetic-shiftzarity-at-leastzarity-at-least-valuezarity-at-least?zarity-checking-wrapperzarity-includes?zarity=?zarrow-contract-infoz#arrow-contract-info-accepts-arglistz'arrow-contract-info-chaperone-procedurez%arrow-contract-info-check-first-orderzarrow-contract-info?�asin�assfr� �assq�assv�atanzbad-number-of-results�bannerz base->-doms/cz base->-rngs/czbase->?z between/cz bitwise-andzbitwise-bit-fieldzbitwise-bit-set?z bitwise-iorz bitwise-notz bitwise-xorzblame-add-car-contextzblame-add-cdr-contextzblame-add-contextzblame-add-missing-partyzblame-add-nth-arg-contextzblame-add-range-contextzblame-add-unknown-contextz blame-contextzblame-contractzblame-fmt->-stringzblame-missing-party?zblame-negativezblame-original?zblame-positivezblame-replace-negativez blame-sourcez blame-swapzblame-swapped?z blame-updatez blame-valuezblame?z boolean=?�boolean?zbound-identifier=?�boxzbox-cas!z box-immutablezbox-immutable/czbox/czbox?z break-enabledzbreak-parameterization?z break-threadz!build-chaperone-contract-propertyzbuild-compound-type-namezbuild-contract-propertyz build-flat-contract-propertyz build-listz build-pathzbuild-path/convention-typez build-stringz build-vectorz byte-pregexpz byte-pregexp?z byte-ready?z byte-regexpz byte-regexp?zbyte?�byteszbytes->immutable-bytesz bytes->listz bytes->pathzbytes->path-elementzbytes->string/latin-1zbytes->string/localezbytes->string/utf-8z bytes-appendz bytes-append*zbytes-close-converterz bytes-convertzbytes-convert-endzbytes-converter?z bytes-copyz bytes-copy!z bytes-environment-variable-name?z bytes-fill!z bytes-joinz bytes-lengthzbytes-no-nuls?zbytes-open-converterz bytes-refz bytes-set!zbytes-utf-8-indexzbytes-utf-8-lengthzbytes-utf-8-refzbytes<?zbytes=?zbytes>?zbytes?�caaaar�caaadr�caaar�caadar�caaddr�caadr�caar�cadaar�cadadr�cadar�caddar�cadddr�caddr�cadrzcall-in-nested-threadz call-with-atomic-output-filez call-with-break-parameterizationz!call-with-composable-continuationz call-with-continuation-barrierz call-with-continuation-prompt� call-with-current-continuationz*call-with-default-reading-parameterizationz call-with-escape-continuationzcall-with-exception-handlerzcall-with-file-lock/timeoutz%call-with-immediate-continuation-markzcall-with-input-bytes�call-with-input-filezcall-with-input-file*zcall-with-input-stringzcall-with-output-bytes�call-with-output-filezcall-with-output-file*zcall-with-output-stringzcall-with-parameterizationzcall-with-semaphorez call-with-semaphore/enable-break�call-with-values�call/cczcall/ecr� zcartesian-product�cdaaar�cdaadr�cdaar�cdadar�cdaddr�cdadr�cdar�cddaar�cddadr�cddar�cdddar�cddddr�cdddr�cddrr� �ceilingz channel-getz channel-putzchannel-put-evtzchannel-put-evt?zchannel-try-getz channel/czchannel?z chaperone-boxzchaperone-channelz chaperone-continuation-mark-keyz chaperone-contract-property?zchaperone-contract?z chaperone-evtzchaperone-hashzchaperone-hash-setz chaperone-of?zchaperone-procedurezchaperone-procedure*zchaperone-prompt-tagzchaperone-structzchaperone-struct-typezchaperone-vectorz chaperone?� char->integer�char-alphabetic?z char-blank?� char-ci<=?� char-ci<?� char-ci=?� char-ci>=?� char-ci>?� char-downcasez char-foldcasezchar-general-categoryz char-graphic?zchar-inz char-in/czchar-iso-control?�char-lower-case?� char-numeric?zchar-punctuation?� char-ready?zchar-symbolic?zchar-title-case?zchar-titlecase� char-upcase�char-upper-case?zchar-utf-8-length�char-whitespace?�char<=?�char<?�char=?�char>=?�char>?�char?zcheck-duplicate-identifierzcheck-duplicatesz#checked-procedure-check-and-extractz choice-evtzclass->interfacez class-infoz class-sealz class-unsealzclass?z cleanse-path�close-input-port�close-output-portzcoerce-chaperone-contractzcoerce-chaperone-contractszcoerce-contractzcoerce-contract/fzcoerce-contractszcoerce-flat-contractzcoerce-flat-contractszcollect-garbagezcollection-file-pathzcollection-path� combinations�compilez compile-allow-set!-undefinedz$compile-context-preservation-enabledz compile-enforce-module-constantszcompile-syntaxz compiled-expression-recompilezcompiled-expression?zcompiled-module-expression?zcomplete-path?�complex?�compose�compose1�conjoin� conjugate�conszcons/c�cons?�constzcontinuation-mark-key/czcontinuation-mark-key?z continuation-mark-set->contextzcontinuation-mark-set->listz continuation-mark-set->list*zcontinuation-mark-set-firstzcontinuation-mark-set?zcontinuation-marksz continuation-prompt-available?zcontinuation-prompt-tag?z continuation?z contract-continuation-mark-keyz#contract-custom-write-property-proczcontract-exercisezcontract-first-orderz contract-first-order-passes?z contract-late-neg-projectionz contract-namez contract-proczcontract-projectionzcontract-property?zcontract-random-generatez contract-random-generate-failz contract-random-generate-fail?z0contract-random-generate-get-current-environmentz contract-random-generate-stashz contract-random-generate/choosezcontract-stronger?zcontract-struct-exercisezcontract-struct-generatez#contract-struct-late-neg-projectionz contract-struct-list-contract?z contract-val-first-projectionz contract?zconvert-streamzcopy-directory/files� copy-filez copy-port�cos�cosh�countzcurrent-blame-formatz current-break-parameterizationzcurrent-code-inspectorz current-command-line-argumentszcurrent-compilezcurrent-compiled-file-rootszcurrent-continuation-markszcurrent-contract-regionzcurrent-custodianzcurrent-directoryzcurrent-directory-for-userz current-drivez current-environment-variableszcurrent-error-portz current-evalz#current-evt-pseudo-random-generatorz current-force-delete-permissionszcurrent-futurezcurrent-gc-millisecondsz"current-get-interaction-input-portz current-inexact-milliseconds�current-input-portzcurrent-inspectorz current-library-collection-linksz current-library-collection-pathsz current-loadzcurrent-load-extensionz current-load-relative-directoryzcurrent-load/use-compiledzcurrent-localezcurrent-loggerzcurrent-memory-usezcurrent-millisecondszcurrent-module-declare-namez current-module-declare-sourcez current-module-name-resolverz current-module-path-for-loadzcurrent-namespace�current-output-portzcurrent-parameterizationzcurrent-plumberz$current-preserved-thread-cell-valuesz current-printz current-process-millisecondszcurrent-prompt-readz current-pseudo-random-generatorzcurrent-read-interactionzcurrent-reader-guardzcurrent-readtablezcurrent-secondszcurrent-security-guardz!current-subprocess-custodian-modezcurrent-threadzcurrent-thread-groupz!current-thread-initial-stack-sizez current-write-relative-directory�curry�curryrzcustodian-box-valuezcustodian-box?zcustodian-limit-memoryzcustodian-managed-listz&custodian-memory-accounting-available?zcustodian-require-memoryzcustodian-shutdown-allz custodian?z custom-print-quotable-accessorzcustom-print-quotable?zcustom-write-accessorzcustom-write-property-procz custom-write?�datezdate*zdate*-nanosecondzdate*-time-zone-namezdate*?zdate-dayz date-dst?z date-hourz date-minutez date-monthz date-secondzdate-time-zone-offsetz date-week-dayz date-yearz date-year-dayzdate?z datum->syntaxzdatum-intern-literalz default-continuation-prompt-tagzdegrees->radianszdelete-directoryzdelete-directory/files� delete-file� denominatorz dict->listzdict-can-functional-set?zdict-can-remove-keys?z dict-clearz dict-clear!z dict-copyz dict-countz dict-empty?z dict-for-eachz dict-has-key?zdict-implements/czdict-implements?zdict-iter-contractzdict-iterate-firstzdict-iterate-keyzdict-iterate-nextzdict-iterate-valuezdict-key-contractz dict-keyszdict-mapz dict-mutable?zdict-refz dict-ref!z dict-removez dict-remove!zdict-setz dict-set!z dict-set*z dict-set*!z dict-updatez dict-update!zdict-value-contractz dict-valueszdict?zdirectory-exists?zdirectory-list�disjoin�displayz display-lineszdisplay-lines-to-filezdisplay-to-file� displaylnzdouble-flonum?r� zdrop-common-prefixz drop-right�dropfz dropf-rightzdump-memory-statszdup-input-portzdup-output-portz dynamic->*zdynamic-get-fieldzdynamic-object/cz dynamic-placezdynamic-place*zdynamic-requirezdynamic-require-for-syntaxz dynamic-sendzdynamic-set-field!� dynamic-wind�eighth�emptyzempty-sequencez empty-stream�empty?zenvironment-variables-copyzenvironment-variables-nameszenvironment-variables-refzenvironment-variables-set!zenvironment-variables?�eofzeof-evt� eof-object?zephemeron-valuez ephemeron?�eprintfzeq-contract-valz eq-contract?z eq-hash-code�eq?zequal-contract-valzequal-contract?zequal-hash-codezequal-secondary-hash-codezequal<%>�equal?z equal?/recurz eqv-hash-code�eqv?�errorzerror-display-handlerzerror-escape-handlerzerror-print-context-lengthzerror-print-source-locationzerror-print-widthzerror-value->string-handler�evalzeval-jit-enabledz eval-syntaxr� zevt/czevt?�exact->inexactz exact-ceilingz exact-floorzexact-integer?zexact-nonnegative-integer?zexact-positive-integer?z exact-roundzexact-truncate�exact?zexecutable-yield-handler�exitz exit-handler�exnzexn-continuation-marksz exn-messagez exn:breakzexn:break-continuationzexn:break:hang-upzexn:break:hang-up?zexn:break:terminatezexn:break:terminate?z exn:break?zexn:failzexn:fail:contractzexn:fail:contract:arityzexn:fail:contract:arity?zexn:fail:contract:blamez exn:fail:contract:blame-objectzexn:fail:contract:blame?z exn:fail:contract:continuationz exn:fail:contract:continuation?z exn:fail:contract:divide-by-zeroz!exn:fail:contract:divide-by-zero?z#exn:fail:contract:non-fixnum-resultz$exn:fail:contract:non-fixnum-result?zexn:fail:contract:variablez exn:fail:contract:variable-idzexn:fail:contract:variable?zexn:fail:contract?zexn:fail:filesystemzexn:fail:filesystem:errnoz exn:fail:filesystem:errno-errnozexn:fail:filesystem:errno?zexn:fail:filesystem:existszexn:fail:filesystem:exists?z"exn:fail:filesystem:missing-modulez'exn:fail:filesystem:missing-module-pathz#exn:fail:filesystem:missing-module?zexn:fail:filesystem:versionz exn:fail:filesystem:version?zexn:fail:filesystem?zexn:fail:networkzexn:fail:network:errnoz exn:fail:network:errno-errnozexn:fail:network:errno?zexn:fail:network?zexn:fail:objectzexn:fail:object?zexn:fail:out-of-memoryzexn:fail:out-of-memory?z exn:fail:readzexn:fail:read-srclocszexn:fail:read:eofzexn:fail:read:eof?zexn:fail:read:non-charzexn:fail:read:non-char?zexn:fail:read?zexn:fail:syntaxzexn:fail:syntax-exprsz exn:fail:syntax:missing-modulez#exn:fail:syntax:missing-module-pathz exn:fail:syntax:missing-module?zexn:fail:syntax:unboundzexn:fail:syntax:unbound?zexn:fail:syntax?zexn:fail:unsupportedzexn:fail:unsupported?z exn:fail:userzexn:fail:user?z exn:fail?zexn:misc:match?zexn:missing-module-accessorzexn:missing-module?zexn:srclocs-accessorz exn:srclocs?zexn?�exp�expandz expand-oncez expand-syntaxzexpand-syntax-oncezexpand-syntax-to-top-formzexpand-to-top-formzexpand-user-pathz explode-path�exptzexternalizable<%>zfailure-result/czfalse?z field-names�fifthz file->byteszfile->bytes-linesz file->linesz file->listz file->stringz file->valuez file-exists?zfile-name-from-pathzfile-or-directory-identityz file-or-directory-modify-secondsz file-or-directory-permissionsz file-positionzfile-position*z file-sizezfile-stream-buffer-modezfile-stream-port?z file-truncatezfilename-extensionzfilesystem-change-evtz filesystem-change-evt-cancelzfilesystem-change-evt?zfilesystem-root-listr� z filter-mapz filter-notzfilter-read-input-portzfind-executable-pathz find-filesz find-library-collection-linksz find-library-collection-pathszfind-relative-pathzfind-system-path�findfr� z first-or/czfixnum?z flat-contractzflat-contract-predicatezflat-contract-property?zflat-contract?zflat-named-contract�flattenzfloating-point-bytes->realzflonum?�floorz flush-outputz fold-files�foldl�foldr�for-each�force�format�fourth�fprintfzfree-identifier=?zfree-label-identifier=?zfree-template-identifier=?z free-transformer-identifier=?zfsemaphore-countzfsemaphore-postzfsemaphore-try-wait?zfsemaphore-waitz fsemaphore?�futurezfuture?zfutures-enabled?�gcdzgenerate-member-keyzgenerate-temporariesz generic-set?zgeneric?�gensymzget-output-byteszget-output-stringzget-preferencez get/build-late-neg-projectionz get/build-val-first-projection�getenvzglobal-port-print-handlerzgroup-byzgroup-execute-bitzgroup-read-bitzgroup-write-bitz guard-evtz handle-evtz handle-evt?z has-blame?z has-contract?�hashz hash->listz hash-clearz hash-clear!z hash-copyzhash-copy-clearz hash-countz hash-empty?zhash-eq?z hash-equal?z hash-eqv?z hash-for-eachz hash-has-key?zhash-iterate-firstzhash-iterate-keyzhash-iterate-key+valuezhash-iterate-nextzhash-iterate-pairzhash-iterate-valuez hash-keyszhash-mapzhash-placeholder?zhash-refz hash-ref!z hash-removez hash-remove!zhash-setz hash-set!z hash-set*z hash-set*!z hash-updatez hash-update!z hash-valuesz hash-weak?zhash/czhash?�hasheq�hasheqvzidentifier-bindingzidentifier-binding-symbolzidentifier-label-bindingz identifier-prune-lexical-contextz!identifier-prune-to-source-modulez)identifier-remove-from-definition-contextzidentifier-template-bindingz identifier-transformer-bindingz identifier?�identityzif/c� imag-partz immutable?zimpersonate-boxzimpersonate-channelz!impersonate-continuation-mark-keyzimpersonate-hashzimpersonate-hash-setzimpersonate-procedurezimpersonate-procedure*zimpersonate-prompt-tagzimpersonate-structzimpersonate-vectorzimpersonator-contract?zimpersonator-ephemeronzimpersonator-of?z"impersonator-prop:application-markzimpersonator-prop:blamez impersonator-prop:contractedz)impersonator-property-accessor-procedure?zimpersonator-property?z impersonator?zimplementation?zimplementation?/czin-byteszin-bytes-lineszin-combinationszin-cyclezin-dictz in-dict-keysz in-dict-pairszin-dict-valuesz in-directoryzin-hashz in-hash-keysz in-hash-pairszin-hash-valueszin-immutable-hashzin-immutable-hash-keyszin-immutable-hash-pairszin-immutable-hash-valueszin-immutable-setz in-indexedzin-input-port-byteszin-input-port-charszin-lineszin-listzin-mlistzin-mutable-hashzin-mutable-hash-keyszin-mutable-hash-pairszin-mutable-hash-valueszin-mutable-setz in-naturalsz in-parallelzin-permutationszin-portz in-producerzin-rangez in-sequenceszin-setzin-slicez in-streamz in-stringz in-syntaxzin-valuezin-values*-sequencezin-values-sequencez in-vectorz in-weak-hashzin-weak-hash-keyszin-weak-hash-pairszin-weak-hash-valuesz in-weak-set�inexact->exactz inexact-real?�inexact?z infinite?zinput-port-append� input-port?z inspector?z instanceof/c� integer->charzinteger->integer-byteszinteger-bytes->integerz integer-inzinteger-lengthz integer-sqrtzinteger-sqrt/remainder�integer?zinterface->method-nameszinterface-extension?z interface?z/internal-definition-context-binding-identifiersz%internal-definition-context-introducez internal-definition-context-sealz internal-definition-context?zis-a?zis-a?/czkeyword->stringz keyword-applyz keyword<?zkeyword?zkeywords-matchz kill-thread�lastz last-pair�lcm�lengthzliberal-define-context?z link-exists?�listzlist*zlist*ofz list->byteszlist->mutable-setzlist->mutable-seteqzlist->mutable-seteqvz list->setz list->seteqz list->seteqv� list->string� list->vectorzlist->weak-setzlist->weak-seteqzlist->weak-seteqvzlist-contract?z list-prefix?�list-refzlist-set� list-tailz list-updatezlist/c�list?zlisten-port-number?�listof�loadzload-extensionzload-on-demand-enabledz load-relativezload-relative-extensionzload/cdzload/use-compiledz local-expandzlocal-expand/capture-liftszlocal-transformer-expandz&local-transformer-expand/capture-liftszlocale-string-encoding�logzlog-all-levelsz log-level-evtz log-level?z log-max-levelz log-messagez log-receiver?z logger-namezlogger?� magnitudezmake-arity-at-leastzmake-base-empty-namespacezmake-base-namespacez make-bytesz make-channelzmake-chaperone-contractzmake-continuation-mark-keyz make-continuation-prompt-tagz make-contractzmake-custodianzmake-custodian-boxzmake-custom-hashzmake-custom-hash-typeszmake-custom-setzmake-custom-set-typesz make-datez make-date*zmake-derived-parameterzmake-directoryzmake-directory*zmake-do-sequencezmake-empty-namespacezmake-environment-variableszmake-ephemeronzmake-exnzmake-exn:breakzmake-exn:break:hang-upzmake-exn:break:terminatez make-exn:failzmake-exn:fail:contractz make-exn:fail:contract:arityz make-exn:fail:contract:blamez#make-exn:fail:contract:continuationz%make-exn:fail:contract:divide-by-zeroz(make-exn:fail:contract:non-fixnum-resultz make-exn:fail:contract:variablezmake-exn:fail:filesystemz make-exn:fail:filesystem:errnoz make-exn:fail:filesystem:existsz'make-exn:fail:filesystem:missing-modulez make-exn:fail:filesystem:versionzmake-exn:fail:networkzmake-exn:fail:network:errnozmake-exn:fail:objectzmake-exn:fail:out-of-memoryzmake-exn:fail:readzmake-exn:fail:read:eofzmake-exn:fail:read:non-charzmake-exn:fail:syntaxz#make-exn:fail:syntax:missing-modulez make-exn:fail:syntax:unboundzmake-exn:fail:unsupportedzmake-exn:fail:userzmake-file-or-directory-linkzmake-flat-contractzmake-fsemaphorez make-genericz!make-handle-get-preference-lockedz make-hashzmake-hash-placeholderz make-hasheqzmake-hasheq-placeholderz make-hasheqvzmake-hasheqv-placeholderzmake-immutable-custom-hashzmake-immutable-hashzmake-immutable-hasheqzmake-immutable-hasheqvzmake-impersonator-propertyzmake-input-portz make-input-port/read-to-peekzmake-inspectorzmake-keyword-procedurezmake-known-char-range-listzmake-limited-input-port� make-listzmake-lock-file-namezmake-log-receiverz make-loggerzmake-mixin-contractzmake-mutable-custom-setz make-none/cz make-objectzmake-output-portzmake-parameterzmake-parent-directory*zmake-phantom-bytesz make-pipezmake-pipe-with-specialszmake-placeholderz make-plumber� make-polarzmake-prefab-structzmake-primitive-classzmake-proj-contractz make-pseudo-random-generatorzmake-reader-graphzmake-readtable�make-rectangularzmake-rename-transformerzmake-resolved-module-pathzmake-security-guardzmake-semaphorezmake-set!-transformerzmake-shared-byteszmake-sibling-inspectorzmake-special-commentz make-srcloc� make-stringzmake-struct-field-accessorzmake-struct-field-mutatorzmake-struct-typezmake-struct-type-propertyz make-syntax-delta-introducerzmake-syntax-introducerzmake-temporary-filez'make-tentative-pretty-print-output-portzmake-thread-cellzmake-thread-group� make-vectorz make-weak-boxzmake-weak-custom-hashzmake-weak-custom-setzmake-weak-hashzmake-weak-hasheqzmake-weak-hasheqvzmake-will-executor�mapzmatch-equality-testzmatches-arity-exactly?�max�mcar�mcdr�mcons�memberzmember-name-key-hash-codezmember-name-key=?zmember-name-key?�memf�memq�memvz merge-inputzmethod-in-interface?�minzmixin-contractzmodule->exportszmodule->importszmodule->language-infozmodule->namespacez'module-compiled-cross-phase-persistent?zmodule-compiled-exportszmodule-compiled-importsz module-compiled-language-infozmodule-compiled-namezmodule-compiled-submoduleszmodule-declared?zmodule-path-index-joinzmodule-path-index-resolvezmodule-path-index-splitzmodule-path-index-submodulezmodule-path-index?z module-path?zmodule-predefined?zmodule-provide-protected?�modulozmpair?z mutable-setz mutable-seteqzmutable-seteqvzn->thznack-guard-evtz!namespace-anchor->empty-namespaceznamespace-anchor->namespaceznamespace-anchor?znamespace-attach-modulez#namespace-attach-module-declarationznamespace-base-phaseznamespace-mapped-symbolsznamespace-module-identifierznamespace-module-registryznamespace-requireznamespace-require/constantznamespace-require/copyz namespace-require/expansion-timez namespace-set-variable-value!z namespace-symbol->identifierznamespace-syntax-introducez namespace-undefine-variable!znamespace-unprotect-moduleznamespace-variable-valuez namespace?znan?znatural-number/c�negate� negative?z never-evtu new-∀/cu new-∃/c�newline�ninthznon-empty-listofznon-empty-string?znone/cznormal-case-pathznormalize-arityznormalize-pathznormalized-arity?�notznot/c�null�null?�number->string�number?� numeratorzobject%zobject->vectorz object-infozobject-interfacez object-method-arity-includes?z object-namezobject-or-false=?zobject=?zobject?r� zone-of/czopen-input-bytes�open-input-filezopen-input-output-filezopen-input-stringzopen-output-bytes�open-output-filezopen-output-nowherezopen-output-stringzor/czorder-of-magnitude�ormapzother-execute-bitzother-read-bitzother-write-bit� output-port?�pair?zparameter-procedure=?z parameter/cz parameter?zparameterization?zparse-command-line� partitionz path->byteszpath->complete-pathzpath->directory-pathz path->stringzpath-add-suffixzpath-convention-typezpath-element->byteszpath-element->stringz path-element?zpath-for-some-system?zpath-list-string->path-listz path-onlyzpath-replace-suffixz path-string?zpath<?zpath?zpathlist-closurez peek-bytezpeek-byte-or-specialz peek-bytesz peek-bytes!zpeek-bytes!-evtzpeek-bytes-avail!zpeek-bytes-avail!*zpeek-bytes-avail!-evtz peek-bytes-avail!/enable-breakzpeek-bytes-evt� peek-charzpeek-char-or-specialz peek-stringz peek-string!zpeek-string!-evtzpeek-string-evtzpeeking-input-port� permutationszphantom-bytes?�pizpi.fzpipe-content-lengthz place-breakz place-channelzplace-channel-getzplace-channel-putzplace-channel-put/getzplace-channel?zplace-dead-evtzplace-enabled?z place-killzplace-location?zplace-message-allowed?z place-sleepz place-waitzplace?zplaceholder-getzplaceholder-set!z placeholder?zplumber-add-flush!zplumber-flush-allz plumber-flush-handle-remove!zplumber-flush-handle?zplumber?zpoll-guard-evtz port->byteszport->bytes-linesz port->linesz port->listz port->stringzport-closed-evtz port-closed?zport-commit-peekedzport-count-lines!zport-count-lines-enabledzport-counts-lines?zport-display-handlerzport-file-identityzport-file-unlockzport-next-locationz port-number?zport-print-handlerzport-progress-evtz port-provides-progress-evts?zport-read-handlerzport-try-file-lock?zport-write-handlerzport-writes-atomic?zport-writes-special?�port?� positive?z predicate/czprefab-key->struct-typez prefab-key?zprefab-struct-keyzpreferences-lock-file-mode�pregexpzpregexp?zpretty-displayz pretty-format� pretty-printz"pretty-print-.-symbol-without-barsz#pretty-print-abbreviate-read-macroszpretty-print-columnsz pretty-print-current-style-tablezpretty-print-depthz pretty-print-exact-as-decimalz pretty-print-extend-style-tablezpretty-print-handlerzpretty-print-newlinez pretty-print-post-print-hookzpretty-print-pre-print-hookzpretty-print-print-hookzpretty-print-print-linezpretty-print-remap-stylablez pretty-print-show-inexactnesszpretty-print-size-hookzpretty-print-style-table?zpretty-printingz pretty-writezprimitive-closure?zprimitive-result-arity� primitive?�printzprint-as-expressionzprint-boolean-long-formz print-boxz print-graphzprint-hash-tablezprint-mpair-curly-braceszprint-pair-curly-braceszprint-reader-abbreviationsz print-structzprint-syntax-widthzprint-unreadablezprint-vector-lengthz printable/cz printable<%>�printf�printlnzprocedure->methodzprocedure-arityzprocedure-arity-includes/czprocedure-arity-includes?zprocedure-arity?z procedure-closure-contents-eq?zprocedure-extract-targetzprocedure-keywordszprocedure-reduce-arityz procedure-reduce-keyword-arityzprocedure-renamezprocedure-result-arityzprocedure-specializezprocedure-struct-type?� procedure?�processzprocess*zprocess*/portsz process/portszprocessor-countz progress-evt?zpromise-forced?zpromise-running?z promise/cz promise/name?zpromise?zprop:arity-stringzprop:arrow-contractz prop:arrow-contract-get-infozprop:arrow-contract?z prop:blamezprop:chaperone-contractzprop:checked-procedurez prop:contractzprop:contractedzprop:custom-print-quotablezprop:custom-writez prop:dictzprop:dict/contractzprop:equal+hashzprop:evtzprop:exn:missing-modulezprop:exn:srclocszprop:expansion-contextszprop:flat-contractzprop:impersonator-ofzprop:input-portzprop:liberal-define-contextzprop:object-namezprop:opt-chaperone-contractz$prop:opt-chaperone-contract-get-testz prop:opt-chaperone-contract?zprop:orc-contractz"prop:orc-contract-get-subcontractszprop:orc-contract?zprop:output-portzprop:place-locationzprop:procedurezprop:recursive-contractz prop:recursive-contract-unrollzprop:recursive-contract?zprop:rename-transformerz prop:sequencezprop:set!-transformerz prop:streamzproper-subset?z pseudo-random-generator->vectorz pseudo-random-generator-vector?zpseudo-random-generator?zput-preferences�putenv�quotientzquotient/remainderzradians->degrees�raisezraise-argument-errorzraise-arguments-errorzraise-arity-errorzraise-blame-errorzraise-contract-errorzraise-mismatch-errorzraise-not-cons-blame-errorzraise-range-errorzraise-result-errorzraise-syntax-errorzraise-type-errorzraise-user-error�randomz random-seed�range� rational?� rationalize�readzread-accept-bar-quotezread-accept-boxzread-accept-compiledzread-accept-dotzread-accept-graphzread-accept-infix-dotzread-accept-langzread-accept-quasiquotezread-accept-reader� read-bytezread-byte-or-specialz read-bytesz read-bytes!zread-bytes!-evtzread-bytes-avail!zread-bytes-avail!*zread-bytes-avail!-evtz read-bytes-avail!/enable-breakzread-bytes-evtzread-bytes-linezread-bytes-line-evtzread-case-sensitivez read-cdot� read-charzread-char-or-specialzread-curly-brace-as-parenzread-curly-brace-with-tagzread-decimal-as-inexactzread-eval-print-loopz read-language� read-linez read-line-evtzread-on-demand-sourcez read-square-bracket-as-parenz read-square-bracket-with-tag� read-stringz read-string!zread-string!-evtzread-string-evtz read-syntaxzread-syntax/recursivezread/recursivezreadtable-mappingz readtable?zreal->decimal-stringzreal->double-flonumzreal->floating-point-byteszreal->single-flonumzreal-in� real-part�real?zreencode-input-portzreencode-output-port�regexpz regexp-matchz regexp-match*zregexp-match-evtzregexp-match-exact?zregexp-match-peekzregexp-match-peek-immediatezregexp-match-peek-positionsz regexp-match-peek-positions*z%regexp-match-peek-positions-immediatez)regexp-match-peek-positions-immediate/endz regexp-match-peek-positions/endzregexp-match-positionszregexp-match-positions*zregexp-match-positions/endzregexp-match/endz regexp-match?zregexp-max-lookbehind� regexp-quotezregexp-replacezregexp-replace*zregexp-replace-quotezregexp-replacesz regexp-splitzregexp-try-matchzregexp?zrelative-path?zrelocate-input-portzrelocate-output-port� remainder�remfzremf*r� zremove*zremove-duplicates�remqzremq*�remvzremv*zrename-contractzrename-file-or-directoryzrename-transformer-targetzrename-transformer?z replace-evtz reroot-pathz resolve-pathzresolved-module-path-namezresolved-module-path?r� �reverse�round�secondz seconds->datezsecurity-guard?zsemaphore-peek-evtzsemaphore-peek-evt?zsemaphore-postzsemaphore-try-wait?zsemaphore-waitzsemaphore-wait/enable-breakz semaphore?zsequence->listzsequence->streamzsequence-add-betweenzsequence-andmapzsequence-appendzsequence-countzsequence-filterz sequence-foldzsequence-for-eachzsequence-generatezsequence-generate*zsequence-lengthz sequence-mapzsequence-ormapz sequence-refz sequence-tailz sequence/cz sequence?�setzset!-transformer-procedurezset!-transformer?z set->listz set->streamzset-addzset-add!zset-box!z set-clearz set-clear!zset-copyzset-copy-clearz set-countz set-empty?zset-eq?z set-equal?zset-eqv?z set-firstz set-for-eachzset-implements/czset-implements?z set-intersectzset-intersect!zset-mapz set-mcar!z set-mcdr!z set-member?z set-mutable?zset-phantom-bytes!zset-port-next-location!z set-removez set-remove!zset-restzset-some-basic-contracts!z set-subtractz set-subtract!zset-symmetric-differencezset-symmetric-difference!z set-unionz set-union!z set-weak?zset/czset=?zset?�seteq�seteqv�seventh�sgnz shared-bytesz shell-executezshrink-path-wrt�shufflezsimple-form-pathz simplify-path�sinzsingle-flonum?�sinh�sixthzskip-projection-wrapper?�sleepzsome-system-path->string�sortzspecial-comment-valuezspecial-comment?zspecial-filter-input-portzsplit-atzsplit-at-rightzsplit-common-prefixz split-pathz splitf-atzsplitf-at-right�sqr�sqrt�srcloczsrcloc->stringz srcloc-columnz srcloc-linezsrcloc-positionz srcloc-sourcez srcloc-spanzsrcloc?z stop-afterz stop-beforez stream->listzstream-add-betweenz stream-andmapz stream-appendz stream-countz stream-empty?z stream-filterz stream-firstz stream-foldzstream-for-eachz stream-lengthz stream-mapz stream-ormapz stream-refz stream-restz stream-tailzstream/czstream?rJ zstring->bytes/latin-1zstring->bytes/localezstring->bytes/utf-8zstring->immutable-stringzstring->keyword� string->list�string->numberz string->pathzstring->path-elementzstring->some-system-path�string->symbolzstring->uninterned-symbolzstring->unreadable-symbol� string-appendzstring-append*� string-ci<=?� string-ci<?� string-ci=?� string-ci>=?� string-ci>?zstring-contains?� string-copyz string-copy!zstring-downcasez!string-environment-variable-name?� string-fill!zstring-foldcasez string-joinz string-len/c� string-lengthzstring-locale-ci<?zstring-locale-ci=?zstring-locale-ci>?zstring-locale-downcasezstring-locale-upcasezstring-locale<?zstring-locale=?zstring-locale>?zstring-no-nuls?zstring-normalize-nfczstring-normalize-nfdzstring-normalize-nfkczstring-normalize-nfkdzstring-normalize-spacesz string-port?zstring-prefix?� string-refzstring-replace� string-set!z string-splitzstring-suffix?zstring-titlecasez string-trimz string-upcasezstring-utf-8-length� string<=?�string<?�string=?� string>=?�string>?�string?zstruct->vectorzstruct-accessor-procedure?z struct-constructor-procedure?z struct-infozstruct-mutator-procedure?zstruct-predicate-procedure?zstruct-type-infoz struct-type-make-constructorzstruct-type-make-predicatez(struct-type-property-accessor-procedure?zstruct-type-property/czstruct-type-property?z struct-type?zstruct:arity-at-leastzstruct:arrow-contract-infoz struct:datez struct:date*z struct:exnzstruct:exn:breakzstruct:exn:break:hang-upzstruct:exn:break:terminatezstruct:exn:failzstruct:exn:fail:contractz struct:exn:fail:contract:arityz struct:exn:fail:contract:blamez%struct:exn:fail:contract:continuationz'struct:exn:fail:contract:divide-by-zeroz*struct:exn:fail:contract:non-fixnum-resultz!struct:exn:fail:contract:variablezstruct:exn:fail:filesystemz struct:exn:fail:filesystem:errnoz!struct:exn:fail:filesystem:existsz)struct:exn:fail:filesystem:missing-modulez"struct:exn:fail:filesystem:versionzstruct:exn:fail:networkz struct:exn:fail:network:errnozstruct:exn:fail:objectz struct:exn:fail:out-of-memoryzstruct:exn:fail:readzstruct:exn:fail:read:eofz struct:exn:fail:read:non-charzstruct:exn:fail:syntaxz%struct:exn:fail:syntax:missing-modulez struct:exn:fail:syntax:unboundzstruct:exn:fail:unsupportedzstruct:exn:fail:userz struct:srclocz struct:wrapped-extra-arg-arrowzstruct?�sub1�subbytesz subclass?z subclass?/c� subprocesszsubprocess-group-enabledzsubprocess-killzsubprocess-pidzsubprocess-statuszsubprocess-waitz subprocess?zsubset?� substringz suggest/c�symbol->stringzsymbol-interned?zsymbol-unreadable?zsymbol<?zsymbol=?�symbol?�symbols�synczsync/enable-breakz sync/timeoutzsync/timeout/enable-breakz syntax->datumz syntax->listz syntax-armz syntax-columnzsyntax-debug-infoz syntax-disarmzsyntax-ez syntax-linezsyntax-local-bind-syntaxeszsyntax-local-certifierzsyntax-local-contextz syntax-local-expand-expressionzsyntax-local-get-shadowerz"syntax-local-identifier-as-bindingzsyntax-local-introducezsyntax-local-lift-contextz syntax-local-lift-expressionzsyntax-local-lift-modulez(syntax-local-lift-module-end-declarationzsyntax-local-lift-providezsyntax-local-lift-requirez#syntax-local-lift-values-expressionz$syntax-local-make-definition-contextz"syntax-local-make-delta-introducerz'syntax-local-module-defined-identifierszsyntax-local-module-exportsz(syntax-local-module-required-identifierszsyntax-local-namezsyntax-local-phase-levelzsyntax-local-submodulesz*syntax-local-transforming-module-provides?zsyntax-local-valuez syntax-local-value/immediatezsyntax-original?zsyntax-positionzsyntax-propertyzsyntax-property-preserved?zsyntax-property-symbol-keyszsyntax-protectz syntax-rearmzsyntax-recertifyzsyntax-shift-phase-levelz syntax-sourcezsyntax-source-modulez syntax-spanz syntax-taintzsyntax-tainted?zsyntax-track-originz&syntax-transforming-module-expression?z syntax-transforming-with-lifts?zsyntax-transforming?zsyntax/czsyntax?�systemzsystem*zsystem*/exit-codezsystem-big-endian?zsystem-idle-evtzsystem-language+countryzsystem-library-subpathzsystem-path-convention-typez system-typezsystem/exit-codeztail-marks-match?r� ztake-common-prefixz take-right�takefz takef-right�tan�tanhztcp-abandon-portz tcp-acceptztcp-accept-evtztcp-accept-ready?ztcp-accept/enable-breakz tcp-addressesz tcp-closez tcp-connectztcp-connect/enable-breakz tcp-listenz tcp-listener?z tcp-port?z"tentative-pretty-print-port-cancelz$tentative-pretty-print-port-transfer�tenthzterminal-port?zthe-unsupplied-arg�third�threadzthread-cell-refzthread-cell-set!zthread-cell-values?z thread-cell?zthread-dead-evtz thread-dead?z thread-group?zthread-receivezthread-receive-evtz thread-resumezthread-resume-evtzthread-rewind-receivezthread-running?z thread-sendzthread-suspendzthread-suspend-evtzthread-try-receivez thread-waitzthread/suspend-to-killzthread?z time-apply�touchztransplant-input-portztransplant-output-port�true�truncatez udp-addressesz udp-bind!z udp-bound?z udp-closez udp-connect!zudp-connected?zudp-multicast-interfacezudp-multicast-join-group!zudp-multicast-leave-group!zudp-multicast-loopback?z udp-multicast-set-interface!zudp-multicast-set-loopback!zudp-multicast-set-ttl!zudp-multicast-ttlzudp-open-socketz udp-receive!z udp-receive!*zudp-receive!-evtzudp-receive!/enable-breakzudp-receive-ready-evtzudp-sendz udp-send*z udp-send-evtzudp-send-ready-evtz udp-send-toz udp-send-to*zudp-send-to-evtzudp-send-to/enable-breakzudp-send/enable-breakzudp?�unboxzuncaught-exception-handlerzunit?zunspecified-domzunsupplied-arg?zuse-collection-link-pathszuse-compiled-file-pathsz use-user-specific-search-pathszuser-execute-bitz user-read-bitzuser-write-bitz value-blamezvalue-contract�valuesz#variable-reference->empty-namespacez%variable-reference->module-base-phasez0variable-reference->module-declaration-inspectorz%variable-reference->module-path-indexz!variable-reference->module-sourcez variable-reference->namespacezvariable-reference->phasez(variable-reference->resolved-module-pathz variable-reference-constant?zvariable-reference?�vectorzvector->immutable-vector� vector->listz vector->pseudo-random-generatorz vector->pseudo-random-generator!zvector->valuesz vector-appendz vector-argmaxz vector-argminz vector-copyz vector-copy!z vector-countz vector-dropzvector-drop-right� vector-fill!z vector-filterzvector-filter-notzvector-immutablezvector-immutable/czvector-immutableof� vector-lengthz vector-mapz vector-map!z vector-memberz vector-memqz vector-memvz vector-refz vector-set!z vector-set*!z vector-set-performance-stats!zvector-split-atzvector-split-at-rightz vector-takezvector-take-rightzvector/c�vector?�vectorof�version�voidzvoid?zweak-box-valuez weak-box?zweak-setz weak-seteqz weak-seteqvz will-executezwill-executor?z will-registerzwill-try-executezwith-input-from-bytes�with-input-from-filezwith-input-from-stringzwith-output-to-bytes�with-output-to-file�with-output-to-stringzwould-be-futurezwrap-evtzwrapped-extra-arg-arrowz0wrapped-extra-arg-arrow-extra-neg-party-argumentz!wrapped-extra-arg-arrow-real-funczwrapped-extra-arg-arrow?z writable<%>�write� write-bytez write-byteszwrite-bytes-availzwrite-bytes-avail*zwrite-bytes-avail-evtz write-bytes-avail/enable-break� write-charz write-specialzwrite-special-avail*zwrite-special-evtz write-string� write-to-file�writeln�xorr� z~.az~.sz~.vz~az~ez~rz~sz~vz[([{]z[)\]}]z()[\]{}",\'`;\sz!(?:\|[^|]*\||\\[\w\W]|[^|\\%s]+)+z(?:#e)?(?:#d)?(?:#e)?z(?:[defls][-+]?\d+)z (?:\d+(?:/\d+|\.\d*)?|\.\d+)z>(?:%s|(?:\d+#+(?:\.#*|/\d+#*)?|\.\d+#+|\d+(?:\.\d*#+|/\d+#+)))z(?:z?)z(?:(?:inf|nan)\.[0f])z(?:[-+]?z|[-+]�)r8 z(?!\Z)�unquoted-datumz(?s)#;|#*z;[^\n\r\x85\u2028\u2029]*rC � block-commentz(?u)\s+z(?i)z [-+]?\d+(?=[z])rH z/[-+]?(\d+(\.\d*)?|\.\d+)([deflst][-+]?\d+)?(?=[z[-+]?(z([-+]z ?i)?|[-+]z?i)(?=[z (?i)(#d)?(z?i|�@z)(?=[z (?i)(([-+]?z t[-+]?\d+)|[-+](inf|nan)\.t)(?=[z(?iu)(#[ei])?#b%sz(?iu)(#[ei])?#o%sz(?iu)(#[ei])?#x%sz(?iu)(#d)?#i%sz#?")rH rJ 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))rH r� z`|,@?z[|\\]�datumz quote(?=[%s])r� )rH �quasiquoted-datumzquasiquote(?=[%s]))rH � unquoted-listz(?=[%s])r� �datum*r� z,@?)rH r� zunquote(-splicing)?(?=[%s]))rH �quasiquoted-listr� )rH � quoted-listrS rT z[^#|]+|.rI zG(?s)\\([0-7]{1,3}|x[\da-fA-F]{1,2}|u[\da-fA-F]{1,4}|U[\da-fA-F]{1,8}|.)rX ) rY r� r� r� r� r� r� r� r� r� r� rJ N)8rZ r[ r\ r] r^ r_ r` ra rb � _keywords� _builtins�_opening_parenthesis�_closing_parenthesis� _delimiters�_symbol�_exact_decimal_prefix� _exponent�_inexact_simple_no_hashes�_inexact_simple�_inexact_normal_no_hashes�_inexact_normal�_inexact_special� _inexact_real�_inexact_unsignedr r r rt ru r r r= r< rv rw rx r �Double�Heredocr{ �Regexr r| r rz r � Namespacer ry r r r r r+ r} r~ r� r3 r2 r r N sS � � � � � �� � �D� #�C��� �G�-�-�-�I� �"8�9�I�^�I�Be �I�N $��$��$�K�2�[�@�G� 4��&�I� ?� �2�4M�N�O�O�0I�0I�09� � �!;� � �&5�o�y�y�y�A�O�/���-<�_�_�-=�-=�-=�?�M�M�(7���9I�9I�9I�J�� "�5� )� �� .� /� � ,�W� 5� )�7�>� :� �W�&�� 8� �� $� $� +@�*?�*?���� M� �^�V� %� %� $�#�#�[�[�[�2�39�<�� I� I� $�#�#�%>�%>�%>�'�'�'�)B�)B�)B��k�k�� #�F� ,� ,� �m�m� .� .� .�0A�0A�0A��m�m�]�]�]�K�K�K�9�:@�,� � � � �o�o�{�{�{�,�-3�\�6� C� "�G� +�V�Z�� @� "�G� +�V�Z�� @� "�G� +�V�Z�� @� �� (�&�,�� ?� �V�]�$6� 7� -�v�~�v� F� 6�� �V� L� +�V�[�&� A� &�� �f� =� %�d�m�V� <� �w� �� 3�V� <� !� �X�g�'�� � 8� 8� :� ��*�N� ;� 1�;� >�� I� /�2F� F� �/� 1�AB �H �x� � �f�m�V� ,� �u� � �G�F�O�O� � "�;�� 7� � �G�G� � � � � +�W� %� '� �8� :� ;� "�[� 0�'� *� ,� !�;�0I� J� �U�9�Z�+�%=� >� >� >� �f� � �U�9�Z�+�%=� >� >� >� �\�6� #� �d�F� #� �G�H� � � � �G�F�O�O� �� .� /� � �G�G� � � �X� 9� :� +�k� 9�7� '� )� !�;�0L� M� �G�H� � � � �G�F�O�O� �� 1� 2� � �G�G� � � !�;�0G� H� �G�H� � � � �G�F�O�O� ��n� -� � �W�&�� 0� �W�&�� /� �'�+� ,� � �6�=�&� )�$�%+�]� 4� �� � '� �}D� D�F�F�Fr3 r c � � e Zd ZdZdZdZdgZg d�ZddgZe j e j z Z dZ d Zd ej fd ej fd ej fd efdefdedfdedfdef ee d�� � efdez ej feej fdefg dedfdedfdefgd edfgd �Zd S ) r zN For newLISP source code (version 10.3.0). .. versionadded:: 1.5 �NewLispzhttp://www.newlisp.org/�newlisp)z*.lspz*.nlz*.kifztext/x-newlispzapplication/x-newlisp(� �^z--rW r� �!z!=�?r� rU rX �&�%rV z++rY �<<rZ r[ r\ r] �>>r8 r� �$z$0z$1z$10z$11z$12z$13z$14z$15z$2z$3z$4z$5z$6z$7z$8z$9z$argsz$idxz$itz $main-args�abortr^ r_ �acosh�add�address�ambr z append-filerc rd �argsz array-listzarray?�arrayrg �asinhr� rk �atan2�atanhzatom?z base64-decz base64-encz bayes-queryz bayes-trainr �beta�betai�bind�binomial�bits�callbackr �catch�ceilz change-dir�char�chopr� �clean�closez command-eventr� r� �constantzcontext?�contextr� �copyr� r� r� �cpymem�crc32z crit-chi2zcrit-zz current-liner� z date-listz date-parsez date-valuer� �debugr� zdef-newr z define-macror r� z delete-url�delete�destroy�det�device� differencez directory?� directory�divzdo-untilzdo-while�doargs�dolist�dostring�dotimes�dotree�dump�dupr� �encryptz ends-with�env�erfz error-eventz eval-stringr� �exec�existsr� r� r� �explode�extend�factor�fftz file-infozfile?r� zfind-all�findr� �flatzfloat?�floatr� �fltr� zfor-allr� �forkr� �fv�gammai�gammalnr� zget-charz get-floatzget-intzget-longz get-stringzget-urlzglobal?�globalzif-notr$ �ifftr� r� r. zinf?�intr� �integer� intersect�invert�irr�joinz lambda-macrozlambda?r� z last-errorr� zlegal?r� r� �letex�letnr� r� r� r1 r� �lookupz lower-casezmacro?z main-args�MAINzmake-dirr� �matr? r r r �modr3 �mul�multiplyzNaN?z net-acceptz net-closez net-connectz net-errorznet-evalz net-interfaceznet-ipvz net-listenz net-localz net-lookupz net-packetznet-peekznet-peerznet-pingznet-receive-fromznet-receive-udpz net-receivez net-selectz net-send-toz net-send-udpznet-sendz net-servicez net-sessionsr5 znil?�nil�normalr �now�nper�npvr� r r r8 r9 �ostype�packz parse-date�parse�peek�pipe�pmtz pop-assoc�popzpost-url�powrm r r! r" r$ z prob-chi2zprob-zr& z prompt-eventz protected?�pushzput-url�pvzquote?r� �randr* � randomizer. r0 z read-expr� read-filezread-keyr1 z read-utf8z reader-eventz real-path�receivezref-all�refz regex-comp�regexz remove-dir� rename-file�replace�resetr� r; �rotater< �save�search�seed�seek�selectr, � semaphorerF �sequence�seriesz set-localez set-ref-allzset-refr> �setf�setqrB �share�signal�silentrD rE rG r� rH �source�spawnrJ z starts-withr_ rJ �sub�swap�symre rf rg z sys-errorzsys-inforj rk �termz throw-error�throwz time-of-dayrP �timerz title-caseztrace-highlight�trace� transpose�Tree�trimztrue?rp �unicode�unify�uniquer� �unpack�untilz upper-case�utf8�utf8len�uuidzwait-pidr� r� r r� z write-filez write-linez xfer-eventz xml-errorz xml-parsez xml-type-tagsr� z$([\w!$%&*+.,/<=>?@^~|-])+|(\[.*?\])+z#!(.*?)$r� z#.*$rG r� z\{� bracestringz \[text\]*� tagstringz('|:)�\br� rR r rS z\}rH z[^{}]+z(?s)(.*?)(\[/text\]))rY r3 r4 N) rZ r[ r\ r] r^ r_ r` ra rb rc r� re rf r rg r r� rt r r r r r r r* ry r r~ r� r3 r2 r r � s? � � � � � �� � �D� #�C��k�G�*�*�*�I�!�#:�;�I� �M�B�L� (�E�;�H�| 9�J� �'�/� *� �g�n� %� �g�n� %� �Z� � )�&� 1� �F�M� *� �6�;� /� �x� � �U�8�E� *� *� *� � � �*� $�d�m� 4� �� � '� �� %�E# �N �F�G� $� �F�F� #� �v� � � %�f�f� 5� �]1� 1�F�F�Fr3 r c �| � e Zd ZdZdZg d�ZdgZddgZej Z dZ e dz Z d Z d e �d e �d �Zh d �Zh d�Zh d�Zh d�Zh d�Zh d�Zd� Z ed� � gdefdej fdedfdej fdez e j fdez ej fd ez ej fd e fd e fd e z e j! fd e z e fd e z e j" fd!e#fd"ez ej fd#e fd$e j$ fd%e j% fd&e j& fd'e j' fd(e fd)e fd*e fd+e fd,e z e j( fd-ez d-z e j) j* fee j) fd.e dfd/e#dfd0e#d1fg d2efd3ez ej fd efd4efd5efded1fgd6�Z+d7S )8r z� An ELisp lexer, parsing a stream and outputting the tokens needed to highlight elisp code. .. versionadded:: 2.1 � EmacsLisp)z emacs-lisp�elisp�emacsz*.elz text/x-elispzapplication/x-elispz\\.|[\w!$%&*+-/<=>?@^{}~|]r� z(?=[ "()\]\'\n,;`])z((?:r� r� >� �do*�cl-do�cl-do*�cl-the�cl-case�cl-decf�cl-flet�cl-incf�cl-letf�cl-loop�cl-remf�cl-block�cl-callf�cl-defun�cl-ecase�cl-flet*�cl-letf*�cl-progv�cl-psetf�cl-psetq� cl-callf2� cl-dolist� cl-labels� cl-return� cl-shiftf� eval-when� pcase-let� cl-declaim� cl-declare� cl-deftype� cl-dotimes� cl-locally� cl-pushnew� cl-rotatef� cl-tagbody� do-symbols� pcase-let*� setq-local� with-slots� cl-defmacro� cl-defsubst� cl-function� cl-macrolet� cl-typecase� ert-deftest� lexical-let� return-from� track-mouse� use-package� cl-defstruct� cl-etypecase� cl-eval-when� defvar-local� dont-compile� lexical-let*� oref-default� oset-default� pcase-dolist� with-timeout� cl-do-symbols� define-advice� ignore-errors�cl-return-from�do-all-symbols�pcase-defmacro�while-no-input�with-temp-file�def-edebug-spec�define-skeleton�load-time-value�save-match-data�with-case-table�with-file-modes�with-local-quit�declare-function�delay-mode-hooks�pcase-exhaustive�with-temp-buffer�cl-do-all-symbols�define-minor-mode�with-syntax-table�with-temp-message�with-wrapper-hook�cl-load-time-value�cl-symbol-macrolet�destructuring-bind�atomic-change-group�define-alternatives�define-derived-mode�define-generic-mode�define-modify-macro�multiple-value-bind�multiple-value-setq�with-category-table�with-current-buffer�with-demoted-errors�with-selected-frame�define-setf-expander�save-selected-window�with-coding-priority�with-eval-after-load�with-selected-window�cl-destructuring-bind�define-compiler-macro�save-window-excursion�cl-multiple-value-bind�cl-multiple-value-setq�cl-define-compiler-macro�define-global-minor-mode�with-tramp-file-property�with-silent-modifications�combine-after-change-calls�define-obsolete-face-alias�with-output-to-temp-buffer�condition-case-unless-debug�with-parsed-tramp-file-name� define-globalized-minor-mode� with-tramp-progress-reporter� define-obsolete-function-alias� define-obsolete-variable-alias� dotimes-with-progress-reporter� with-tramp-connection-propertyr� �rxr r �decf�flet�incf�loop�oref�osetr r8 r r� �blockr� �ecase�pcase�progv�psetf�psetqr� �labelsr� r. �return�shiftfr� �declaim�declare�defface�defsetf�deftyper� �locally�pushnew�rotatefr� �defgroupr� �defsubst�deftheme�macrolet�noreturn�typecase� defadvice� defcustom� defmethod� defstruct� etypecase� defgenericr� r� r~ > � subr-arity� setq-default�condition-case�save-excursion�unwind-protect�save-restriction�save-current-bufferr$ r9 r r� r� r r� �prog1�prog2r� r� r� �defvar�defconst�function� interactiver- >� �/=�1+�1-�font-at�string<�string=�string>�type-of�car-safe�cdr-safe�file-acl�font-get�font-put�gap-size�get-byte�max-char�time-add�tty-type�user-uid� byte-code� dump-face� emacs-pid� face-font� field-end� find-font� font-info� font-spec� gc-status� goto-char� group-gid� indent-to� make-char� match-end� open-font� plist-get� plist-put� point-max� point-min� run-hooks� scroll-up� sleep-for� subr-name� top-level� unix-sync� window-at� char-after� char-equal� char-width� close-font� copy-alist� define-key� dump-emacs� file-modes� float-time� frame-list� get-buffer� gnutls-bye� image-size� kill-emacs� list-fonts� looking-at� lookup-key� map-keymap� match-data� next-frame� process-id� query-font� read-event� region-end� resume-tty� scan-lists� scan-sexps� set-buffer� set-marker� split-char� widget-get� widget-put� window-end� x-hide-tip� x-show-tip� access-file� bool-vector� buffer-list� buffer-name� buffer-size� ccl-execute� char-before� char-syntax� copy-keymap� copy-marker� decode-char� decode-time� delete-char� draw-string� dump-colors� encode-char� encode-time� end-of-line� eval-buffer� eval-region� frame-focus� get-process� gnutls-boot� image-flush� insert-byte� insert-char� intern-soft� invisible-p� iso-charset� key-binding� kill-buffer� locale-info� lock-buffer� lower-frame� make-keymap� make-marker� make-symbol� mark-marker� memory-info� message-box� new-fontset� next-window� overlay-end� overlay-get� overlay-put� overlays-at� overlays-in� posn-at-x-y� raise-frame� read-buffer� recent-keys� safe-length� scroll-down� scroll-left� secure-hash� set-default� suspend-tty� symbol-name� system-name� time-less-p� upcase-word� window-list� yes-or-no-p� assoc-string� call-process� case-table-p� char-charset� char-table-p� clear-string� color-gray-p� current-time� delete-field� delete-frame� do-auto-save� erase-buffer� field-string� font-match-p� fontset-font� fontset-info� fontset-list� forward-char� forward-line� forward-word� frame-live-p� gap-position� hash-table-p� image-mask-p� kill-process� load-average� lookup-image� make-overlay� memory-limit� move-overlay� msdos-memget� msdos-memput� other-buffer� plist-member� point-marker� process-list� process-mark� process-name� process-type� quit-process� read-command� redraw-frame� scroll-right� select-frame� set-file-acl� stop-process� string-bytes� string-equal� string-lessp� string-match� string-width� symbol-plist� symbol-value� syntax-table� system-users� widget-apply� window-edges� window-frame� window-point� window-start� write-region� x-list-fonts� x-popup-menu� backward-char� bitmap-spec-p� bool-vector-p� buffer-live-p� buffer-string� ccl-program-p� charset-after� charset-plist� copy-sequence� default-value� delete-region� discard-input� downcase-word� end-kbd-macro� file-exists-p� file-locked-p� forward-point� get-file-char� gnutls-deinit� gnutls-errorp� iconify-frame� keymap-parent� keymap-prompt� lax-plist-get� lax-plist-put� marker-buffer� msdos-mouse-p� overlay-lists� overlay-start� posn-at-point� process-plist� query-fontset� read-function� read-variable� rename-buffer� replace-match� select-window� set-quit-char� sort-charsets� start-process� suspend-emacs� system-groups� terminal-list� terminal-name� time-subtract� tty-top-frame� undo-boundary� unify-charset� unlock-buffer� upcase-region� use-local-map� user-real-uid� window-buffer� window-list-1� window-live-p� window-parent� window-system� x-file-dialog� x-focus-frame� x-select-font� x-synchronize�backtrace-eval�byte-to-string�category-table�char-to-string�color-distance�compute-motion�current-buffer�current-column�dbus--init-bus�default-boundp�delete-overlay�delete-process�dump-glyph-row�fetch-bytecode�file-regular-p�file-symlink-p�following-char�font-drive-otf�font-xlfd-name�frame-terminal�function-equal�gfile-rm-watch�gpm-mouse-stop�group-real-gid�image-metadata�make-byte-code�make-temp-name�map-char-table�matching-paren�message-or-box�mouse-position�move-to-column�overlay-buffer�position-bytes�preceding-char�previous-frame�process-buffer�process-filter�process-status�recent-doskeys�recursive-edit�redraw-display�search-forward�selected-frame�set-case-table�set-file-modes�set-file-times�set-frame-size�set-input-mode�set-match-data�signal-process�string-to-char�syntax-table-p�try-completion�unibyte-string�use-global-map�user-full-name�w32-frame-rect�window-fringes�window-hscroll�window-margins�window-valid-p�window-vscroll�x-create-frame�x-display-list�x-family-fonts�x-get-resource�x-popup-dialog�all-completions�backtrace-debug�backtrace-frame�bool-vector-not�capitalize-word�coding-system-p�compare-strings�completing-read�copy-hash-table�current-message�define-category�delete-terminal�describe-vector�directory-files�downcase-region�field-beginning�file-attributes�file-readable-p�file-writable-p�font-get-glyphs�forward-comment�frame-parameter�frame-text-cols�frame-visible-p�garbage-collect�get-file-buffer�getenv-internal�gfile-add-watch�gpm-mouse-start�hash-table-size�hash-table-test�input-pending-p�invocation-name�key-description�make-char-table�make-hash-table�marker-position�match-beginning�open-termscript�previous-window�prin1-to-string�process-command�process-contact�recursion-depth�search-backward�selected-window�set-cursor-size�set-frame-width�start-kbd-macro�string-greaterp�symbol-function�terminal-live-p�test-completion�tool-bar-height�trace-redisplay�trace-to-stderr�upcase-initials�user-login-name�vertical-motion�w32-has-winsock�window-top-line�window-use-time�x-get-atom-name�x-server-vendor�xw-color-values�add-name-to-file�apropos-internal�autoload-do-load�buffer-file-name�buffer-substring�buffer-swap-text�byte-to-position�category-table-p�char-or-string-p�char-table-range�clear-face-cache�clear-font-cache�continue-process�decode-big5-char�decode-sjis-char�encode-big5-char�encode-sjis-char�expand-file-name�file-directory-p�file-system-info�font-family-list�fontset-list-all�format-mode-line�frame-char-width�frame-face-alist�frame-font-cache�frame-parameters�frame-text-lines�frame-text-width�frame-total-cols�get-pos-property�get-screen-color�hash-table-count�inotify-rm-watch�interactive-form�local-variable-p�lookup-image-map�make-bool-vector�minibuffer-depth�msdos-mouse-init�narrow-to-region�number-to-string�overlay-recenter�point-max-marker�point-min-marker�posix-looking-at�process-send-eof�process-sentinel�process-tty-name�profiler-cpu-log�region-beginning�run-hook-wrapped�set-fontset-font�set-frame-height�set-message-beep�set-screen-color�set-syntax-table�set-window-point�set-window-start�string-to-number�string-to-syntax�tty-no-underline�window-new-pixel�window-new-total�window-old-point�window-parameter�window-pixel-top�window-top-child�x-display-planes�x-frame-geometry�x-parse-geometry�x-server-version�zlib-available-p�backtrace--locals�beginning-of-line�bool-vector-union�buffer-modified-p�capitalize-region�car-less-than-car�char-category-set�char-table-parent�clear-image-cache�coding-system-put�color-supported-p�command-remapping�controlling-tty-p�copy-syntax-table�current-idle-time�current-local-map�current-time-zone�debug-timer-check�dump-glyph-matrix�dump-tool-bar-row�execute-kbd-macro�file-executable-p�frame-char-height�frame-pixel-width�frame-root-window�frame-text-height�frame-total-lines�get-buffer-create�get-buffer-window�get-char-property�get-load-suffixes�get-text-property�imagemagick-types�indirect-function�indirect-variable�inotify-add-watch�interrupt-process�line-end-position�line-pixel-height�local-key-binding�make-category-set�map-charset-chars�memory-use-counts�minibuffer-prompt�minibuffer-window�open-dribble-file�profiler-cpu-stop�put-text-property�re-search-forward�read-key-sequence�set-charset-plist�set-keymap-parent�set-process-plist�set-window-buffer�string-as-unibyte�string-to-unibyte�suspicious-object�text-property-any�this-command-keys�transpose-regions�w32-shell-execute�where-is-internal�window-body-width�window-left-child�window-new-normal�window-parameters�window-pixel-left�window-text-width�x-display-screens�x-load-color-file�x-open-connection�x-window-property�accessible-keymaps�buffer-base-buffer�buffer-enable-undo�buffer-local-value�call-interactively�category-docstring�char-table-subtype�clear-charset-maps�coding-system-base�constrain-to-field�current-case-table�current-global-map�current-input-mode�daemon-initialized�default-file-modes�event-convert-list�font-shape-gstring�format-time-string�frame-border-width�frame-first-window�frame-fringe-width�frame-pixel-height�get-buffer-process�global-key-binding�gnutls-available-p�gnutls-peer-status�init-image-library�insert-and-inherit�internal-char-font�make-frame-visible�make-sparse-keymap�make-symbolic-link�msdos-mouse-enable�msdos-set-keyboard�multibyte-string-p�number-or-marker-p�overlay-properties�parse-partial-sexp�posix-string-match�process-attributes�process-connection�profiler-cpu-start�re-search-backward�read-coding-system�recent-auto-save-p�run-hook-with-args�set-category-table�set-frame-position�set-mouse-position�set-process-buffer�set-process-filter�set-time-zone-rule�set-window-fringes�set-window-hscroll�set-window-margins�set-window-vscroll�skip-chars-forward�special-variable-p�terminal-parameter�text-properties-at�visible-frame-list�w32-battery-status�w32-long-file-name�w32-unload-winsock�w32notify-rm-watch�window-body-height�window-dedicated-p�window-left-column�window-line-height�window-normal-size�window-pixel-edges�window-pixel-width�window-scroll-bars�window-text-height�window-total-width�x-close-connection�x-display-mm-width�x-wm-set-size-hint�xw-color-defined-p�xw-display-color-p�Snarf-documentation�add-text-properties�bool-vector-subsetp�call-last-kbd-macro�call-process-region�charset-id-internal�check-coding-system�coding-system-plist�copy-category-table�current-active-maps�current-indentation�current-time-string�delete-all-overlays�directory-file-name�exit-recursive-edit�file-name-directory�find-charset-region�find-charset-string�font-otf-alternates�force-window-update�get-unused-category�gnutls-error-fatalp�gnutls-error-string�handle-save-session�handle-switch-frame�hash-table-weakness�integer-or-marker-p�kill-local-variable�make-category-table�make-local-variable�make-serial-process�make-terminal-frame�map-keymap-internal�minibuffer-contents�modify-syntax-entry�move-point-visually�move-to-window-line�msdos-mouse-disable�newline-cache-check�next-overlay-change�optimize-char-table�play-sound-internal�process-exit-status�process-send-region�process-send-string�profiler-memory-log�read-char-exclusive�scroll-other-window�self-insert-command�set-input-meta-mode�set-text-properties�show-face-resources�skip-chars-backward�skip-syntax-forward�standard-case-table�string-as-multibyte�string-make-unibyte�string-to-multibyte�terminal-parameters�tty-display-color-p�w32-get-locale-info�w32-short-file-name�w32-toggle-lock-key�w32-window-exists-p�w32notify-add-watch�window-inside-edges�window-minibuffer-p�window-next-buffers�window-next-sibling�window-pixel-height�window-prev-buffers�window-prev-sibling�window-resize-apply�window-total-height�x-display-mm-height�x-register-dnd-atom�x-selection-owner-p�abort-recursive-edit�base64-decode-region�base64-decode-string�base64-encode-region�base64-encode-string�bidi-resolved-levels�buffer-modified-tick�bury-buffer-internal�byte-code-function-p�dbus-get-unique-name�decode-coding-region�decode-coding-string�default-printer-name�define-charset-alias�define-fringe-bitmap�detect-coding-region�detect-coding-string�encode-coding-region�encode-coding-string�error-message-string�file-name-absolute-p�file-name-completion�file-selinux-context�font-face-attributes�font-get-system-font�gnutls-get-initstage�insert-file-contents�internal-lisp-face-p�internal-show-cursor�invocation-directory�locate-file-internal�make-frame-invisible�make-indirect-buffer�make-network-process�menu-bar-menu-at-x-y�merge-face-attribute�mouse-pixel-position�next-property-change�posix-search-forward�prefix-numeric-value�profiler-memory-stop�read-from-minibuffer�read-no-blanks-input�redirect-frame-focus�register-ccl-program�set-buffer-multibyte�set-char-table-range�set-charset-priority�set-process-sentinel�set-window-new-pixel�set-window-new-total�set-window-parameter�skip-syntax-backward�string-collate-lessp�subst-char-in-region�terminal-local-value�tool-bar-pixel-width�user-real-login-name�visited-file-modtime�w32-define-rgb-color�w32-register-hot-key�w32-send-sys-command�window-display-table�x-display-save-under�x-selection-exists-p�accept-process-output�backward-prefix-chars�buffer-has-markers-at�ccl-execute-on-string�char-table-extra-slot�charset-priority-list�coding-system-aliases�dbus-message-internal�declare-equiv-charset�define-prefix-command�destroy-fringe-bitmap�file-attributes-lessp�font-variation-glyphs�frame-selected-window�fringe-bitmaps-at-pos�funcall-interactively�get-internal-run-time�insert-before-markers�insert-startup-screen�internal--track-mouse�list-system-processes�marker-insertion-type�minibuffer-prompt-end�modify-category-entry�msdos-long-file-names�posix-search-backward�process-coding-system�profiler-memory-start�set-buffer-auto-saved�set-buffer-major-mode�set-buffer-modified-p�set-char-table-parent�set-minibuffer-window�set-window-new-normal�split-window-internal�standard-syntax-table�store-kbd-macro-event�string-collate-equalp�string-make-multibyte�text-char-description�text-property-not-all�w32-default-color-map�x-display-color-cells�x-display-grayscale-p�x-display-pixel-width�x-send-client-message�x-uses-old-gtk-dialog�add-face-text-property�buffer-local-variables�category-set-mnemonics�char-resolve-modifiers�coding-system-eol-type�default-toplevel-value�define-hash-table-test�delete-window-internal�documentation-property�dump-redisplay-history�file-name-as-directory�file-name-nondirectory�file-newer-than-file-p�find-file-name-handler�force-mode-line-update�format-network-address�frame-scroll-bar-width�hash-table-rehash-size�internal-show-cursor-p�keyboard-coding-system�menu-or-popup-active-p�minor-mode-key-binding�network-interface-info�network-interface-list�profiler-cpu-running-p�remove-text-properties�set-default-file-modes�set-fringe-bitmap-face�set-terminal-parameter�set-window-dedicated-p�set-window-scroll-bars�single-key-description�terminal-coding-system�upcase-initials-region�variable-binding-locus�vector-or-char-table-p�w16-get-clipboard-data�w16-selection-exists-p�w16-set-clipboard-data�w32-get-clipboard-data�w32-selection-exists-p�w32-set-clipboard-data�w32-set-current-locale�w32-unregister-hot-key�window-configuration-p�window-text-pixel-size�x-display-pixel-height�x-display-visual-class�zlib-decompress-region�cancel-kbd-macro-events�clear-this-command-keys�compose-region-internal�compose-string-internal�composition-get-gstring�coordinates-in-window-p�current-minor-mode-maps�define-charset-internal�dump-frame-glyph-matrix�frame-pointer-visible-p�frame-scroll-bar-height�insert-buffer-substring�internal-copy-lisp-face�internal-make-lisp-face�libxml-parse-xml-region�line-beginning-position�local-variable-if-set-p�make-directory-internal�modify-frame-parameters�msdos-downcase-filename�msdos-set-mouse-buttons�pos-visible-in-window-p�previous-overlay-change�process-running-child-p�send-string-to-terminal�set-output-flow-control�set-process-window-size�set-standard-case-table�set-window-next-buffers�set-window-prev-buffers�standard-category-table�substitute-command-keys�substitute-in-file-name�substring-no-properties�tty-display-color-cells�w32-frame-menu-bar-size�w32-get-keyboard-layout�w32-get-valid-codepages�w32-reconstruct-hot-key�w32-registered-hot-keys�w32-set-keyboard-layout�window-mode-line-height�window-scroll-bar-width�x-display-backing-store�active-minibuffer-window�barf-if-buffer-read-only�bool-vector-exclusive-or�bool-vector-intersection�describe-buffer-bindings�generate-new-buffer-name�internal-complete-buffer�kill-all-local-variables�last-nonminibuffer-frame�libxml-parse-html-region�previous-property-change�process-datagram-address�read-key-sequence-vector�serial-process-configure�set-file-selinux-context�set-input-interrupt-mode�set-mouse-pixel-position�set-terminal-local-value�set-visited-file-modtime�set-window-configuration�set-window-display-table�this-command-keys-vector�this-single-command-keys�w32-get-codepage-charset�w32-get-console-codepage�w32-get-valid-locale-ids�w32-set-console-codepage�w32-set-process-priority�waiting-for-user-input-p�window-combination-limit�window-scroll-bar-height�x-change-window-property�x-delete-window-property�x-get-selection-internal�x-menu-bar-open-internal�x-own-selection-internal�compare-buffer-substrings�delete-and-extract-region�delete-directory-internal�external-debugging-output�face-attribute-relative-p�face-attributes-as-vector�file-name-all-completions�find-composition-internal�frame-or-buffer-changed-p�frame-right-divider-width�get-unused-iso-final-char�make-variable-frame-local�multibyte-char-to-unibyte�next-char-property-change�profiler-memory-running-p�redirect-debugging-output�restore-buffer-modified-p�set-char-table-extra-slot�set-frame-selected-window�set-marker-insertion-type�set-process-coding-system�system-move-file-to-trash�tool-bar-get-system-style�translate-region-internal�unencodable-char-position�unibyte-char-to-multibyte�w32-get-current-locale-id�w32-get-default-locale-id�window-header-line-height�window-inside-pixel-edges�window-resize-apply-total�x-backspace-delete-keys-p�x-server-max-request-size�bool-vector-set-difference�buffer-chars-modified-tick�define-coding-system-alias�equal-including-properties�field-string-no-properties�frame-bottom-divider-width�internal-lisp-face-empty-p�internal-lisp-face-equal-p�make-variable-buffer-local�minibuffer-selected-window�other-window-for-scrolling�process-filter-multibyte-p�process-query-on-exit-flag�read-non-nil-coding-system�reset-this-command-lengths�set-coding-system-priority�set-default-toplevel-value�set-network-process-option�window-configuration-frame�window-right-divider-width�check-coding-systems-region�coding-system-priority-list�file-accessible-directory-p�font-get-system-normal-font�hash-table-rehash-threshold�next-single-property-change�resize-mini-window-internal�run-window-scroll-functions�verify-visited-file-modtime�window-absolute-pixel-edges�window-bottom-divider-width�x-disown-selection-internal� bool-vector-count-population� combine-after-change-execute� current-window-configuration� find-operation-coding-system� internal-face-x-get-resource� next-read-file-uses-dialog-p� register-code-conversion-map� set-process-datagram-address� set-process-filter-multibyte� set-window-combination-limit� this-single-command-raw-keys� window-redisplay-end-trigger� bool-vector-count-consecutive� compare-window-configurations� define-coding-system-internal� delete-other-windows-internal� get-char-property-and-overlay� get-unicode-property-internal� internal-make-var-non-special� internal-merge-in-global-face� msdos-remember-default-colors� previous-char-property-change� put-unicode-property-internal� unhandled-file-name-directory� buffer-substring-no-properties� clear-buffer-auto-save-failure� command-error-default-function� directory-files-and-attributes� internal-describe-syntax-value� minibuffer-completion-contents� remove-list-of-text-properties� set-process-query-on-exit-flag� w32-get-valid-keyboard-layouts� internal-default-process-filter� previous-single-property-change� unicode-property-table-internal� w32-get-console-output-codepage� w32-set-console-output-codepage� current-bidi-paragraph-direction� internal-get-lisp-face-attribute� internal-set-lisp-face-attribute� next-single-char-property-change� run-hook-with-args-until-failure� run-hook-with-args-until-success� set-window-redisplay-end-trigger�!insert-before-markers-and-inherit�!internal-default-process-sentinel�!internal-set-font-selection-order�!minibuffer-contents-no-properties�!x-display-monitor-attributes-list�"display-supports-face-attributes-p�"process-inherit-coding-system-flag�"window-inside-absolute-pixel-edges�#bidi-find-overridden-directionality�#cygwin-convert-file-name-to-windows�#find-coding-systems-region-internal�#gnutls-peer-status-warning-describe�#internal-lisp-face-attribute-values�#set-keyboard-coding-system-internal�#set-terminal-coding-system-internal�#w32-display-monitor-attributes-list�$previous-single-char-property-change�$run-window-configuration-change-hook�%cygwin-convert-file-name-from-windows�%internal-event-symbol-parse-modifiers�&set-process-inherit-coding-system-flag�(set-safe-terminal-coding-system-internal�(tty-suppress-bold-inverse-default-colors�*internal-set-alternative-font-family-alist�,internal-set-alternative-font-registry-alist�.frame-can-run-window-configuration-change-hook�.internal-set-lisp-face-attribute-from-resourcerU �eqr^ �ashr� r� r� �elt�eqlr� r� r� �lshr �md5r r� r� �putr> rD rj r_ �aref�asetrg ri rk �atom�bobp�bolpr� �delq�ding�eobp�eolpr� r� �fsetr� r� �logb�mapcr r r. rH rJ rd r� �consp�equalr� r� �fontp�frexp�int86�isnan�ldexp�listp�memql�nconc�point�prin1�princr" �rassqr< �subrp�widenrc �arrayp�boundp�concatr� �ffloor�floatpr� �framep�fround�imagep�insert�internr� �logand�logior�lognot�logxor�mapcarr �nlistp�nthcdrr* �rassoc�setcar�setcdrr rJ �sxhash�terpri�upcasert �bufferpr� �clrhash�daemonp�fboundp�funcall�gethash�keymapp�maphash�markerp�message�natnump�numberp�puthash�remhashr; �stringp�symbolp�vconcat�vectorp�windowp�autoload�charsetp�commandp�copysign�downcase�fceilingr� �integerp�keywordp�mapatoms�nreverse�overlayp�processp�purecopy�recenter�setplistrq �unintern� backtrace� byteorder� fillarray� ftruncate� functionp� mapconcat� redisplay� sequenceprc � capitalize� characterp� makunbound� propertize� fmakunbound� macroexpand� minibufferp� documentationr� rV rW rX rY r[ r\ rZ r] r� r� r0 r� r� r� r� r2 r r6 �read-from-string> � define-widget�with-no-warnings�with-electric-helpr% r@ rE �defalias�featurep� defvaralias> �&aux�&key�&body�&rest�&whole� &optional� &environment�&allow-other-keys> � cl-assert� user-error� cl-check-type�warnr� r c # �� K � dg}t j | ||� � D ]�\ }}}|t j u r�|t j v r|t j |fV � �4|t j v r |t |fV � �O|t j v r|t j |fV � �o|t j v r|t j |fV � ��|t j v r|t j |fV � ��|t j v r|t j |fV � ��|||fV � ��d S r� )r r( r r* r r� r) r� r �error_keywords� Exception� builtin_function_highlightedr+ r� r� �Pseudor� s r2 r( z%EmacsLispLexer.get_tokens_unprocessed� sB � � � ����#-�#D�T�4�QV�#W�#W� &� &� �E�5�%��� �%�%��N� ;�;�;� �� ��5�5�5�5� ��N� 8�8�8� ��%�/�/�/�/� ��N� 9�9�9� �� ��6�6�6�6� ��N� G�G�G� �� �u�4�4�4�4� ��N� 1�1�1� �� �u�4�4�4�4� ��N� ?�?�?� �� ��6�6�6�6� ����%� %� %� %� %�) &� &r3 r� rG r� rI rJ z \?([^\\]|\\.)r� r� rK r� r� r� r� z\[|\]rL z#\^\^?r� z#[bB][+-]?[01]+(/[01]+)?z#[oO][+-]?[0-7]+(/[0-7]+)?z&#[xX][+-]?[0-9a-fA-F]+(/[0-9a-fA-F]+)?z&#\d+r[+-]?[0-9a-zA-Z]+(/[0-9a-zA-Z]+)?r� r� z (,@|,|\.|:)r� r� r� r� r� rH z[^"\\`]+z`%s\'rW z\\\n)rY r� rJ N),rZ r[ r\ r] r^ r` ra rb rc re rf r� r� r� r� r� r� r� r� r� r� r( r r r rt r r{ r r+ ry r r r= r< r r) rv rw rx r| r* r� r~ r� r3 r2 r r � s� � � � � � �� � �D�.�.�.�G���I� �!6�7�I� �L�E� -�H��X�%�K�'�J�J� $,�8�8�[�[�[� 9�F�/� /� /�F�b� � �M�x� x� x��t $� $� $� � � � �� � � �N� &� &� &�4 �G�F�O�O� � �Z� � �g�n� %� �6�8� $� �v�{� +� �F�]�D�L� )� �V�^�V�]� +� �F�]�F�M� *� �8� � �8� � �j� (�&�.� 9� �z� )�6� 2� L� �� � � '� �{� #� �V�^�V�]� +� �� !� �T�]� #� )�&�*� 5� +�F�J� 7� 7�� � C� 7�� ?� �x� � �x� � �X� &� �*� $�d�m� 4� �V�^�e� #�T�]�%9� :� �T�]� #� �X�v� &� �K�� (� �K�� (�AA �F �&� !� �� �� � .� �6�N� �V� � �f� � �6�6� "� �MN� N�F�F�Fr3 r c �� � e Zd ZdZdZdZdgZdgZddgZdZ d Z d Z d Z d � e D � � Z e � d � e D � � � � e � d� e D � � � � dZdez Zdez Zdez Zdedfdej fdej fdefgdej fdej fdefdefd efd efd efd e j fd e j fded!fee j fd"e!j" feefd#efgd$�Z#d%� Z$d&� Z%d'� Z&d(� Z'd)� Z(d*� Z)d+S ),r z@ Lexer for Shen source code. .. versionadded:: 2.1 �Shenzhttp://shenlanguage.org/�shenz*.shenz text/x-shenzapplication/x-shen) �datatyper r� � defprolog�defcc�synonymsr� �package�typer� )r� r� r� r$ �casesr� r# rP �freezer0 r� r� �protectr9 r r r� �outputzprolog?z trap-errorr� r� z/.r> z@pz@sz@v)�r r[ rU rV rW rX rY r\ r] rZ z <-addressz<-vectorr� � absvectorz absvector?z address->�adjoinrc �arityr� r� rm zbound?�call�cdr� �cnr� rB r� r� �cutr� r� zelement?r� zenable-type-theoryzerror-to-stringr� zeval-kl� exceptionr� �external�failzfail-ifr" �findall�fix�fst�fwhenr� zget-timer� �hd�hdstr�hdv�head� identical�implementationr� r zinclude-all-but� inferences�inputzinput+r� rI � intersectionr� �kill�languager� �limit�lineread�loaded�macror� r� �mapcan� maxinferences�modez n->string�nlr� r r � occurrencesz occurs-checkr8 �os�out�port�porters�pos�pr�precludezpreclude-all-butr" �profilezprofile-results�ps�quitr. zread+r/ r zread-file-as-bytelistzread-file-as-stringr� �releaser� r� r; �runr r> z simple-error�snd� specialise�spy�step�stinput�stoutput�strz string->nrN r_ �substre �systemf�tail�tcztc?�thaw�tl�tlstr�tlv�trackztuple?� undefmacror, zunify!�union� unprofile� unspecialise�untrackz variable?rt zvector->rx �verifiedrz r� r� r� r� zy-or-n?)�where�skipr� r r� z<e>z<!>c � � i | ] }|t �� S r� �r ��.0�ss r2 � <dictcomp>zShenLexer.<dictcomp>; s � �1�1�1�q��7�1�1�1r3 c # �2 K � | ]}|t j fV � �d S r& )r r+ r� s r2 � <genexpr>zShenLexer.<genexpr>< s) � � � �8�8�!�Q�� �%�8�8�8�8�8�8r3 c # �( K � | ] }|t fV � �d S r& r� r� s r2 r� zShenLexer.<genexpr>= s& � � � �8�8�Q�Q��L�8�8�8�8�8�8r3 z[\w!$%*+,<=>?/.\'@&#:-]z%s+z [a-z!$%%*+,<=>?/.\'@&#_-]%s*z[A-Z]%s*rI rH z c#\d{1,3};z~[ARS%]z(?s).z(?s)\\\*.*?\*\\z\\\\.*rG z_{5,}z={5,}z(;|:=|\||--?>|<--?)z (:-|:|\{|\})z[+-]*\d*\.\d+(e[+-]?\d+)?z[+-]*\d+rJ z(true|false|<>|\[\])z (\[|\]|\(|\)))rJ rY c � � t j | |� � }| � |� � }| � |� � }|S r& )r r( �_process_symbols�_process_declarations)r, r- r~ s r2 r( z ShenLexer.get_tokens_unprocessed^ s? � ��2�4��>�>���&�&�v�.�.���+�+�F�3�3��� r3 c �N � |t t t j t j fvS r& )r r r rt ru )r, r/ s r2 � _relevantzShenLexer._relevantd s � ��T�:�w�~�w�?P� Q�Q�Qr3 c # �� K � d}|D ]g\ }}}|||fV � | � |� � rE|r2|t k r'|| j v r |}| � ||� � E d {V �� |dk o |t k }�hd S �NF�()r r r� �_process_declarationr )r, r~ � opening_parenr. r/ r0 � declarations r2 r z ShenLexer._process_declarationsg s� � � � � � �#)� F� F� �E�5�%����%� %� %� %��~�~�e�$�$� F� � N�U�g�%5�%5�%�4�CT�:T�:T�"'�K� #� 8� 8��f� M� M�M�M�M�M�M�M�M� %�� � E��+�1E� �� F� Fr3 c # � K � d}|D ]{\ }}}|r;|t t j fv r&| j � |t j � � }n |t k r|| j v r t j }|dk o |t k }|||fV � �|d S r ) r r r* �MAPPINGSr� r) �BUILTINS_ANYWHEREr+ r )r, r~ r r. r/ r0 s r2 r� zShenLexer._process_symbolsq s� � � � � � �#)� &� &� �E�5�%� � %��7�D�M�*B�!B�!B� � �)�)�%�� �?�?����'�!�!�e�t�/E�&E�&E� � �� !�S�L� A�U�k�-A�M����%� %� %� %� %� &� &r3 c # � K � |D ]$\ }}}| � |� � r n|||fV � �%|dk rrd}|t k r t j n|}|||fV � |D ]L\ }}}|r|t k r t j }|||fV � | � |� � r|t k o|dk }�Mn�|dk r!|t k r t j n|}|||fV � n�|dk r�|t k r t j n|}|||fV � |D ]$\ }}}| � |� � r n|||fV � �%|dk r;|t k r0|t |fV � | � |� � D ] \ }}}|||fV � �n(|||fV � n |t k r t j n|}|||fV � d S )Nr� Fr� r� r �{) r r r r� r r� r) r �_process_signature)r, r r~ r. r/ r0 �prev_was_colons r2 r z ShenLexer._process_declaration{ sP � � � �#)� &� &� �E�5�%��~�~�e�$�$� ������%� %� %� %� %� �*� $� $� "�N�$)�W�$4�$4�G�L�L�%�E����%� %� %� %�'-� G� G�#��u�e�!� )�e�w�&6�&6� #�L�E��U�E�)�)�)�)��>�>�%�(�(� G�%*�g�%5�%F�%�3�,�N�� G� �I� %� %�&+�w�&6�&6�D�N�N�E�E����%� %� %� %� %� �H� $� $�%*�g�%5�%5�D�M�M�5�E����%� %� %� %�'-� *� *�#��u�e��>�>�%�(�(� ��E��U�E�)�)�)�)�)���|�|��� 0� 0��[�%�/�/�/�/�+/�+B�+B�6�+J�+J� .� .�'�E�5�%� ���-�-�-�-�-�.� �U�E�)�)�)�)�)�%*�g�%5�%5�D�M�M�5�E����%� %� %� %��r3 c # �� K � |D ]n\ }}}|t k r|dk r|t |fV � d S |t t j fv r,|� � � r t j n t j }|||fV � �od S )N�})r r r r) �istitler* r r� )r, r~ r. r/ r0 s r2 r z ShenLexer._process_signature� s� � � � �#)� &� &� �E�5�%��� � �E�S�L�L��[�%�/�/�/�/�����7�D�M�2�2�2�).� � � � �J�� � �g�l�����%� %� %� %� %� &� &r3 N)*rZ r[ r\ r] r^ r_ r` ra rb r� r� �BUILTINSr r �update�valid_symbol_charsrg � symbol_name�variabler r} �Interpolr ru rt r r r r r< r= r r* r r� r~ r( r r r� r r r� r3 r2 r r s� � � � � � �� � �D� $�C��h�G�� �I� � 4�5�I��L� �M��H�6 H��1�1�L�1�1�1�H� �O�O�8�8�x�8�8�8�8�8�8� �O�O�8�8�-�8�8�8�8�8�8�3���+�+�J�1�4F�F�K�� /�/�H� �6�6� "� �F�M� *� �� � )� �v� � � ��!2� 3� ��� '� �Z� � �{� #� �{� #� #�[� 1� �g� &� )�6�<� 8� �&�.� )� �6�8� $� �t�}� %� $�g�n� 5� �'� "� �{� +� �� �F�4� � � R� R� R�F� F� F�&� &� &�$� $� $�L&� &� &� &� &r3 r c �T � e Zd ZdZdZdgZdgZg ZdZdZ dZ dd e j fd e fd ej fd ej fd efde z ej fdej fdej fdef eed�� � efde z ej fde z ej f ee dd�� � ej fde z ej fe ej fde fde fgiZ dS )r za A CPSA lexer based on the CPSA language as of version 2.2.12 .. versionadded:: 2.1 �CPSA�cpsaz*.cpsa)�herald�varsr� r � defprotocol�defrole� defskeleton� defstrand� deflistenerznon-origz uniq-origz pen-non-orig�precedesr' rF �recvr^ r- �skey�akey�data�mesg) �cat�encr� �privk�pubk�invk�ltk�genr� r$ rY r� rG r� r� r� rK rM rN rO r5 r� rP rQ rR �rm r� r r� N) rZ r[ r\ r] r^ r` ra rb r� r� rg r rt r r r< r= r ry r{ r r| r r r r* r+ r) r r~ r� r3 r2 r r � sA � � � � � �� � �D��h�G�� �I��I��I� �I� ,�J� � �g�n� %� �Z� � �F�L� )� �v�~� &� )�&� 1� �J� �� � .� 7��� E� �� � '� �� *� �U�9�U� +� +� +�W� 5� �:� %�t�}� 5� �:� %�t�}� 5� �U�9�Z�� >� >� >�� � M� �*� $�d�m� 4� �� � '� �� %� �� %�Y- �/�F�F�Fr3 r c �R � e Zd ZdZdZdZdgZdgZg ZdZ dZ dZ d Z d Z d Zd Zd ZdZdZdedfdedfdez ej fdez ej fdez ej fdez ej fdez ej fdez ej fdez ej fdez ej fd ez ej fd ez ej fd ez d z ez d z ez d!z ez d"z ej f ee d#�$� � ef eed#�$� � ej f ed%� � eej fgd&ez ej fd'ej fd(e f ee d#�$� � ef eed#�$� � ej f ed%� � eej fgd)e j fd*e!fd+e"j# fd,e"j$ fd-e"fd.efd/ej% f ee d#�$� � ef ee d#�$� � ej fd0efg ee d#d1�2� � edf ed3� � gd4�Z&d5S )6r a An xtlang lexer for the Extempore programming environment. This is a mixture of Scheme and xtlang, really. Keyword lists are taken from the Extempore Emacs mode (https://github.com/extemporelang/extempore-emacs-mode) .. versionadded:: 2.2 �xtlangz http://extempore.moso.com.au� extemporez*.xtm) r� r r$ r r� r r9 r� r rG r� r� ) r� r r� r� rR r� r r- r. r� ) z bind-funczbind-valzbind-libz bind-typez bind-aliasz bind-polyz bind-dylibz bind-lib-funcz bind-lib-val)�letz�memzone�cast�convertr� �doloop)JrU rV rW rX rY rZ r[ r\ r] r� r^ r_ rb rc rd rg r� ri rj rk rm 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< rD rJ rc 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� zinteraction-environmentr� r� r� r� r� r� r� r� r� r� r� r� r r r r znull-environmentr r r r� r r r r r r r r% r( r, r- r. r0 r3 r4 r7 zscheme-report-environmentzset-car!zset-cdr!rJ rL rM rN rO rP rQ rR rS rT rU rV rW rX rY rZ r[ r\ r] r^ r_ rd re ztranscript-offz transcript-onrq rs rt ru rv rw rx r| r} r r� r� )o�toStringzafill!zpfill!ztfill!�tbindzvfill!z array-fill!z pointer-fill!z tuple-fill!rv �freer� �tupler� r� zcset!�crefr� �borz ang-namesr� r� r� r# �sprintfr r� zpset!zpref-ptrzvset!�vrefzaset!r$ zaref-ptrztset!�trefztref-ptr�salloc�halloc�zalloc�alloc�scheduler� r� rD r� rj rg r_ rk rJ r� r� r� rq r< � llvm_printf� push_zone�pop_zoner5 r� � llvm_sprintfz make-arrayz array-set!z array-refz array-ref-ptrz pointer-set!z pointer-refzpointer-ref-ptrz stack-allocz heap-allocz zone-allocz make-tuplez tuple-set!z tuple-refz tuple-ref-ptrz closure-set!z closure-ref�pref�pdref� impc_null�bitcastr{ �ifretzret->zclrun->z make-env-zonezmake-envz<>�dtof�ftod�i1tof�i1tod�i1toi8�i1toi32�i1toi64�i8tof�i8tod�i8toi1�i8toi32�i8toi64�i32tof�i32tod�i32toi1�i32toi8�i32toi64�i64tof�i64tod�i64toi1�i64toi8�i64toi32r$ z[\w.!-]+z[]{}[\w<>,*/|!-]+r� rS r� rH z(?<=bind-func\s)z(?<=bind-val\s)z(?<=bind-type\s)z(?<=bind-alias\s)z(?<=bind-poly\s)z(?<=bind-lib\s)z(?<=bind-dylib\s)z(?<=bind-lib-func\s)z(?<=bind-lib-val\s)r� z(<z>|\|z\||/z/|z\*)\**rR )rm �commonrK rM rO r� rG r� r� z(#b|#o|#x)[\d.]+r� rN r r5 r0 r" )r2 r" rf rY N)'rZ r[ r\ r] r^ r_ r` ra rb �common_keywordsr �xtlang_bind_keywords�xtlang_keywords�common_functions�scheme_functions�xtlang_functions�valid_scheme_name�valid_xtlang_name�valid_xtlang_typer r r) r r� r r r* r ry r{ r r rt r r r< r= r| r~ r� r3 r2 r r � s$ � � � � � �� � �D� (�C��m�G�� �I��I��O��O� ���O� ��"��F��0 3�� $��,�� �K�� )� �K�� (� �#4� 4�d�m� D� �"3� 3�T�]� C� �#4� 4�d�m� D� !�$5� 5�t�}� E� �#4� 4�d�m� D� �"3� 3�T�]� C� !�$5� 5�t�}� E� $�'8� 8�$�-� H� #�&7� 7�� � G� �%� %�w�|� 4� �&� &�� 0�3D� D�w� N� � �!&�'�):�;�=F�G� �\� � �U�?�:� 6� 6� 6�� @� �U�#�J� 7� 7� 7�� � G� �G�H� � � �� � .�? �F �%� %�v�}� 5� 8��� E� �� *� �U�?�:� 6� 6� 6�� @� �U�#�J� 7� 7� 7�� � G� �G�H� � � �� � .�' �0 �g�n� %� �Z� � �F�L� )� �v�~� &� !�&� )� )�&� 1� �� � '� �U�?�:� 6� 6� 6�� @� �U�#�J� 7� 7� 7�� � G� �� %�7 �> �U�'� �5� I� I� I� �h� � �G�H� � � �m]� ]�F�F�Fr3 r c �H � e Zd ZdZdZdZddgZdgZdZdZ d Z d Z d d e j fd efdefdej fdej fdefdej fde z ej f eed�� � ef ee d�� � ej f ee d�� � ej fdej fe ej fde fde fde fde fgiZ dS ) r z�A lexer for the Fennel programming language. Fennel compiles to Lua, so all the Lua builtins are recognized as well as the special forms that are particular to the Fennel compiler. .. versionadded:: 2.3 �Fennelzhttps://fennel-lang.org�fennel�fnlz*.fnl)?�#r� rU rV rW r� r� z-?>z-?>>r: z..rX z//r� rY rZ r[ r\ r] z?.r� � accumulater �band�bnotr> �bxor�collect�commentr� �doc�doto�eachz eval-compilerr� �hashfn�icollectr$ z import-macrosr r� r� �lshift�lua� macrodebugr? r znot=r9 �partialz pick-argsz pick-valuesr� zrequire-macros�rshiftr> z set-forcibly!�tsetrs r� r� z with-openz~=)r� r� r� r1 r� r� �varrT )'�_G�_VERSION�arg�assert�bit32�collectgarbage� coroutiner� �dofiler� �getfenv� getmetatable�io�ipairsr� �loadfile� loadstring�math�nextr� r� �pairs�pcallr" �rawequal�rawget�rawlen�rawsetrE r �setfenv� setmetatablerJ �table�tonumber�tostringr� r. �xpcallz0[a-zA-Z_!$%&*+/:<=>?^~|-][\w!$%&*+/:<=>?^~|\.-]*rY r� r� rG r� r� r� z(true|false|nil)r� r� r� z\.\.\.r r� r� rt N) rZ r[ r\ r] r^ r_ r` ra r� r� r rg r rt r r r r< r= r r r| ry r r rz r+ r* r r~ r� r3 r2 r r � s8 � � � � � �� � �D� #�C��� �G�� �I� �M��L��H� E�J� � �g�n� %� �D�M� �Z� � �F�L� )� �v�~� &� (�&� 1� �$�-� 0� �J� �� � .� �U�=�� -� -� -�w� 7� �U�<�� ,� ,� ,�g�.A� B� �U�8�C� (� (� (�$�,� 7� �� � &� �� � '� �� %� �� %� �� %� �;� �G$ �&�F�F�Fr3 r )$r] rc �pygments.lexerr r r r r �pygments.tokenr r r r r r r r r r r �pygments.lexers.pythonr � pygments.lexers._scheme_builtinsr r �__all__r r r r r r r r r r r� r3 r2 �<module>r� s ��� � � � � � H� H� H� H� H� H� H� H� H� H� H� H� H� H�4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� 4� /� .� .� .� .� .� M� M� M� M� M� M� M� M� )� )� )�� K� K� K� K� K�*� K� K� K�\p� p� p� p� p�j� p� p� p�fp� p� p� p� p�j� p� p� p�fl� l� l� l� l�*� l� l� l�^ A� A� A� A� A�:� A� A� A�HB � B � B � B � B �Z� B � B � B �Jb&� b&� b&� b&� b&� � b&� b&� b&�JK� K� K� K� K� � K� K� K�\I� I� I� I� I�*� I� I� I�XQ� Q� Q� Q� Q�*� Q� Q� Q� Q� Qr3
修改文件时间
将文件时间修改为当前时间的前一年
删除文件