__ __ __ __ _____ _ _ _____ _ _ _ | \/ | \ \ / / | __ \ (_) | | / ____| | | | | | \ / |_ __\ V / | |__) | __ ___ ____ _| |_ ___ | (___ | |__ ___| | | | |\/| | '__|> < | ___/ '__| \ \ / / _` | __/ _ \ \___ \| '_ \ / _ \ | | | | | | |_ / . \ | | | | | |\ V / (_| | || __/ ____) | | | | __/ | | |_| |_|_(_)_/ \_\ |_| |_| |_| \_/ \__,_|\__\___| |_____/|_| |_|\___V 2.1 if you need WebShell for Seo everyday contact me on Telegram Telegram Address : @jackleetFor_More_Tools:
�
�&�gJL � �d � S r SSKJrJrJrJr SSKJrJrJ r J
r
J r J r J
r
Jr S/r " S S\5 rg)z�
pygments.lexers.factor
~~~~~~~~~~~~~~~~~~~~~~
Lexers for the Factor language.
:copyright: Copyright 2006-2024 by the Pygments team, see AUTHORS.
:license: BSD, see LICENSE for details.
� )�
RegexLexer�bygroups�default�words)�Text�Comment�Keyword�Name�String�Number�
Whitespace� Punctuation� FactorLexerc � � \ rS rSrSrSrSrS/rS/rS/r Sr
\ " S S
S 9r \ " S S
S 9r
\ " S
S
S 9r\ " SS
S 9r\ " SS
S 9r\ " SS
S 9r\ " SS
S 9r\ " SS
S 9r\ " SS
S 9r\ " SS
S 9r\ " SS
S 9rS\R0 4\" S5 // S\4PS\" \ \\ R< 5 4PS\" \ \\ R> \\ R< 5 4PS\" \ \\ R< \\ R> 5 4PS \" \ \\ R< 5 4PS \" \ \\ R< \\ R< 5 4PS \" \ R< \5 S 4PS \" \ \5 4PS!\" \ R@ \5 S"4PS#\" \ R@ \\ R@ 5 4PS$\" \ R@ \\ R@ \\ R@ 5 4PS%\" \ R@ \\ R@ \5 S&4PS'\" \ R@ \\ R< \\ R@ \\!\\ R< 5 4PS(\" \ R@ \\ R< \\ R< 5 4PS)\" \ R@ \\ R< 5 4PS*\" \ \\ R> \\!\\ R> 5 S+4PS,\" \ \\ R> 5 S+4PS-\" \ \\ R> 5 4PS.\" \ \\ R> \\!\\ R> 5 4PS\" \ \\ R< \\ R> 5 4PS/\" \ \\ R> \\ R> 5 4PS0\" \ \\ R< 5 4PS1\" \ \\ R> 5 4PS2\ S34PS4\" \ \\ R< 5 4PS5\" \ \5 S&4PS6\" \ \5 4PS7\" \ \5 4PS8\" \ \\ R> 5 4PS9\" \ R@ \\"\\ R< \\!\\"\!\5 4PS:\" \ R@ \\"\\ R< \\ R< \\!\\"\!\5
4PS;\" \ R@ \5 4PS<\#4PS=\#4PS>\" \#\\#5 4PS?\" \#RH \\#RH \5 4PS@\4PSA\4PSB\4PSC\ RJ 4PSD\ RJ 4PSE\ RJ 4PSF\&4PSG\&4PSH\&4PSI\&4PSJ\&RN 4PSK\&RP 4PSL\&4PSM\&4PSN\ 4P\ \" \ RR \5 4P\
\" \ RR \5 4P\\" \ RR \5 4P\\" \ RR \5 4P\\" \ RR \5 4P\\" \ RR \5 4P\\" \ RR \5 4P\\" \ RR \5 4P\\" \ RR \5 4P\\" \ RR \5 4P\\" \ RR \5 4PSO\"4PS\4SP\" \ R< \5 S 4SQ\" \ R< \5 SR4SS\" \ R< \5 4SO\ RT 4/S\4ST\" \ \5 SR4SU\" \"\\ RT \\"\\"\5 4SO\ RT 4/S\4ST\" \ \5 SR4SO\ R@ 4/S\4ST\" \ \5 SR4SO\ R> 4/S\4ST\" \ \5 SR4SO\ R< 4/SV.r+SWr,gX)Yr � z
Lexer for the Factor language.
�Factorzhttp://factorcode.org�factorz*.factorz
text/x-factorz1.4)oz-rot�2biz2bi@z2bi*�2curry�2dip�2drop�2dup�2keep�2nip�2over�2triz2tri@z2tri*�3bi�3curry�3dip�3drop�3dup�3keep�3tri�4dip�4drop�4dup�4keepz <wrapper>�=z>boolean�clone�?z?executez?if�and�assertzassert=zassert?�bizbi-curryz bi-curry@z bi-curry*zbi@zbi*�boa�booleanzboolean?zboth?�build�call� callstackzcallstack>arrayz
callstack?�clearz(clone)�composezcompose?�curryzcurry?� datastack�die�dip�do�drop�dup�dupdzeither?zeq?zequal?�execute�hashcodez hashcode*zidentity-hashcodezidentity-tuplezidentity-tuple?�ifzif*�keep�loop�most�new�nip�not�null�object�or�over�pick�prepose� retainstack�rotzsame?�swap�swapd�throw�triz tri-curryz
tri-curry@z
tri-curry*ztri@ztri*�tupleztuple?�unlesszunless*�until�whenzwhen*�while�with�wrapperzwrapper?�xorz(\s+))�suffix)@�2cachez<enum>z>alistz?atz?of�assocz
assoc-all?z
assoc-any?zassoc-clone-likez
assoc-combinez
assoc-diffz assoc-diff!z assoc-differz
assoc-eachz assoc-empty?z assoc-filterz
assoc-filter!zassoc-filter-asz
assoc-findzassoc-hashcodezassoc-intersectz
assoc-likez assoc-mapz assoc-map-aszassoc-partitionz assoc-refinez
assoc-sizez assoc-stackz
assoc-subset?z assoc-unionz assoc-union!zassoc=z assoc>mapzassoc?�atzat+zat*�cachez change-atz clear-assocz delete-atz
delete-at*�enumzenum?z extract-keyszinc-atzkey?�keysz map>assocz maybe-set-atz new-assoc�ofzpush-atz rename-atzset-atz sift-keysz sift-values�
substitute�unzipzvalue-atz value-at*zvalue?�values�zip) �2cleavez 2cleave>quot�3cleavez 3cleave>quot�4cleavez 4cleave>quotz
alist>quotz call-effect�casez case-findz case>quot�cleavez cleave>quot�condz cond>quotzdeep-spread>quotzexecute-effectzlinear-case-quotzno-casezno-case?zno-condzno-cond?zrecursive-hashcodezshallow-spread>quot�spreadzto-fixed-pointz wrong-valuesz
wrong-values?)c�-�/z/fz/iz/modz2/z2^�<z<=z<fp-nan>�>z>=z>bignumz>fixnumz>floatz>integerz(all-integers?)z(each-integer)z(find-integer)�*�+z?1+�abs�alignz
all-integers?�bignumzbignum?zbit?�bitand�bitnot�bitorz bits>doublez
bits>float�bitxor�complexzcomplex?� denominatorz double>bitsz each-integerzeven?z find-integerzfind-last-integer�fixnumzfixnum?�floatz
float>bitszfloat?z fp-bitwise=z fp-infinity?zfp-nan-payloadzfp-nan?zfp-qnan?zfp-signzfp-snan?z fp-special?zif-zerozimaginary-part�integerzinteger>fixnumzinteger>fixnum-strictzinteger?�log2zlog2-expects-positivezlog2-expects-positive?�mod�negzneg?z
next-floatznext-power-of-2�numberznumber=znumber?� numeratorzodd?zout-of-fixnum-rangezout-of-fixnum-range?z power-of-2?z
prev-float�ratiozratio?�rationalz rational?�realz real-partzreal?�recip�rem�sgn�shift�sq�timeszu<zu<=zu>zu>=z unless-zeroz
unordered?z when-zerozzero?)�� 1sequencez2all?�2each�2mapz2map-asz 2map-reduce�2reduce� 2selector� 2sequence�3appendz
3append-as�3each�3mapz3map-as� 3sequence� 4sequencez <repetition>z
<reversed>z<slice>z?firstz?lastz?nthz?secondz?set-nth�
accumulatez accumulate!z
accumulate-aszall?zany?�appendzappend!z append-aszassert-sequencezassert-sequence=zassert-sequence?z
binary-reducez bounds-checkz
bounds-check?z bounds-errorz
bounds-error?zbut-lastzbut-last-slicezcartesian-eachz
cartesian-mapzcartesian-productz
change-nthz check-slicezcheck-slice-errorz
clone-likezcollapse-slice� collectorz
collector-for�concatz concat-as�copy�count�cutz cut-slicezcut*z
delete-allz delete-slicez drop-prefix�eachz each-fromz
each-indexzempty?�exchange�filterzfilter!z filter-as�findz find-fromz
find-indexzfind-index-fromz find-lastzfind-last-from�first�first2�first3�first4�flip�follow�fourth�glue�halves�harvest�headz
head-slicez head-slice*zhead*zhead?zif-empty� immutablezimmutable-sequencezimmutable-sequence?z
immutable?�indexz
index-from�indices�infimumz
infimum-byz
insert-nth�
interleave�iotaz
iota-tuplez iota-tuple?�joinzjoin-as�lastz
last-indexzlast-index-from�length�lengthen�like�longerzlonger?�longest�mapzmap!zmap-aszmap-findz
map-find-lastz map-indexz map-integersz
map-reducezmap-sumz
max-lengthz
member-eq?zmember?z midpoint@z
min-length�mismatch�moveznew-likez
new-resizablez new-sequencez non-negative-integer-expectedz non-negative-integer-expected?�nth�nthszpad-headzpad-tail�padding� partition�popzpop*�prefix�prependz
prepend-as�producez
produce-as�product�pushzpush-allz push-eitherzpush-if�reducez reduce-index�removezremove!z remove-eqz
remove-eq!z
remove-nthz remove-nth!�
repetitionz repetition?z
replace-slice� replicatez replicate-as�restz
rest-slice�reversezreverse!�reversedz reversed?�second�selectorz selector-for�sequencezsequence-hashcodez sequence=z sequence?z set-firstz
set-fourthzset-lastz
set-lengthzset-nthz
set-secondz set-third�short�shorten�shorterzshorter?�shortest�sift�slicez slice-errorz slice-error?zslice?�snipz
snip-slice�startzstart*�subseqzsubseq?rZ zsuffix!�sumz sum-lengths�supremumz supremum-by�surround�tailz
tail-slicez tail-slice*ztail*ztail?�third�trimz trim-headztrim-head-slicez
trim-slicez trim-tailztrim-tail-slice�unclipz unclip-lastzunclip-last-slicez unclip-slicez unless-emptyzvirtual-exemplarzvirtual-sequencezvirtual-sequence?zvirtual@z
when-empty)z+@�changez
change-global�counter�dec�getz
get-global�global�inczinit-namespaces�
initializez is-globalz
make-assoc� namespace� namestack�off�on�setz
set-globalz
set-namestack�togglez with-globalz
with-scopez
with-variablezwith-variables) �1array�2array�3array�4arrayz<array>z>array�arrayzarray?�pairzpair?z resize-array)Yz(each-stream-block-slice)z(each-stream-block)z(stream-contents-by-block)z (stream-contents-by-element)z$(stream-contents-by-length-or-block)z(stream-contents-by-length)z+byte+z +character+z
bad-seek-typezbad-seek-type?�bl�contentsz
each-blockzeach-block-sizezeach-block-slicez each-linez each-morselzeach-stream-blockzeach-stream-block-slicezeach-stream-linez error-stream�flushz input-streamz
input-stream?zinvalid-read-bufferzinvalid-read-buffer?�lines�nlz
output-streamzoutput-stream?�print�readz read-intoz read-partialzread-partial-intoz
read-until�read1�readlnz
seek-absolutezseek-absolute?zseek-endz seek-end?z
seek-inputz seek-outputz
seek-relativezseek-relative?z stream-blzstream-contentszstream-contents*z stream-copyz stream-copy*zstream-element-typez stream-flushz
stream-lengthz stream-linesz stream-nlz stream-printz stream-readzstream-read-intozstream-read-partialzstream-read-partial-intozstream-read-partial-unsafezstream-read-unsafezstream-read-untilz stream-read1z
stream-readlnz stream-seekzstream-seekable?z stream-tellz stream-writez
stream-write1z
tell-inputz tell-outputzwith-error-streamzwith-error-stream*zwith-error>outputz with-input-output+error-streamsz with-input-output+error-streams*zwith-input-streamzwith-input-stream*zwith-output-streamzwith-output-stream*zwith-output>errorzwith-output+error-streamzwith-output+error-stream*z with-streamsz
with-streams*�write�write1)�1stringz<string>z>stringz
resize-string�stringzstring?)�1vectorz<vector>z>vectorz?push�vectorzvector?)(z <condition>z<continuation>z <restart>z attempt-allzattempt-all-errorzattempt-all-error?zcallback-error-hook�callcc0�callcc1�cleanupzcompute-restarts� conditionz
condition?� continuationz
continuation?�continuezcontinue-restartz
continue-withzcurrent-continuation�errorzerror-continuationzerror-in-threadz error-thread�ifccz
ignore-errorsz in-callback?zoriginal-error�recover�restartzrestart?�restarts�rethrowzrethrow-restarts�returnzreturn-continuationzthread-error-hookzthrow-continuezthrow-restartszwith-datastackz with-returnz#!.*$�basez\s+z&((?:MACRO|MEMO|TYPED)?:[:]?)(\s+)(\S+)z (M:[:]?)(\s+)(\S+)(\s+)(\S+)z(C:)(\s+)(\S+)(\s+)(\S+)z(GENERIC:)(\s+)(\S+)z$(HOOK:|GENERIC#)(\s+)(\S+)(\s+)(\S+)z(\()(\s)� stackeffectz(;)(\s)z
(USING:)(\s+)�vocabsz&(USE:|UNUSE:|IN:|QUALIFIED:)(\s+)(\S+)z%(QUALIFIED-WITH:)(\s+)(\S+)(\s+)(\S+)z#(FROM:|EXCLUDE:)(\s+)(\S+)(\s+=>\s)r z0(RENAME:)(\s+)(\S+)(\s+)(\S+)(\s+)(=>)(\s+)(\S+)z%(ALIAS:|TYPEDEF:)(\s+)(\S+)(\s+)(\S+)z$(DEFER:|FORGET:|POSTPONE:)(\s+)(\S+)z+(TUPLE:|ERROR:)(\s+)(\S+)(\s+)(<)(\s+)(\S+)�slotsz"(TUPLE:|ERROR:|BUILTIN:)(\s+)(\S+)z'(MIXIN:|UNION:|INTERSECTION:)(\s+)(\S+)z((PREDICATE:)(\s+)(\S+)(\s+)(<)(\s+)(\S+)z (INSTANCE:)(\s+)(\S+)(\s+)(\S+)z(SLOT:)(\s+)(\S+)z(SINGLETON:)(\s+)(\S+)z SINGLETONS:�classesz)(CONSTANT:|SYMBOL:|MAIN:|HELP:)(\s+)(\S+)z(SYMBOLS:)(\s+)z(SYNTAX:)(\s+)z
(ALIEN:)(\s+)z(STRUCT:)(\s+)(\S+)z<(FUNCTION:)(\s+)(\S+)(\s+)(\S+)(\s+)(\()(\s+)([^)]+)(\))(\s)zL(FUNCTION-ALIAS:)(\s+)(\S+)(\s+)(\S+)(\s+)(\S+)(\s+)(\()(\s+)([^)]+)(\))(\s)z(<PRIVATE|PRIVATE>)(\s)z"""\s(?:.|\n)*?\s"""z"(?:\\\\|\\"|[^"])*"z (\S+")(\s+)((?:\\\\|\\"|[^"])*")z)(CHAR:)(\s+)(\\[\\abfnrstv]|[^\\]\S*)(\s)z!\s+.*$z#!\s+.*$z/\*\s+(?:.|\n)*?\s\*/z[tf]\bz [\\$]\s+\S+zM\\\s+\S+\s+\S+z9[+-]?(?:[\d,]*\d)?\.(?:\d([\d,]*\d)?)?(?:[eE][+-]?\d+)?\sz'[+-]?\d(?:[\d,]*\d)?(?:[eE][+-]?\d+)?\sz<0x[a-fA-F\d](?:[a-fA-F\d,]*[a-fA-F\d])?(?:p\d([\d,]*\d)?)?\szANAN:\s+[a-fA-F\d](?:[a-fA-F\d,]*[a-fA-F\d])?(?:p\d([\d,]*\d)?)?\sz 0b[01]+\sz
0o[0-7]+\sz5(?:\d([\d,]*\d)?)?\+\d(?:[\d,]*\d)?/\d(?:[\d,]*\d)?\sz7(?:\-\d([\d,]*\d)?)?\-\d(?:[\d,]*\d)?/\d(?:[\d,]*\d)?\sz:(?:deprecated|final|foldable|flushable|inline|recursive)\sz\S+z (\()(\s+)z (\))(\s+)z#popz (--)(\s+)z(;)(\s+)z((\{)(\s+)(\S+)(\s+)([^}]+)(\s+)(\})(\s+))�rootr r r r r r � N)-�__name__�
__module__� __qualname__�__firstlineno__�__doc__�name�url�aliases� filenames� mimetypes�
version_addedr �builtin_kernel�builtin_assocs�builtin_combinators� builtin_math�builtin_sequences�builtin_namespaces�builtin_arrays�
builtin_io�builtin_strings�builtin_vectors�builtin_continuationsr �Preprocr r
r r r
�Function�Class� Namespacer r r �Char�Constantr �Bin�Oct�Builtin�Variable�tokens�__static_attributes__r � �8/usr/lib/python3/dist-packages/pygments/lexers/factor.pyr r s=
� �� �D�
!�C��j�G�� �I� �!�I��M�� &� /7� 8�N� � E� NV� W�N� � !;� DL�
M�� � �$ "�%#�L�( � * �T '�U*(��X � R�
� �� � 3�;C�E�N� � �8 $,�9 -�J�< � �#�%�O� � H���O� "�
#;� DL�
M�� �w��� '� �F�O�
�
F
�
�Z� �F
� 7�
�g�z�4�=�=�
9�
;� F
� -�
�g�z�4�:�:�z�� � � �
!�
F
� )�
�g�z�4�=�=�*���� �
�F
� %�
�g�z�4�=�=�
9�
;�F
� 5�
�g�z�4�=�=�*�� � � �
!� F
�" �(�4�=�=�*�=�}� M�#F
�$ ��'�:�6� 7�%F
�* �
�g�'�'��
4�h�
@�+F
�. 7�
�g�'�'��T�^�^�
D�
F�/F
�2 6�
�g�'�'��T�^�^��T�^�^�-�
.�3F
�8 4�
�g�'�'��T�^�^�� � %�
'�9F
�> A�
�g�'�'��T�]�]�J�� � ��[�*�� � � �
!�?F
�F 6�
�g�'�'��T�]�]�J�� � � �
!�GF
�L 5�
�g�'�'��T�]�]�
C�
E�MF
�T <�
�g�z�4�:�:�z�;��T�Z�Z�)�*1�
3�UF
�Z 3�
�g�z�4�:�:�
6��
A�[F
�^ 8�
�g�z�4�:�:�
6�
8�_F
�b 9�
�g�z�4�:�:�z� �j�$�*�*�6�
7�cF
�h )�
�g�z�4�=�=�*�d�j�j�
Q�
S�iF
�l 0�
�g�z�4�:�:�z�4�:�:�
N�
P�mF
�p "�8�G�Z�� � �#O� P�qF
�r '���*�d�j�j�(Q� R�sF
�t �W�i� 0�uF
�z :�
�g�z�4�=�=�
9�
;�{F
�~ ��'�:�!>�� H�F
�@ ���*� =� >�AF
�B �x��� <� =�CF
�D $�X�g�z�4�:�:�%N� O�EF
�F,� �g�'�'���z�4�=�=�*� �j�$� �Z�I�
J�GF
�R,� �g�'�'���z�4�=�=�*�� � �
� �j�$� �Z�I�
J�SF
�f (��'�2C�2C�Z�)P� Q�gF
�l %�f� -�mF
�n %�f� -�oF
�p 1����V�4�
6�qF
�t :�����j�&�+�+�z�J�
L�uF
�| �� !�}F
�~ �'� "�F
�@ &�w� /�AF
�F ��
�
� &�GF
�L �T�]�]� +�MF
�N �� � � /�OF
�T J�6� R�UF
�V 8�� @�WF
�X M�f� U�YF
�Z R�SY� Z�[F
�\ �6�:�:� &�]F
�^ �F�J�J� '�_F
�` F�v� N�aF
�b H�� P�cF
�h K�
�
�iF
�p �X�d�l�l�J� ?� @�qF
�r �X�d�l�l�J� ?� @�sF
�t !�(�4�<�<��"D� E�uF
�v �8�D�L�L�*�=� >�wF
�x ��� � �z� B� C�yF
�z ��$�,�,�
�!C� D�{F
�| �X�d�l�l�J� ?� @�}F
�~ ��$�,�,�
�;� <�F
�@ �h�t�|�|�Z� @� A�AF
�B �h�t�|�|�Z� @� A�CF
�D #�H�T�\�\�:�$F� G�EF
�J �T�N�KF
�P �Z� �
�8�D�M�M�:�>�
� N�
�8�D�M�M�:�>�� G�
�8�D�M�M�:�>� ?�
�T�]�]� #�
� �Z� �
�(�7�J�7�� @�
8�
�d�J��
�
�z��z�4��5�
6� �T�]�]� #�
� �Z� �
�(�7�J�7�� @�
�T�^�^� $�
� �Z� �
�(�7�J�7�� @�
�T�Z�Z� �
� �Z� �
�(�7�J�7�� @�
�T�]�]� #�
�Mk�Fr: N)r �pygments.lexerr r r r �pygments.tokenr r r r
r r r
r �__all__r r r: r; �<module>r? s9 ��� @� ?� � � � �/��Y�*� Yr: