....................................../////.===Shadow-Here===./////................................................ > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < ------------------------------------------------------------------------------------------------------------------- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////// RIFF¤ WEBPVP8 ˜ ðÑ *ôô>‘HŸK¥¤"§£±¨àð enü¹%½_F‘åè¿2ºQú³íªú`N¿­3ÿƒügµJžaÿ¯ÿ°~¼ÎùnúîÞÖô•òíôÁÉß®Sm¥Ü/ ‡ó˜f£Ùà<˜„xëJ¢Ù€SO3x<ªÔ©4¿+ç¶A`q@Ì“Úñè™ÍÿJÌ´ª-˜ÆtÊÛL]Ïq*‘Ý”ì#ŸÌÏãY]@ê`¿ /ªfkØB4·®£ó z—Üw¥Pxù–ÞLШKÇN¾AkÙTf½è'‰g gÆv›Øuh~ a˜Z— ïj*á¥t d£“uÒ ¨`K˜¹ßþ]b>˜]_ÏÔ6W—è2r4x•íÖ…"ƒÖNîä!¦å Ú}ýxGøÌ —@ ;ÆÚŠ=ɾ1ý8lªË¥ô ^yf®Œ¢u&2©nÙÇ›ñÂñŒ³ aPo['½»øFùà­+4ê“$!lövlüÞ=;N®3ð‚õ›DÉKòÞ>ÄÍ ¥ˆuߤ#ˆ$6ù™¥îŠ‡y’ÍB¼ çxÛ;X"WL£R÷͝*ó-¶Zu}º.s¸sšXqù–DþÿvªhüïwyŸ ¯é³lÀ:KCûÄ£Ëá\…­ ~—ýóî ¼ûûÜTÓüÇy…ŽÆvc»¾×U ñ¸žþоP÷¦ó:Ò¨¨5;Ð#&#ÖúñläÿÁœ GxÉ­/ñ‡áQðìYÉtÒwŽ¼GÔ´zàÒò ð*ëzƒ•4~H]Ø‹f ñÓÈñ`NåWçs'ÆÏW^ø¹!XžµmQ5ÃËoLœÎ: ÞËÍ¥J ù…î èo£ßPÎñ¶ž8.Œ]ʵ~5›ÙË-ù*8ÙÖß±~ ©¹rÓê‚j¶d¸{^Q'˜±Crß ÚH—#¥¥QlÀ×ëã‡DÜ«èî þ&Çæžî;ŽÏºò6ÒLÃXy&ZŒ'j‚¢Ù€IßÚù+–MGi‰*jE€‘JcÜ ÓÌ EÏÚj]o˜ Þr <¾U ûŪæÍ/šÝH¥˜b”¼ ÁñßX GP›ï2›4WŠÏà×£…íÓk†¦H·ÅíMh–*nó÷à]ÁjCº€b7<ب‹¨5車bp2:Á[UªM„QŒçiNMa#<5›áËó¸HýÊ"…×Éw¹¦ì2º–x<›»a±¸3Weü®FÝ⑱ö–î–³|LPÈ~çð~Çå‡|º kD¢µÏàÆAI %1À% ¹Ò – ”ϝS¦‰4&¶£°à Öý”û_Ò Áw°A«Å€?mÇÛgHÉ/8)á¾ÛìáöŽP í¨PŸNÙµº¦‡§Ùš"ÿ«>+ªÕ`Ê÷‡‚ß Õû˜þãÇ-PÍ.¾XV‘€ dÜ"þ4¹ ±Oú‘©t¥¦FªÄÃÄ•b‚znýu½—#cDs˜ÃiÑOˆñ×QO=*IAÊ,¶ŽZƒ;‡wøXè%EÐk:F±Ú” .Ѽ+Áu&Ç`."pÈÉw o&¿dE6‘’EqTuK@Ì¥ã™À(Êk(h‰,H}RÀIXÛš3µ1©_OqÚÒJAñ$ÊÙÜ;D3çŒ[þùœh¬Ã³™ö6ç†NY".Ú‰ï[ªŸŒ '²Ð öø_¨ÂÉ9u鶳ÒŠõTàîMØ#û¯gN‡bÙ놚X„ö …ÉeüÌ^J ‹€.œ$Æ)βÄeæW#óüßĺŸ€ ÀzwV 9oä»f4V*uB «Ë†¹ì¯žR霓æHXa=&“I4K;¯ç‹h×·"UŠ~<•â•ªVêª&ÍSÃÆÅ?ÔqÎ*mTM ˜›µwêd#[C¡©§‘D<©àb†–ÁœøvH/,í:¯( ²£|4-„Æövv„Yͼ™^Á$ˆ„¢Û[6yB.åH*V¨æ?$=˜Ñ€•î¦ñ·­(VlŸ‘ nÀt8W÷´Bûba?q9ú¶Xƒl«ÿ\ù¶’þòUÐj/õ¢Ìµ³g$ƒÎR!¸»|Oߍë’BhîÚÑ¢ñåŒJ„®„£2Ð3•ô02Nt…!£Í]Ïc½Qÿ?ˆ<&ÃA¾Ú,JˆijÌ#5yz„‰Î|ÊŽ5QÏ:‹ÐaóVÔxW—CpeÏzÐïíçôÿÅ_[hãsÐ_/ŽTÝ?BîˆííV$<¿i>²F¬_Eß¿ †bÊŒº­ÿ®Z H“C}”¬,Mp ý/Bá£w>˜YV°aƒúh+cŠ- r/[%|üUMHäQ°X»|û/@|°¥Ð !BÔ Ç¢Ä©š+Õì D«7ìN¶ŽðÔ " ƶ’ÖçtA‰Û×}{tþz­¾GÍ›k¹OEJR$ Â׃ «ëÁ"oÉôž$oUK(Ä)Ãz³Ê-‹êN[Ò3Œñbï8P 4ƒ×q¢bo|?<ÛX¬òÄÍ°L–±›(™ûG?ýË©ÚÄ–ÂDØÐ_Ç¡ô ¾–ÄÏø ×e8Ë©$ÄF¹Å‹ì[©óìl:F¾f´‹‹Xì²ï®\¬ôùƒ ÿat¥óèÒùHß0äe‚;ü×h:ÆWðHž=Ã8骣"kœ'Y?³}Tûè€>?0l›e1Lòñ„aæKÆw…hÖŠùW…ÈÆÄ0ši·›[pcwËþñiêíY/~-Á5˜!¿†A›™Mÿþ(±“t@â“ö2­´TG5yé]çå僳 .·ÍïçÝ7UÚ±Ð/Nè»,_Ï ùdj7\ï Wì4›„»c¸àešg#ÒÊ⥭áØo5‘?ÌdÝô¯ ¹kzsƒ=´#ëÉK›Ø´±-¥eW?‡çßtòTã…$Ý+qÿ±ƒ÷_3Ô¥í÷:æ–ž<·Ö‡‰Å¢ š‡%Ô—utÌÈìðžgÖÀz²À—ï÷Óîäõ{K'´È÷³yaÏÁjƒô}ž§®æÊydÕÈë5¯èˆõvÕ©ã*çD„ “z„Ó‡^^xÂ3M§A´JG‚öï 3W'ˆ.OvXè¡ÊÕª?5º7†˜(˜Ç¶#çê’¶!ÌdZK§æ 0fãaN]òY³RV ™î$®K2R¨`W!1Ôó\;Ý ýB%qæK•&ÓÈe9È0êI±žeŸß -ú@žQr¦ ö4»M¼Áè¹µmw 9 EÆE_°2ó„ŸXKWÁ×Hóì^´²GѝF©óäR†¦‰ç"V»eØ<3ùd3ÿÚ¤Žú“Gi" —‘_ÙËÎ~Üö¯¥½Î»üŸEÚŽåmÞþí ;ÞólËΦMzA"Âf(´òá;Éï(/7½ûñÌ­cïÕçлþÝz¾-ÍvÑ“pH­–ðÓj$¸Äû¤‚‘ãUBË-n“2åPkS5&‹Â|+g^œ®Ì͆d!OïäîU«c;{Û!ÅŽ«ëZ9Ókóˆ]¯ƒ›né `ÇÒ+tÆš (ØKá¾—=3œ®•vuMñg²\ï Ec€ 05±d™‡×iÇ×›UúvÌ¢£Èþ¡ÕØô¶ßÎA"ß±#Ö²ˆÊŸ¦*Ä~ij|àø.-¼'»Ú¥£h ofº¦‡VsR=N½„Î v˜Z*SÌ{=jÑB‹tê…;’HžH¯8–îDù8ñ¢|Q•bÛçš–‹m³“ê¨ åÏ^m¬Žãþ©ïêO‡½6] µÆ„Ooòü ²x}N¦Ë3ïé¿»€›HA˜m%çÞ/¿í7Fø“‹léUk)É°Œµ8Q8›:ÀŠeT*šõ~ôڝG6 ¢}`ùH­–”¡k ‰P1>š†®9z11!X wKfmÁ¦xÑ,N1Q”–æB¶M…ÒÃv6SMˆhU¬ÊPŽï‘öj=·CŒ¯u¹ƒVIЃsx4’ömÛýc塶7ßŠß 57^\wÒÐÆ k§h,Œý î«q^R½3]J¸ÇðN ‚çU¬ôº^Áì} ³f©Õœ§ˆã:FÄÈ‚é(€™?àýÓüè1Gô£¼éj‚OÅñ  #>×—ßtà 0G¥Åa뀐kßhc™À_ÉñÞ#±)GD" YîäË-ÿÙ̪ ¹™a¯´¢E\ÝÒö‚;™„ë]_ p8‰o¡ñ+^÷ 3‘'dT4œŽ ðVë½° :¬víÑ«£tßÚS-3¶“þ2 †üüʨòrš¹M{É_¤`Û¨0ìjœøJ‡:÷ÃáZ˜†@GP&œÑDGÏs¡þ¦þDGú‘1Yá9Ôþ¼ ûø…§÷8&–ÜÑnÄ_m®^üÆ`;ÉVÁJ£?â€-ßê}suÍ2sõA NÌúA磸‘îÿÚ»ƒìö·á¿±tÑÐ"Tÿü˜[@/äj¬€uüªìù¥Ý˜á8Ý´sõj 8@rˆð äþZÇD®ÿUÏ2ùôõrBzÆÏÞž>Ì™xœ“ wiÎ×7_… ¸ \#€MɁV¶¥üÕÿPÔ9Z‡ø§É8#H:ƒ5ÀÝå9ÍIŒ5åKÙŠ÷qÄ>1AÈøžj"µÂд/ªnÀ qªã}"iŸBå˜ÓÛŽ¦…&ݧ;G@—³b¯“•"´4í¨ôM¨åñC‹ïùÉó¯ÓsSH2Ý@ßáM‡ˆKÀªÛUeø/4\gnm¥‹ŸŒ qÄ b9ÞwÒNÏ_4Ég³ú=܆‚´ •â¥õeíþkjz>éÚyU«Íӝ݃6"8/ø{=Ô¢»G¥ äUw°W«,ô—¿ãㆅү¢³xŠUû™yŒ (øSópÐ 9\åTâ»—*oG$/×ÍT†Y¿1¤Þ¢_‡ ¼ „±ÍçèSaÓ 3ÛMÁBkxs‰’R/¡¤ˆÙçª(*õ„üXÌ´ƒ E§´¬EF"Ù”R/ÐNyÆÂ^°?™6¡œïJ·±$§?º>ÖüœcNÌù¯G ‹ñ2ŠBB„^·úìaz¨k:#¨Æ¨8LÎõލ£^§S&cŒÐU€ü(‡F±Š¼&P>8ÙÁ ‰ p5?0ÊƃZl¸aô š¼¡}gÿ¶zÆC²¹¬ÎÖG*HB¡O<º2#ñŒAƒ–¡B˜´É$¥›É:FÀÔx¾u?XÜÏÓvN©RS{2ʈãk9rmP¼Qq̳ è¼ÐFׄ^¡Öì fE“F4A…!ì/…¦Lƒ… … $%´¾yã@CI¬ á—3PþBÏNÿ<ý°4Ü ËÃ#ØÍ~âW«rEñw‹eùMMHß²`¬Öó½íf³:‹k˜¯÷}Z!ã¿<¥,\#öµÀ¯aÒNÆIé,Ћ–lŽ#Àæ9ÀÒS·I’½-Ïp Äz¤Š Â* ­íÄ9­< h>׍3ZkËU¹§˜ŒŠ±f­’¤º³Q ÏB?‹#µíÃ¥®@(Gs«†vI¥Mµ‹Á©e~2ú³ÁP4ìÕi‚²Ê^ö@-DþÓàlÜOÍ]n"µã:žpsŽ¢:! Aõ.ç~ÓBûH÷JCÌ]õVƒd «ú´QÙEA–¯¯Œ!.ˆˆëQ±ù œ·Ì!Õâ )ùL„ÅÀlÚè5@B…o´Æ¸XÓ&Û…O«˜”_#‡ƒ„ûÈt!¤ÁÏ›ÎÝŠ?c9 â\>lÓÁVÄÑ™£eØY]:fÝ–—ù+p{™ðè û³”g±OƒÚSù£áÁÊ„ä,ï7š²G ÕÌBk)~ÑiCµ|h#u¤¶îK¨² #²vݯGãeÖ϶ú…¾múÀ¶þÔñ‚Š9'^($¤§ò “š½{éúp÷J›ušS¹áªCÂubÃH9™D™/ZöØÁ‡¦ÝÙŸ·kð*_”.C‹{áXó€‡c¡c€§/šò/&éš÷,àéJþ‰X›fµ“C¨œ®r¬"kL‰Â_q…Z–.ÉL~O µ›zn‚¹À¦Öª7\àHµšÖ %»ÇníV[¥*Õ;ƒ#½¾HK-ÖIÊdÏEÚ#=o÷Óò³´Š: Ç?{¾+9›–‘OEáU·S€˜j"ÄaÜ ŒÛWt› á–c#a»pÔZÞdŽtWê=9éöÊ¢µ~ ë ;Öe‡Œ®:bî3±ýê¢wà¼îpêñ¹¾4 zc¾ðÖÿzdêŒÑÒŝÀ‰s6¤í³ÎÙB¿OZ”+F¤á‡3@Ñëäg©·Ž ˆèª<ù@É{&S„œÕúÀA)‰h:YÀ5^ÂÓŒ°õäU\ ùËÍû#²?Xe¬tu‰^zÒÔãë¼ÛWtEtû …‚g¶Úüâî*moGè¨7%u!]PhÏd™Ý%Îx: VÒ¦ôÊD3ÀŽKÛËãvÆî…N¯ä>Eró–ð`5 Œ%u5XkñÌ*NU%¶áœÊ:Qÿú»“úzyÏ6å-၇¾ ´ ÒÊ]y žO‘w2Äøæ…H’²f±ÎÇ.ª|¥'gîV•Ü .̘¯€šòü¤U~Ù†*¢!?ò wý,}´°ÔÞnïoKq5µb!áÓ3"vAßH¡³¡·G(ÐÎ0Îò¼MG!/ài®@—¬04*`…«é8ªøøló“ˆÊ”èù¤…ßÊoÿé'ËuÌÖ5×È¡§ˆˆfŽë9}hìâ_!!¯  B&Ëö¶‰ÀAÙNVŸ Wh›¸®XÑJì¨ú“¿÷3uj²˜¨ÍÎìë±aúŠÝå¯ð*Ó¨ôJ“yºØ)m°WýOè68†ŸÏ2—‰Ïüꪫٚ¥‹l1 ø ÏÄFjêµvÌbü¦èÝx:X±¢H=MÐß—,ˆÉÇ´(9ú¾^ÅÚ4¿m‡$âX‘å%(AlZo@½¨UOÌÕ”1ø¸jÎÀÃÃ_ µ‘Ü.œº¦Ut: Æï’!=¯uwû#,“pþÇúŒø(é@?³ü¥‘Mo §—s@Œ#)§ŒùkL}NOÆêA›¸~r½¼ÙA—HJ«eˆÖ´*¡ÓpÌŸö.m<-"³ûÈ$¬_6­åf£ïÚâj1y§ÕJ½@dÞÁr&Í\Z%D£Íñ·AZ Û³øüd/ªAi†/Й~  ‡âĮҮÏh§°b—›Û«mJžòG'[ÈYýŒ¦9psl ýÁ ®±f¦x,‰½tN ‚Xª9 ÙÖH.«Lo0×?͹m¡å†Ѽ+›2ƒF ±Ê8 7Hցϓ²Æ–m9…òŸï]Â1äN†VLâCˆU .ÿ‰Ts +ÅÎx(%¦u]6AF Š ØF鈄‘ |¢¶c±soŒ/t[a¾–û:s·`i햍ê›ËchÈ…8ßÀUÜewŒðNOƒõD%q#éû\9¤x¹&UE×G¥ Í—™$ð E6-‡¼!ýpãÔM˜ Âsìe¯ñµK¢Ç¡ùôléœ4Ö£”À Š®Ðc ^¨À}ÙËŸ§›ºê{ÊuÉC ×Sr€¤’fÉ*j!úÓ’Gsùìoîßîn%ò· àc Wp÷$¨˜)û»H ×8ŽÒ€Zj¤3ÀÙºY'Ql¦py{-6íÔCeiØp‘‡XÊîÆUߢ܂ž£Xé¼Y8þ©ëgñß}é.ÎógÒ„ÃØËø¯»™§Xýy M%@NŠ À(~áÐvu7&•,Ù˜ó€uP‡^^®=_E„jt’ 403WebShell
403Webshell
Server IP : 66.235.200.170  /  Your IP : 3.135.64.200
Web Server : Apache
System : Linux gator4410.hostgator.com 5.14.0-162.23.1.9991722448259.nf.el9.x86_64 #1 SMP PREEMPT_DYNAMIC Wed Jul 31 18:11:45 UTC 2024 x86_64
User : bmgxafte ( 1214)
PHP Version : 8.2.28
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : ON  |  Pkexec : ON
Directory :  /usr/share/emacs/27.2/lisp/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :

