HEX
Server: LiteSpeed
System: Linux us-phx-web1284.main-hosting.eu 4.18.0-553.109.1.lve.el8.x86_64 #1 SMP Thu Mar 5 20:23:46 UTC 2026 x86_64
User: u300739242 (300739242)
PHP: 8.2.30
Disabled: system, shell_exec, passthru, mysql_list_dbs, ini_alter, dl, symlink, link, chgrp, leak, popen, apache_child_terminate, virtual, mb_send_mail
Upload Files
File: //opt/alt/python311/lib/python3.11/site-packages/pygments/lexers/__pycache__/factor.cpython-311.pyc
�

�;fJL��l�dZddlmZmZmZmZddlmZmZm	Z	m
Z
mZmZm
Z
mZdgZGd�de��ZdS)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�x�eZdZdZdZdZdgZdgZdgZdZ	e
dd	�
��Ze
dd	�
��Ze
dd	�
��Z
e
d
d	�
��Ze
dd	�
��Ze
dd	�
��Ze
dd	�
��Ze
dd	�
��Ze
dd	�
��Ze
dd	�
��Ze
dd	�
��Zdejfed��ggdef�deeeej��f�deeeejeej��f�deeeejeej��f�deeeej��f�deeeejeej��f�deeje��df�deee��f�d eeje��d!f�d"eejeej��f�d#eejeejeej��f�d$eejeeje��d%f�d&eejeejeejee eej�	�	f�d'eejeejeej��f�d(eejeej��f�d)eeeejee eej��d*f�d+eeeej��d*f�d,eeeej��f�d-eeeejee eej��f�deeeejeej��f�d.eeeejeej��f�d/eeeej��f�d0eeeej��f�d1ed2f�d3eeeej��f�d4eee��d%f�d5eee��f�d6eee��f�d7eeeej��f�d8eejee!eejee ee!e e��f�d9eejee!eejeejee ee!e e�
�
f�d:eeje��f�d;e"f�d<e"f�d=ee"ee"��f�d>ee"j#ee"j#e��f�d?ef�d@ef�dAef�dBej$f�dCej$f�dDej$f�dEe%f�dFe%f�dGe%f�dHe%f�dIe%j&f�dJe%j'f�dKe%f�dLe%f�dMef�eeej(e��f�eeej(e��f�e
eej(e��f�eeej(e��f�eeej(e��f�eeej(e��f�eeej(e��f�eeej(e��f�eeej(e��f�eeej(e��f�eeej(e��f�dNe!f�defdOeeje��dfdPeeje��dQfdReeje��fdNej)fgdefdSeee��dQfdTee!eej)ee!ee!e��fdNej)fgdefdSeee��dQfdNejfgdefdSeee��dQfdNejfgdefdSeee��dQfdNejfgdU�Z*dVS)Wrz(
    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-diffzassoc-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-sizezassoc-stackz
assoc-subset?zassoc-unionzassoc-union!zassoc=z	assoc>mapzassoc?�atzat+zat*�cachez	change-atzclear-assocz	delete-atz
delete-at*�enumzenum?zextract-keyszinc-atzkey?�keysz	map>assoczmaybe-set-atz	new-assoc�ofzpush-atz	rename-atzset-atz	sift-keyszsift-values�
substitute�unzipzvalue-atz	value-at*zvalue?�values�zip)�2cleavez2cleave>quot�3cleavez3cleave>quot�4cleavez4cleave>quotz
alist>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>doublez
bits>float�bitxor�complexzcomplex?�denominatorzdouble>bitszeach-integerzeven?zfind-integerzfind-last-integer�fixnumzfixnum?�floatz
float>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?z
next-floatznext-power-of-2�numberznumber=znumber?�	numeratorzodd?zout-of-fixnum-rangezout-of-fixnum-range?zpower-of-2?z
prev-float�ratiozratio?�rationalz	rational?�realz	real-partzreal?�recip�rem�sgn�shift�sq�timeszu<zu<=zu>zu>=zunless-zeroz
unordered?z	when-zerozzero?)��	1sequencez2all?�2each�2mapz2map-asz2map-reduce�2reduce�	2selector�	2sequence�3appendz
3append-as�3each�3mapz3map-as�	3sequence�	4sequencez<repetition>z
<reversed>z<slice>z?firstz?lastz?nthz?secondz?set-nth�
accumulatezaccumulate!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-nthzcheck-slicezcheck-slice-errorz
clone-likezcollapse-slice�	collectorz
collector-for�concatz	concat-as�copy�count�cutz	cut-slicezcut*z
delete-allzdelete-slicezdrop-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-slicezhead-slice*zhead*zhead?zif-empty�	immutablezimmutable-sequencezimmutable-sequence?z
immutable?�indexz
index-from�indices�infimumz
infimum-byz
insert-nth�
interleave�iotaz
iota-tupleziota-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-sequenceznon-negative-integer-expectedznon-negative-integer-expected?�nth�nthszpad-headzpad-tail�padding�	partition�popzpop*�prefix�prependz
prepend-as�producez
produce-as�product�pushzpush-allzpush-eitherzpush-if�reducezreduce-index�removezremove!z	remove-eqz
remove-eq!z
remove-nthzremove-nth!�
repetitionzrepetition?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�slicezslice-errorzslice-error?zslice?�snipz
snip-slice�startzstart*�subseqzsubseq?rYzsuffix!�sumzsum-lengths�supremumzsupremum-by�surround�tailz
tail-sliceztail-slice*ztail*ztail?�third�trimz	trim-headztrim-head-slicez
trim-slicez	trim-tailztrim-tail-slice�unclipzunclip-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�togglezwith-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-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-intoz
read-until�read1�readlnz
seek-absolutezseek-absolute?zseek-endz	seek-end?z
seek-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-write1z
tell-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�	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-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]+\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+))�rootrrrrrrN)+�__name__�
__module__�__qualname__�__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�Preprocrr
rr	r
�Function�Class�	Namespacerrr�Char�Constantr�Bin�Oct�Builtin�Variable�tokens���I/opt/alt/python311/lib/python3.11/site-packages/pygments/lexers/factor.pyrrs_���������D�
!�C��j�G���I� �!�I��M��U�&�/7�8�8�8�N� �U�E�NV�W�W�W�N� �%�!;�DL�
M�M�M���5��$"�%#�#�#�L�(��*�T'�U*(�*(�*(��X�� R�
������U�3�;C�E�E�E�N����8$,�9-�-�-�J�<�e��#�%�%�%�O��e�H�����O�"�E�
#;�DL�
M�
M�
M���w��'��G�F�O�O�
�
F
�
�Z� �F
�7�
�X�g�z�4�=�
9�
9�
;�	F
�-�
�X�g�z�4�:�z��� � �
!�
F
�)�
�X�g�z�4�=�*�����
�F
�%�
�X�g�z�4�=�
9�
9�
;�F
�5�
�X�g�z�4�=�*��� � �
!�F
�"�(�(�4�=�*�=�=�}�M�#F
�$���'�:�6�6�7�%F
�*�
�X�g�'��
4�
4�h�
@�+F
�.7�
�X�g�'��T�^�
D�
D�
F�/F
�26�
�X�g�'��T�^��T�^�-�-�
.�3F
�84�
�X�g�'��T�^����%�
'�9F
�>A�
�X�g�'��T�]�J����[�*��� � �
!�?F
�F6�
�X�g�'��T�]�J��� � �
!�GF
�L5�
�X�g�'��T�]�
C�
C�
E�MF
�T<�
�X�g�z�4�:�z�;��T�Z�)�)�*1�
3�UF
�Z3�
�X�g�z�4�:�
6�
6��
A�[F
�^8�
�X�g�z�4�:�
6�
6�
8�_F
�b9�
�X�g�z�4�:�z��j�$�*�6�6�
7�cF
�h)�
�X�g�z�4�=�*�d�j�
Q�
Q�
S�iF
�l0�
�X�g�z�4�:�z�4�:�
N�
N�
P�mF
�p"�8�8�G�Z���#O�#O�P�qF
�r'����*�d�j�(Q�(Q�R�sF
�t�W�i�0�uF
�z:�
�X�g�z�4�=�
9�
9�
;�{F
�~ ���'�:�!>�!>��H�F
�@����*� =� =�>�AF
�B�x�x���<�<�=�CF
�D$�X�X�g�z�4�:�%N�%N�O�EF
�F,��X�g�'���z�4�=�*��j�$��Z�I�I�
J�GF
�R,��X�g�'���z�4�=�*���
��j�$��Z�I�I�	
J�SF
�f(���'�2C�Z�)P�)P�Q�gF
�l%�f�-�mF
�n%�f�-�oF
�p1�����V�4�4�
6�qF
�t:�����j�&�+�z�J�J�
L�uF
�|��!�}F
�~�'�"�F
�@&�w�/�AF
�F��
�&�GF
�L�T�]�+�MF
�N ���/�OF
�TJ�6�R�UF
�V8��@�WF
�XM�f�U�YF
�ZR�SY�Z�[F
�\�6�:�&�]F
�^�F�J�'�_F
�`F�v�N�aF
�bH��P�cF
�hK�
�
�iF
�p�X�X�d�l�J�?�?�@�qF
�r�X�X�d�l�J�?�?�@�sF
�t!�(�(�4�<��"D�"D�E�uF
�v�8�8�D�L�*�=�=�>�wF
�x�����z� B� B�C�yF
�z ���$�,�
�!C�!C�D�{F
�|�X�X�d�l�J�?�?�@�}F
�~���$�,�
�;�;�<�F
�@�h�h�t�|�Z�@�@�A�AF
�B�h�h�t�|�Z�@�@�A�CF
�D#�H�H�T�\�:�$F�$F�G�EF
�J�T�N�KF
�P�Z� �
�8�8�D�M�:�>�>�
�N�
�8�8�D�M�:�>�>��G�
�8�8�D�M�:�>�>�?�
�T�]�#�
��Z� �
�(�(�7�J�7�7��@�
8�
�X�d�J��
�z��z�4��5�5�
6��T�]�#�

��Z� �
�(�(�7�J�7�7��@�
�T�^�$�
��Z� �
�(�(�7�J�7�7��@�
�T�Z� �
��Z� �
�(�(�7�J�7�7��@�
�T�]�#�
�Mk�k�F�F�Fr7N)r�pygments.lexerrrrr�pygments.tokenrrr	r
rrr
r�__all__rr6r7r8�<module>r<s�����@�?�?�?�?�?�?�?�?�?�?�?����������������������/��Y�Y�Y�Y�Y�*�Y�Y�Y�Y�Yr7