One Hat Cyber Team

Your IP : 3.129.216.49

Server IP : 192.185.194.254

Server : Linux raider.websitewelcome.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64

Server Software : Apache

PHP Version : 7.4.33

Buat File | Buat Folder

Dir : ~/usr/share/emacs/24.3/lisp/

View File Name : vt100-led.elc

;ELC���
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:06:33 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/vt100-led.el
;;; in Emacs version 24.3.1
;;; 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.

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


#@86 The internal state of the LEDs.  Choices are nil, t, `flash'.
Element 0 is not used.
(defvar led-state (make-vector 5 nil) (#$ . 552))
#@14 Flash LED l.
(defalias 'led-flash #[(l) "	\302I\210\303 \207" [led-state l flash led-update] 3 (#$ . 693)])
#@68 Turn off vt100 led number L.  With no argument, turn them all off.
(defalias 'led-off #[(&optional l) "\203�	\302!\303I\210\202�\304	\303\"\210\305 \207" [l led-state prefix-numeric-value nil fillarray led-update] 3 (#$ . 808) "P"])
#@16 Turn on LED L.
(defalias 'led-on #[(l) "	\302I\210\303 \207" [led-state l t led-update] 3 (#$ . 1051)])
#@59 Update the terminal's LEDs to reflect the internal state.
(defalias 'led-update #[nil "\305\306\307\310U\2043�H\211\311=\203 �\n\312\313!Q\202+�\f\203+�	\312\313!Q)T\211\202�	\314\n\315R\316	!+\207" [l o f led-state s "[?0" "[0" 1 5 flash ";" int-to-string "q" "t" send-string-to-terminal] 5 (#$ . 1162)])
(provide 'vt100-led)