[ Back ]     

Current File : /usr/share/emacs/27.2/lisp/ansi-color.elc
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\313\314DD\315\316\317\320\321\322\323\306\301&\210\310\324\312\313\325DD\326\316\327\320\321\322\323\304\330\306\301&
\207" [custom-declare-group ansi-colors nil "Translating SGR control sequences to faces.\nThis translation effectively colorizes strings and regions based upon\nSGR control sequences embedded in the text.  SGR (Select Graphic\nRendition) control sequences are defined in section 8.3.117 of the\nECMA-48 standard (identical to ISO/IEC 6429), which is freely available\nat <URL:http://www.ecma-international.org/publications/standards/Ecma-048.htm>\nas a PDF file." :version "21.1" :group processes custom-declare-variable ansi-color-faces-vector funcall function #[0 "\300\207" [[default bold default italic underline success warning error]] 1] "Faces used for SGR control sequences determining a face.\nThis vector holds the faces used for SGR control sequence parameters 0\nto 7.\n\nParameter  Description        Face used by default\n  0        default            default\n  1        bold               bold\n  2        faint              default\n  3        italic             italic\n  4        underlined         underline\n  5        slowly blinking    success\n  6        rapidly blinking   warning\n  7        negative image     error\n\nNote that the symbol `default' is special: It will not be combined\nwith the current face.\n\nThis vector is used by `ansi-color-make-color-map' to create a color\nmap.  This color map is stored in the variable `ansi-color-map'." :type (vector face face face face face face face face) :set ansi-color-map-update :initialize custom-initialize-default ansi-color-names-vector #[0 "\300\207" [["black" "red3" "green3" "yellow3" "blue2" "magenta3" "cyan3" "gray90"]] 1] "Colors used for SGR control sequences determining a color.\nThis vector holds the colors used for SGR control sequences parameters\n30 to 37 (foreground colors) and 40 to 47 (background colors).\n\nParameter  Color\n  30  40   black\n  31  41   red\n  32  42   green\n  33  43   yellow\n  34  44   blue\n  35  45   magenta\n  36  46   cyan\n  37  47   white\n\nThis vector is used by `ansi-color-make-color-map' to create a color\nmap.  This color map is stored in the variable `ansi-color-map'.\n\nEach element may also be a cons cell where the car and cdr specify the\nforeground and background colors, respectively." (vector (choice color (cons color color)) (choice color (cons color color)) (choice color (cons color color)) (choice color (cons color color)) (choice color (cons color color)) (choice color (cons color color)) (choice color (cons color color)) (choice color (cons color color))) "24.4"] 14)
#@43 Regexp matching an ANSI control sequence.
(defconst ansi-color-control-seq-regexp "\\[[0-?]*[ -/]*[@-~]" (#$ . 3116))
#@54 Regexp that matches SGR control sequence parameters.
(defconst ansi-color-parameter-regexp "\\([0-9]*\\)[m;]" (#$ . 3241))
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313&	\207" [custom-declare-variable ansi-color-for-comint-mode funcall function #[0 "\300\207" [t] 1] "Determines what to do with comint output.\nIf nil, do nothing.\nIf the symbol `filter', then filter all SGR control sequences.\nIf anything else (such as t), then translate SGR control sequences\ninto text properties.\n\nIn order for this to have any effect, `ansi-color-process-output' must\nbe in `comint-output-filter-functions'.\n\nThis can be used to enable colorized ls --color=yes output\nin shell buffers.  You set this variable by calling one of:\n\\[ansi-color-for-comint-mode-on]\n\\[ansi-color-for-comint-mode-off]\n\\[ansi-color-for-comint-mode-filter]" :type (choice (const :tag "Do nothing" nil) (const :tag "Filter" filter) (const :tag "Translate" t)) :group ansi-colors :version "23.2"] 10)
#@191 Function for applying an Ansi Color face to text in a buffer.
This function should accept three arguments: BEG, END, and FACE,
and it should apply face FACE to the text between BEG and END.
(defvar ansi-color-apply-face-function 'ansi-color-apply-overlay-face (#$ . 4241))
#@40 Set `ansi-color-for-comint-mode' to t.
(defalias 'ansi-color-for-comint-mode-on #[0 "\301\211\207" [ansi-color-for-comint-mode t] 2 (#$ . 4520) nil])
#@42 Set `ansi-color-for-comint-mode' to nil.
(defalias 'ansi-color-for-comint-mode-off #[0 "\301\211\207" [ansi-color-for-comint-mode nil] 2 (#$ . 4677) nil])
#@54 Set `ansi-color-for-comint-mode' to symbol `filter'.
(defalias 'ansi-color-for-comint-mode-filter #[0 "\301\211\207" [ansi-color-for-comint-mode filter] 2 (#$ . 4839) nil])
#@527 Maybe translate SGR control sequences of comint output into text properties.

Depending on variable `ansi-color-for-comint-mode' the comint output is
either not processed, SGR control sequences are filtered using
`ansi-color-filter-region', or SGR control sequences are translated into
text properties using `ansi-color-apply-on-region'.

The comint output is assumed to lie between the marker
`comint-last-output-start' and the process-mark.

This is a good function to put in `comint-output-filter-functions'.

(fn IGNORED)
(defalias 'ansi-color-process-output #[257 "\302!\203\303!p=\203\304!\203\202\305 \306\307p!!	\310=\2066	\311=\2032\312\"\2026\313\"\207" [comint-last-output-start ansi-color-for-comint-mode markerp marker-buffer marker-position point-min-marker process-mark get-buffer-process nil filter ansi-color-filter-region ansi-color-apply-on-region] 6 (#$ . 5020)])
(byte-code "\300\301\302\303#\210\304\301\302\305#\207" [defalias ansi-color-unfontify-region font-lock-default-unfontify-region nil make-obsolete "24.1"] 4)
#@320 Context saved between two calls to `ansi-color-apply'.
This is a list of the form (CODES FRAGMENT) or nil.  CODES
represents the state the last call to `ansi-color-apply' ended
with, currently a list of ansi codes, and FRAGMENT is a string
starting with an escape sequence, possibly the start of a new
escape sequence.
(defvar ansi-color-context nil (#$ . 6088))
(make-variable-buffer-local 'ansi-color-context)
#@389 Filter out all ANSI control sequences from STRING.

Every call to this function will set and use the buffer-local variable
`ansi-color-context' to save partial escape sequences.  This information
will be used for the next call to `ansi-color-apply'.  Set
`ansi-color-context' to nil if you don't want this.

This function can be added to `comint-preoutput-filter-functions'.

(fn STRING)
(defalias 'ansi-color-filter-apply #[257 "\302\303\211A@\203A@P\262\303\304	#\211\262\203-\305#B\262\302\225\262\202\303\305\304\306		#\205G\302\224\305	\"\262\211\262#B\262\211\205S\303D\210\307\310\237\"\207" [ansi-color-context ansi-color-control-seq-regexp 0 nil string-match substring "" apply concat] 12 (#$ . 6507)])
#@53 Return the face corresponding to CODES.

(fn CODES)
(defalias 'ansi-color--find-face #[257 "\300\203\301\211A\262\242!\211\302=\204\211B\262\210\202\211A\203&\211\237\202(\211@\207" [nil ansi-color-get-face-1 default] 5 (#$ . 7260)])
#@743 Translates SGR control sequences into text properties.
Delete all other control sequences without processing them.

Applies SGR control sequences setting foreground and background colors
to STRING using text properties and returns the result.  The colors used
are given in `ansi-color-faces-vector' and `ansi-color-names-vector'.
See function `ansi-color-apply-sequence' for details.

Every call to this function will set and use the buffer-local variable
`ansi-color-context' to save partial escape sequences and current ansi codes.
This information will be used for the next call to `ansi-color-apply'.
Set `ansi-color-context' to nil if you don't want this.

This function can be added to `comint-preoutput-filter-functions'.

(fn STRING)
(defalias 'ansi-color-apply #[257 "@\302\303\211A@\203A@P\262\303\304	#\211\262\203Y\302\225\2032\305\306\307	!\n%\210\310#B\262\302\225\262SH\311=\203U\312\310#\"\262\210\202\203k\305G\306\307!	%\210\303\304\313#\203\216\302\224\310\"\262\310#B\262\210\202\227\310\"B\262\204\237\211\205\242D\210\314\315\237\"\207" [ansi-color-context ansi-color-control-seq-regexp 0 nil string-match put-text-property font-lock-face ansi-color--find-face substring 109 ansi-color-apply-sequence "" apply concat] 12 (#$ . 7514)])
#@324 Context saved between two calls to `ansi-color-apply-on-region'.
This is a list of the form (CODES MARKER) or nil.  CODES
represents the state the last call to `ansi-color-apply-on-region'
ended with, currently a list of ansi codes, and MARKER is a
buffer position within an escape sequence or the last position
processed.
(defvar ansi-color-context-region nil (#$ . 8854))
(make-variable-buffer-local 'ansi-color-context-region)
#@409 Filter out all ANSI control sequences from region BEGIN to END.

Every call to this function will set and use the buffer-local variable
`ansi-color-context-region' to save position.  This information will be
used for the next call to `ansi-color-apply-on-region'.  Specifically,
it will override BEGIN, the start of the region.  Set
`ansi-color-context-region' to nil if you don't want this.

(fn BEGIN END)
(defalias 'ansi-color-filter-region #[514 "\302!A@\206\n\212\211b\210\303	\304#\203\305\224\305\225|\210\202\303\306\304#\2030\307\305\224D\211\2023\307\211)\207" [ansi-color-context-region ansi-color-control-seq-regexp copy-marker re-search-forward t 0 "" nil] 8 (#$ . 9291)])
#@874 Translates SGR control sequences into overlays or extents.
Delete all other control sequences without processing them.

SGR control sequences are applied by calling the function
specified by `ansi-color-apply-face-function'.  The default
function sets foreground and background colors to the text
between BEGIN and END, using overlays.  The colors used are given
in `ansi-color-faces-vector' and `ansi-color-names-vector'.  See
`ansi-color-apply-sequence' for details.

Every call to this function will set and use the buffer-local
variable `ansi-color-context-region' to save position and current
ansi codes.  This information will be used for the next call to
`ansi-color-apply-on-region'.  Specifically, it will override
BEGIN, the start of the region and set the face with which to
start.  Set `ansi-color-context-region' to nil if you don't want
this.

(fn BEGIN END)
(defalias 'ansi-color-apply-on-region #[514 "@A@\206\303!\303!\212b\210\304	\305#\203D\306\307\224`\"\n\310!`\311\223\210\307\224\312!#\210\211GSH\313=\203@\314\"\262\210\202\304\315\305#\203_\n`\312!#\210\303\307\224!D\202o\n\312!#\210\205nC)A@=\204}\311\211\223\210\211\311\211\223\207" [ansi-color-context-region ansi-color-control-seq-regexp ansi-color-apply-face-function copy-marker re-search-forward t delete-and-extract-region 0 marker-position nil ansi-color--find-face 109 ansi-color-apply-sequence ""] 11 (#$ . 9999)])
#@102 Make an overlay from BEG to END, and apply face FACE.
If FACE is nil, do nothing.

(fn BEG END FACE)
(defalias 'ansi-color-apply-overlay-face #[771 "\211\205\f\300\301\"\302#\207" [overlay-put ansi-color-make-extent face] 7 (#$ . 11450)])
#@110 Set the `font-lock-face' property to FACE in region BEG..END.
If FACE is nil, do nothing.

(fn BEG END FACE)
(defalias 'ansi-color-apply-text-property-face #[771 "\211\205\n\300\301$\207" [put-text-property font-lock-face] 8 (#$ . 11700)])
#@192 Return a face with PROPERTY set to COLOR.
PROPERTY can be either symbol `foreground' or symbol `background'.

For Emacs, we just return the cons cell (PROPERTY . COLOR).

(fn PROPERTY COLOR)
(defalias 'ansi-color-make-face #[514 "\300\267\202\301B\207\302B\207B\207" [#s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (foreground 6 background 10)) foreground-color background-color] 4 (#$ . 11951)])
#@123 Make an extent for the range [FROM, TO) in BUFFER.

BUFFER defaults to the current buffer.

(fn FROM TO &optional BUFFER)
(defalias 'ansi-color-make-extent #[770 "\300#\301\302\303#\210\301\304\305#\210\301\306\307#\210\211\207" [make-overlay overlay-put evaporate t modification-hooks (ansi-color-freeze-overlay) insert-behind-hooks (ansi-color-freeze-overlay)] 8 (#$ . 12400)])
#@158 Prevent OVERLAY from being extended.
This function can be used for the `modification-hooks' overlay
property.

(fn OVERLAY IS-AFTER BEGIN END &optional LEN)
(defalias 'ansi-color-freeze-overlay #[1284 "\205\211\300U\205\301!U\205\302\303!#\207" [0 overlay-end move-overlay overlay-start] 9 (#$ . 12793)])
#@62 Set the `face' property of EXTENT to FACE.

(fn EXTENT FACE)
(defalias 'ansi-color-set-extent-face #[514 "\300\301#\207" [overlay-put face] 6 (#$ . 13118)])
(make-obsolete 'ansi-color-set-extent-face 'overlay-put "27.1")
#@283 Return the list of all the parameters in ESCAPE-SEQ.

ESCAPE-SEQ is a SGR control sequences such as \033[34m.  The parameter
34 is used by `ansi-color-get-face-1' to return a face definition.

Returns nil only if there's no match for `ansi-color-parameter-regexp'.

(fn ESCAPE-SEQ)
(defalias 'ansi-color-parse-sequence #[257 "\301\302\211\303#\203!\301\225\262\304\305\306\"\307\"\262\211B\262\202\237\207" [ansi-color-parameter-regexp 0 nil string-match string-to-number match-string 1 10] 8 (#$ . 13348)])
(put 'ansi-color-parse-sequence 'byte-optimizer 'byte-compile-inline-expand)
#@616 Apply ESCAPE-SEQUENCE to CODES and return the new list of codes.

ESCAPE-SEQUENCE is an escape sequence parsed by
`ansi-color-parse-sequence'.

For each new code, the following happens: if it is 1-7, add it to
the list of codes; if it is 21-25 or 27, delete appropriate
parameters from the list of codes; if it is 30-37 resp. 39, the
foreground color code is replaced or added resp. deleted; if it
is 40-47 resp. 49, the background color code is replaced or added
resp. deleted; any other code is discarded together with the old
codes.	Finally, the so changed list of codes is returned.

(fn ESCAPE-SEQUENCE CODES)
(defalias 'ansi-color-apply-sequence #[514 "\301\302\211\303#\203\"\301\225\262\304\305\306\"\307\"\262\211B\262\202\237\266\204\211\203\274\211A\262\242\211\307\245\211\310\267\202\264\311>?\205\265\312\"B\202\265\313>?\205\265\312\314Z\315\267\202k\312\306\"\202l\312\316\"\202l\"\202\265\317\307\"\211\320U?\205\257\302\203\227@\307\245U\204\227\211A\262\242B\262\202|\211\237A\244\262\321U\203\251\202\255B\262\262\202\265\302\262\266\202&\207" [ansi-color-parameter-regexp 0 nil string-match string-to-number match-string 1 10 #s(hash-table size 4 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (0 57 2 74 4 112 3 112)) (0 8 9) remq (20 26 28 29) 20 #s(hash-table size 2 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (22 91 25 99)) 6 mod 8 9] 10 (#$ . 13953)])
#@265 Creates a vector of face definitions and returns it.

The index into the vector is an ANSI code.  See the documentation of
`ansi-color-map' for an example.

The face definitions are based upon the variables
`ansi-color-faces-vector' and `ansi-color-names-vector'.
(defalias 'ansi-color-make-color-map #[0 "\302\303\304\"\305C\306\307\310\311\312\313\"\314\"\315\316%\"\210\211\317\240\210\306\307\310\320\312\313\"\321\"\322\316%	\"\210\211\323\240\210\306\307\310\324\312\313\"\325\"\322\316%	\"\210\207" [ansi-color-faces-vector ansi-color-names-vector make-vector 50 nil 0 mapc make-byte-code 257 "\300\301\242I\210\301\211\242T\240\207" vconcat vector [] 4 "\n\n(fn E)" 30 "\300\301\242\302\303:\203@\202\"I\210\301\211\242T\240\207" [ansi-color-make-face foreground] 6 40 "\300\301\242\302\303:\203A\202\"I\210\301\211\242T\240\207" [ansi-color-make-face background]] 10 (#$ . 15446)])
#@428 A brand new color map suitable for `ansi-color-get-face'.

The value of this variable is usually constructed by
`ansi-color-make-color-map'.  The values in the array are such that the
numbers included in an SGR control sequences point to the correct
foreground or background colors.

Example: The sequence \033[34m specifies a blue foreground.  Therefore:
     (aref ansi-color-map 34)
          => (foreground-color . "blue")
(defvar ansi-color-map (ansi-color-make-color-map) (#$ . 16373))
#@256 Update `ansi-color-map'.

Whenever the vectors used to construct `ansi-color-map' are changed,
this function is called.  Therefore this function is listed as the :set
property of `ansi-color-faces-vector' and `ansi-color-names-vector'.

(fn SYMBOL VALUE)
(defalias 'ansi-color-map-update #[514 "\301\"\210\302 \211\207" [ansi-color-map set-default ansi-color-make-color-map] 5 (#$ . 16872)])
#@107 Get face definition from `ansi-color-map'.
ANSI-CODE is used as an index into the vector.

(fn ANSI-CODE)
(defalias 'ansi-color-get-face-1 #[257 "\3011	H0\207\210\302\207" [ansi-color-map (args-out-of-range) nil] 3 (#$ . 17274)])
(provide 'ansi-color)

Youez - 2016 - github.com/yon3zu
LinuXploit