codekingpro/portable-devtools

1�

2�jML��d�SrS
SK
JrJrJrJr S
SKJrJrJ	r	J3r4JrJrJ
r
Jr S/
r"SS\5rg)z�5pygments.lexers.factor6~~~~~~~~~~~~~~~~~~~~~~7 8Lexers for the Factor language.9 10:copyright: Copyright 2006-present by the Pygments team, see AUTHORS.11:license: BSD, see LICENSE for details.12�)�13RegexLexer�bygroups�default�words)�Text�Comment�Keyword�Name�String�Number�14Whitespace�Punctuation�FactorLexerc��\r
SrS
rSrSrSrS/
rS/
rS/
r	Sr15\"S	S16S9r\"SS17S9r
\"S
S18S9r\"SS19S9r\"SS20S9r\"SS21S9r\"SS22S9r\"SS23S9r\"SS24S9r\"SS25S9r\"SS26S9rS\R04\"S5
//S\4P
S\"\\\R<54P
S\"\\\R>\\R<54P
S\"\\\R<\\R>54P
S\"\\\R<54P
S\"\\\R<\\R<54P
S\"\R<\5S4P
S \"\\54P
S!\"\R@\5S"4P
S#\"\R@\\R@54P
S$\"\R@\\R@\\R@54P
S%\"\R@\\R@\5S&4P
S'\"\R@\\R<\\R@\\!\\R<5	4P
S(\"\R@\\R<\\R<54P
S)\"\R@\\R<54P
S*\"\\\R>\\!\\R>5S+4P
S,\"\\\R>5S+4P
S-\"\\\R>54P
S.\"\\\R>\\!\\R>54P
S\"\\\R<\\R>54P
S/\"\\\R>\\R>54P
S0\"\\\R<54P
S1\"\\\R>54P
S2\S34P
S4\"\\\R<54P
S5\"\\5S&4P
S6\"\\54P
S7\"\\54P
S8\"\\\R>54P
S9\"\R@\\"\\R<\\!\\"\!\54P
S:\"\R@\\"\\R<\\R<\\!\\"\!\5
4P
S;\"\R@\54P
S<\#4P
S=\#4P
S>\"\#\\#54P
S?\"\#RH\\#RH\54P
S@\4P
SA\4P
SB\4P
SC\RJ4P
SD\RJ4P
SE\RJ4P
SF\&4P
SG\&4P
SH\&4P
SI\&4P
SJ\&RN4P
SK\&RP4P
SL\&4P
SM\&4P
SN\4P
\\"\RR\54P
\
\"\RR\54P
\\"\RR\54P
\\"\RR\54P
\\"\RR\54P
\\"\RR\54P
\\"\RR\54P
\\"\RR\54P
\\"\RR\54P
\\"\RR\54P
\\"\RR\54P
SO\"4P
S\4SP\"\R<\5S4SQ\"\R<\5SR4SS\"\R<\54SO\RT4/S\4ST\"\\5SR4SU\"\"\\RT\\"\\"\54SO\RT4/S\4ST\"\\5SR4SO\R@4/S\4ST\"\\5SR4SO\R>4/S\4ST\"\\5SR4SO\R<4/SV.r+SWr,gX)Yr�z 27Lexer for the Factor language.28�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>arrayz29callstack?�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-curryz30tri-curry@z31tri-curry*ztri@ztri*�tupleztuple?�unlesszunless*�until�whenzwhen*�while�with�wrapperzwrapper?�xorz(\s+))
�suffix)@�2cachez<enum>z>alistz?atz?of�assocz32assoc-all?z33assoc-any?zassoc-clone-likez
assoc-combinez34assoc-diffzassoc-diff!zassoc-differz35assoc-eachzassoc-empty?zassoc-filterz
assoc-filter!zassoc-filter-asz36assoc-findzassoc-hashcodezassoc-intersectz37assoc-likez	assoc-mapzassoc-map-aszassoc-partitionzassoc-refinez38assoc-sizezassoc-stackz
assoc-subset?zassoc-unionzassoc-union!zassoc=z	assoc>mapzassoc?�atzat+zat*�cachez	change-atzclear-assocz	delete-atz39delete-at*�enumzenum?zextract-keyszinc-atzkey?�keysz	map>assoczmaybe-set-atz	new-assoc�ofzpush-atz	rename-atzset-atz	sift-keyszsift-values�40substitute�unzipzvalue-atz	value-at*zvalue?�values�zip)�2cleavez2cleave>quot�3cleavez3cleave>quot�4cleavez4cleave>quotz41alist>quotzcall-effect�casez	case-findz	case>quot�cleavezcleave>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�bitorzbits>doublez42bits>float�bitxor�complexzcomplex?�denominatorzdouble>bitszeach-integerzeven?zfind-integerzfind-last-integer�fixnumzfixnum?�floatz43float>bitszfloat?zfp-bitwise=zfp-infinity?zfp-nan-payloadzfp-nan?zfp-qnan?zfp-signzfp-snan?zfp-special?zif-zerozimaginary-part�integerzinteger>fixnumzinteger>fixnum-strictzinteger?�log2zlog2-expects-positivezlog2-expects-positive?�mod�negzneg?z44next-floatznext-power-of-2�numberznumber=znumber?�	numeratorzodd?zout-of-fixnum-rangezout-of-fixnum-range?zpower-of-2?z45prev-float�ratiozratio?�rationalz	rational?�realz	real-partzreal?�recip�rem�sgn�shift�sq�timeszu<zu<=zu>zu>=zunless-zeroz46unordered?z	when-zerozzero?)��	1sequencez2all?�2each�2mapz2map-asz2map-reduce�2reduce�	2selector�	2sequence�3appendz473append-as�3each�3mapz3map-as�	3sequence�	4sequencez<repetition>z48<reversed>z<slice>z?firstz?lastz?nthz?secondz?set-nth�49accumulatezaccumulate!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-productz50change-nthzcheck-slicezcheck-slice-errorz51clone-likezcollapse-slice�	collectorz
collector-for�concatz	concat-as�copy�count�cutz	cut-slicezcut*z52delete-allzdelete-slicezdrop-prefix�eachz	each-fromz53each-indexzempty?�exchange�filterzfilter!z	filter-as�findz	find-fromz54find-indexzfind-index-fromz	find-lastzfind-last-from�first�first2�first3�first4�flip�follow�fourth�glue�halves�harvest�headz55head-slicezhead-slice*zhead*zhead?zif-empty�	immutablezimmutable-sequencezimmutable-sequence?z56immutable?�indexz57index-from�indices�infimumz58infimum-byz59insert-nth�60interleave�iotaz61iota-tupleziota-tuple?�joinzjoin-as�lastz62last-indexzlast-index-from�length�lengthen�like�longerzlonger?�longest�mapzmap!zmap-aszmap-findz
map-find-lastz	map-indexzmap-integersz63map-reducezmap-sumz64max-lengthz65member-eq?zmember?z	midpoint@z66min-length�mismatch�moveznew-likez
new-resizableznew-sequenceznon-negative-integer-expectedznon-negative-integer-expected?�nth�nthszpad-headzpad-tail�padding�	partition�popzpop*�prefix�prependz67prepend-as�producez68produce-as�product�pushzpush-allzpush-eitherzpush-if�reducezreduce-index�removezremove!z	remove-eqz69remove-eq!z70remove-nthzremove-nth!�71repetitionzrepetition?z
replace-slice�	replicatezreplicate-as�restz72rest-slice�reversezreverse!�reversedz	reversed?�second�selectorzselector-for�sequencezsequence-hashcodez	sequence=z	sequence?z	set-firstz73set-fourthzset-lastz74set-lengthzset-nthz75set-secondz	set-third�short�shorten�shorterzshorter?�shortest�sift�slicezslice-errorzslice-error?zslice?�snipz76snip-slice�startzstart*�subseqzsubseq?rZzsuffix!�sumzsum-lengths�supremumzsupremum-by�surround�tailz77tail-sliceztail-slice*ztail*ztail?�third�trimz	trim-headztrim-head-slicez78trim-slicez	trim-tailztrim-tail-slice�unclipzunclip-lastzunclip-last-slicezunclip-slicezunless-emptyzvirtual-exemplarzvirtual-sequencezvirtual-sequence?zvirtual@z79when-empty)z+@�changez
change-global�counter�dec�getz80get-global�global�inczinit-namespaces�81initializez	is-globalz82make-assoc�	namespace�	namestack�off�on�setz83set-globalz
set-namestack�togglezwith-globalz84with-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�contentsz85each-blockzeach-block-sizezeach-block-slicez	each-linezeach-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-intoz86read-until�read1�readlnz
seek-absolutezseek-absolute?zseek-endz	seek-end?z87seek-inputzseek-outputz
seek-relativezseek-relative?z	stream-blzstream-contentszstream-contents*zstream-copyzstream-copy*zstream-element-typezstream-flushz
stream-lengthzstream-linesz	stream-nlzstream-printzstream-readzstream-read-intozstream-read-partialzstream-read-partial-intozstream-read-partial-unsafezstream-read-unsafezstream-read-untilzstream-read1z
stream-readlnzstream-seekzstream-seekable?zstream-tellzstream-writez
stream-write1z88tell-inputztell-outputzwith-error-streamzwith-error-stream*zwith-error>outputzwith-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>zattempt-allzattempt-all-errorzattempt-all-error?zcallback-error-hook�callcc0�callcc1�cleanupzcompute-restarts�	conditionz89condition?�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-datastackzwith-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)rz0(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+)zSINGLETONS:�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]+\sz900o[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__�91__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�92builtin_io�builtin_strings�builtin_vectors�builtin_continuationsr�Preprocrr
rr	r93�Function�Class�	Namespacerrr�Char�Constantr�Bin�Oct�Builtin�Variable�tokens�__static_attributes__r
��\D:\code\apps\devtools\python\user_packages\Python313\site-packages\pygments/lexers/factor.pyrrs=94����D�95!�C��j�G���I� �!�I��M��&�/7�8�N� �E
�N
V
�W
�N� �!;�D
L
�
M
����$"�%#�L�(�*�T
'�U
*(��X
� R
�96����3�;C�E
�N���8$,�9-�J�<��#�%�O��
H
���O�"�97#;�D
L
�98M
���w���'��F�O�99�100F101�
�Z� �F102�7�
�g�z�4�=�=�
9�

;�	F103�-�
�g�z�4�:�:�z����
 �
!�
F104�)�
�g�z�4�=�=�*����
�
�F105�%�
�g�z�4�=�=�
9�

;�F106�5�
�g�z�4�=�=�*����
 �
!�F107�"�(�4�=�=�*�=�}�M�#F108�$��'�:�6�7�%F109�*�
�g�'�'��
4�h�

@
�+F110�.7�
�g�'�'��T�^�^�
D�

F
�/F111�26�
�g�'�'��T�^�^��T�^�^�
-�
.�3F112�84�
�g�'�'��T�^�^��
�%�
'�9F113�>A
�
�g�'�'��T�]�]�J�����[�*���� �
!�?F114�F
6�
�g�'�'��T�]�]�J����
 �
