| Server IP : 127.0.0.1 / Your IP : 216.73.216.109 Web Server : Apache/2.4.54 (Win64) OpenSSL/1.1.1q PHP/8.1.10 System : Windows NT DESKTOP-E5T4RUN 10.0 build 19045 (Windows 10) AMD64 User : SERVERWEB ( 0) PHP Version : 8.1.10 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : C:/cygwin64/lib/python3.9/site-packages/pygments/lexers/__pycache__/ |
Upload File : |
a
SҼa�E � @ s^ d Z ddlZddlmZmZmZmZ ddlmZm Z m
Z
m Z m Z m
Z
dgZG dd� de�ZdS )z�
pygments.lexers.factor
~~~~~~~~~~~~~~~~~~~~~~
Lexers for the Factor language.
:copyright: Copyright 2006-2021 by the Pygments team, see AUTHORS.
:license: BSD, see LICENSE for details.
� N)�
RegexLexer�bygroups�default�words)�Text�Comment�Keyword�Name�String�Number� FactorLexerc A @ sd e Zd ZdZdZdgZdgZdgZej ej
B Z e ddd�Z
e d dd�Ze d
dd�Ze d dd�Ze d dd�Ze d
dd�Ze ddd�Ze ddd�Ze ddd�Ze ddd�Ze ddd�Zdejfed�gdefde e ee j �fde e ee j ee j �fde e ee j ee j �fde e ee j �fde e ee j ee j �fde j d fd e fd e e j!e�d fd e e j!ee j!�fd!e e j!ee j!ee j!�fd"e e j!ee j!e�d#fd$e e j!ee j ee j!ee j �fd%e e j!ee j ee j �fd&e e j!ee j �fd'e e ee j ee j �d(fd)e e ee j �d(fd*e e ee j �fd+e e ee j ee j �fde e ee j ee j �fd,e e ee j ee j �fd-e e ee j �fd.e e ee j �fd/e d0fd1e e ee j �fd2e d#fd3e fd4e fd5e e ee j �fd6e e j!ee j e�fd7e e j!ee j ee j e�fd8e j!fd9e"fd:e"fd;e"fd<e"j#fd=efd>efd?efd@e j$fdAe j$fdBe j$fdCe%fdDe%fdEe%fdFe%fdGe%j&fdHe%j'fdIe%fdJe%fdKe fe
e j(fee j(fee j(fee j(fee j(fee j(fee j(fee j(fee j(fee j(fee j(fdLefg?defdMe j d fdNe j dOfdPe j fdLe j)fgdefd e dOfdQe ee j)e�fdLe j)fgdefd e dOfdLe j!fgdefd e dOfdLe j fgdefd e dOfdLe j fgdR�Z*dSS )Tr z^
Lexer for the `Factor <http://factorcode.org>`_ language.
.. versionadded:: 1.4
ZFactorZfactorz*.factorz
text/x-factor)oz-rotZ2biz2bi@z2bi*Z2curryZ2dipZ2dropZ2dupZ2keepZ2nipZ2overZ2triz2tri@z2tri*Z3biZ3curryZ3dipZ3dropZ3dupZ3keepZ3triZ4dipZ4dropZ4dupZ4keepz <wrapper>�=z>booleanZclone�?z?executez?if�and�assertzassert=zassert?Zbizbi-curryz bi-curry@z bi-curry*zbi@zbi*ZboaZbooleanzboolean?zboth?Zbuild�callZ callstackzcallstack>arrayz
callstack?�clearz(clone)Zcomposezcompose?Zcurryzcurry?Z datastackZdieZdipZdoZdrop�dupZdupdzeither?zeq?zequal?ZexecuteZhashcodez hashcode*zidentity-hashcodezidentity-tuplezidentity-tuple?�ifzif*ZkeepZloopZmost�newZnip�notZnull�object�orZoverZpickZpreposeZ retainstackZrotzsame?ZswapZswapd�throwZtriz tri-curryz
tri-curry@z
tri-curry*ztri@ztri*�tupleztuple?Zunlesszunless*ZuntilZwhenzwhen*�while�with�wrapperzwrapper?�xorz\s)�suffix)@Z2cachez<enum>z>alistz?atz?ofZassocz
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?Zatzat+zat*�cachez change-atz clear-assocz delete-atz
delete-at*�enumzenum?z extract-keyszinc-atzkey?�keysz map>assocz maybe-set-atz new-assocZofzpush-atz rename-atzset-atz sift-keysz sift-valuesZ
substituteZunzipzvalue-atz value-at*zvalue?�values�zip) Z2cleavez 2cleave>quotZ3cleavez 3cleave>quotZ4cleavez 4cleave>quotz
alist>quotz call-effectZcasez case-findz case>quotZcleavez cleave>quotZcondz cond>quotzdeep-spread>quotzexecute-effectzlinear-case-quotzno-casezno-case?zno-condzno-cond?zrecursive-hashcodezshallow-spread>quotZspreadzto-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+�absZalignz
all-integers?Zbignumzbignum?zbit?ZbitandZbitnotZbitorz bits>doublez
bits>floatZbitxor�complexzcomplex?� denominatorz double>bitsz each-integerzeven?z find-integerzfind-last-integerZfixnumzfixnum?�floatz
float>bitszfloat?z fp-bitwise=z fp-infinity?zfp-nan-payloadzfp-nan?zfp-qnan?zfp-signzfp-snan?z fp-special?zif-zerozimaginary-partZintegerzinteger>fixnumzinteger>fixnum-strictzinteger?Zlog2zlog2-expects-positivezlog2-expects-positive?�mod�negzneg?z
next-floatznext-power-of-2Znumberznumber=znumber?� numeratorzodd?zout-of-fixnum-rangezout-of-fixnum-range?z power-of-2?z
prev-floatZratiozratio?Zrationalz rational?�realz real-partzreal?ZrecipZremZsgn�shift�sq�timeszu<zu<=zu>zu>=z unless-zeroz
unordered?z when-zerozzero?)�Z 1sequencez2all?Z2eachZ2mapz2map-asz 2map-reduceZ2reduceZ 2selectorZ 2sequenceZ3appendz
3append-asZ3eachZ3mapz3map-asZ 3sequenceZ 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-sliceZ collectorz
collector-for�concatz concat-as�copy�countZcutz cut-slicezcut*z
delete-allz delete-slicez drop-prefixZeachz each-fromz
each-indexzempty?Zexchange�filterzfilter!z filter-as�findz find-fromz
find-indexzfind-index-fromz find-lastzfind-last-from�firstZfirst2Zfirst3Zfirst4Zflip�followZfourthZglueZhalvesZharvest�headz
head-slicez head-slice*zhead*zhead?zif-emptyZ immutablezimmutable-sequencezimmutable-sequence?z
immutable?�indexz
index-from�indicesZinfimumz
infimum-byz
insert-nthZ
interleaveZiotaz
iota-tuplez iota-tuple?�joinzjoin-asZlastz
last-indexzlast-index-from�lengthZlengthenZlikeZlongerzlonger?Zlongest�mapzmap!zmap-aszmap-findz
map-find-lastz map-indexz map-integersz
map-reducezmap-sumz
max-lengthz
member-eq?zmember?z midpoint@z
min-lengthZmismatch�moveznew-likez
new-resizablez new-sequencez non-negative-integer-expectedz non-negative-integer-expected?ZnthZnthszpad-headzpad-tailZpadding� partition�popzpop*�prefixZprependz
prepend-asZproducez
produce-as�product�pushzpush-allz push-eitherzpush-if�reducez reduce-index�removezremove!z remove-eqz
remove-eq!z
remove-nthz remove-nth!Z
repetitionz repetition?z
replace-sliceZ replicatez replicate-as�restz
rest-slice�reversezreverse!�reversedz reversed?�second�selectorz selector-forZsequencezsequence-hashcodez sequence=z sequence?z set-firstz
set-fourthzset-lastz
set-lengthzset-nthz
set-secondz set-thirdZshortZshortenZshorterzshorter?ZshortestZsift�slicez slice-errorz slice-error?zslice?Zsnipz
snip-slice�startzstart*Zsubseqzsubseq?r zsuffix!�sumz sum-lengthsZsupremumz supremum-byZsurround�tailz
tail-slicez tail-slice*ztail*ztail?�thirdZtrimz trim-headztrim-head-slicez
trim-slicez trim-tailztrim-tail-sliceZunclipz unclip-lastzunclip-last-slicez unclip-slicez unless-emptyzvirtual-exemplarzvirtual-sequencezvirtual-sequence?zvirtual@z
when-empty)z+@Zchangez
change-globalZcounterZdec�getz
get-global�globalZinczinit-namespacesZ
initializez is-globalz
make-assoc� namespaceZ namestackZoffZon�setz
set-globalz
set-namestackZtogglez with-globalz
with-scopez
with-variablezwith-variables) Z1arrayZ2arrayZ3arrayZ4arrayz<array>z>arrayZarrayzarray?Zpairzpair?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?Zbl�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�read1Zreadlnz
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*�writeZwrite1)Z1stringz<string>z>stringz
resize-string�stringzstring?)Z1vectorz<vector>z>vectorz?pushZvectorzvector?)(z <condition>z<continuation>z <restart>z attempt-allzattempt-all-errorzattempt-all-error?zcallback-error-hookZcallcc0Zcallcc1Zcleanupzcompute-restartsZ conditionz
condition?Z continuationz
continuation?�continuezcontinue-restartz
continue-withzcurrent-continuation�errorzerror-continuationzerror-in-threadz error-threadZifccz
ignore-errorsz in-callback?zoriginal-errorZrecoverZrestartzrestart?ZrestartsZrethrowzrethrow-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;\sz
(USING:)(\s+)�vocabsz&(USE:|UNUSE:|IN:|QUALIFIED:)(\s+)(\S+)z%(QUALIFIED-WITH:)(\s+)(\S+)(\s+)(\S+)z#(FROM:|EXCLUDE:)(\s+)(\S+)(\s+=>\s)r z,(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:\sz SYNTAX:\szALIEN:\sz(STRUCT:)(\s+)(\S+)z.(FUNCTION:)(\s+\S+\s+)(\S+)(\s+\(\s+[^)]+\)\s)z>(FUNCTION-ALIAS:)(\s+)(\S+)(\s+\S+\s+)(\S+)(\s+\(\s+[^)]+\)\s)z(?:<PRIVATE|PRIVATE>)\sz"""\s(?:.|\n)*?\s"""z"(?:\\\\|\\"|[^"])*"z\S+"\s+(?:\\\\|\\"|[^"])*"z%CHAR:\s+(?:\\[\\abfnrstv]|[^\\]\S*)\sz!\s+.*$z#!\s+.*$z/\*\s+(?:.|\n)*?\s\*/\sz[tf]\sz [\\$]\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\)\sz#popz--\sz(\{\s+)(\S+)(\s[^}]+\s\}\s))�rootrg rh rj ri rk r N)+�__name__�
__module__� __qualname__�__doc__�name�aliases� filenamesZ mimetypes�re� MULTILINE�UNICODE�flagsr Zbuiltin_kernelZbuiltin_assocsZbuiltin_combinatorsZ builtin_mathZbuiltin_sequencesZbuiltin_namespacesZbuiltin_arraysZ
builtin_ioZbuiltin_stringsZbuiltin_vectorsZbuiltin_continuationsr ZPreprocr r r r r ZFunctionZClass� Namespacer
ZCharZConstantr ZBinZOctZBuiltinZVariable�tokens� rz rz �:/usr/lib/python3.9/site-packages/pygments/lexers/factor.pyr sb � ���*�,�� � ��
�� ��� ��
��������� ���� �����r
� ������ �)rp rt Zpygments.lexerr r r r Zpygments.tokenr r r r r
r �__all__r rz rz rz r{ �<module> s