!�G
F115�L
5�
�g�'�'��T�]�]�
C�

E
�M
F116�T
<�
�g�z�4�:�:�z�;��T�Z�Z�
)�*1�
3�U
F117�Z
3�
�g�z�4�:�:�
6��

A
�[
F118�^
8�
�g�z�4�:�:�
6�

8�_
F119�b
9�
�g�z�4�:�:�z��j�$�*�*�
6�
7�c
F120�h
)�
�g�z�4�=�=�*�d�j�j�
Q�

S
�i
F121�l
0�
�g�z�4�:�:�z�4�:�:�
N�

P
�m
F122�p
"�8�G�Z����#O�P�q
F123�r
'���*�d�j�j�(Q�R�s
F124�t
�W�i�0�u
F125�z
:�
�g�z�4�=�=�
9�

;�{
F126�~
 ��'�:�!>��H�
F127�@���*� =�>�AF128�B�x���<�=�CF129�D$�X�g�z�4�:�:�%N�O�EF130�F,��g�'�'���z�4�=�=�*��j�$��Z�I
�
J
�GF131�R,��g�'�'���z�4�=�=�*����132��j�$��Z�I
�	
J
�SF133�f(��'�2C�2C�Z�)P�Q�gF134�l%�f�-�mF135�n%�f�-�oF136�p1����V�4�

6�qF137�t:�����j�&�+�+�z�J�

L
�uF138�|��!�}F139�~�'�"�F140�@&�w�/�AF141�F��
�
�&�GF142�L�T�]�]�+�MF143�N ����/�OF144�TJ
�6�R�UF145�V8��@�WF146�XM
�f�U�YF147�ZR
�SY�Z�[F148�\�6�:�:�&�]F149�^�F�J�J�'�_F150�`F
�v�N�aF151�bH
��P�cF152�hK
�
�

�iF153�p�X�d�l�l�J�?�@�qF154�r�X�d�l�l�J�?�@�sF155�t!�(�4�<�<��"D�E�uF156�v�8�D�L�L�*�=�>�wF157�x�����z� B�C�yF158�z ��$�,�,�159�!C�D�{F160�|�X�d�l�l�J�?�@�}F161�~��$�,�,�162�;�<�F163�@�h�t�|�|�Z�@�A�AF164�B�h�t�|�|�Z�@�A�CF165�D#�H�T�\�\�:�$F�G�EF166�J�T�N�KF167�P�Z� �
�8�D�M�M�:�>�
�N�
�8�D�M�M�:�>��G�
�8�D�M�M�:�>�?�
�T�]�]�#�168��Z� �
�(�7�J�7��@�
8�
�d�J��
�
�z��z�4��
5�
6��T�]�]�#�
169��Z� �
�(�7�J�7��@�
�T�^�^�$�170��Z� �
�(�7�J�7��@�
�T�Z�Z� �171��Z� �
�(�7�J�7��@�
�T�]�]�#�172�Mk�Fr:
N)r
�pygments.lexerrrrr�pygments.tokenrrr	r173rrr
r�__all__rr
r:
r;
�<module>r?

s9�


�
�
@
�?�

�

�

��/��Y
�*�Y
r: