| Server IP : 217.160.0.212 / Your IP : 216.73.216.141 Web Server : Apache System : Linux www 6.18.51-i1-ampere #1196 SMP Fri Sep 11 20:43:55 CEST 2026 aarch64 User : sws1073854427 ( 1073854427) PHP Version : 8.4.23 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/share/emacs/28.2/lisp/net/ |
Upload File : |
;ELC ;;; Compiled ;;; in Emacs version 28.2 ;;; with all optimizations. #@66 Mapping from base64-encoded character to the byte it represents. (defconst tramp-uu-b64-alphabet "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/" (#$ . 84)) #@53 Alist of mapping from base64 character to its byte. (defconst tramp-uu-b64-char-to-byte (byte-code "\301C\302\303\304\"\"\207" [tramp-uu-b64-alphabet 0 mapcar make-closure #[257 "\211\300\242B\300\211\242T\240\210\207" [V0] 4 "\n\n(fn C)"]] 5) (#$ . 265)) #@48 Return the character encoding BYTE. (fn BYTE) (defalias 'tramp-uu-byte-to-uu-char #[257 "\211\300U\203 \301\207\211\302\\\207" [0 96 32] 3 (#$ . 529)]) #@53 Return the byte that is encoded as CHAR. (fn CHAR) (defalias 'tramp-uu-b64-char-to-byte #[257 "\211\236A\207" [tramp-uu-b64-char-to-byte] 3 (#$ . 689)]) #@57 UU-encode the region between BEG and END. (fn BEG END) (defalias 'tramp-uuencode-region #[514 "\300\301#\302\211\212b\210\303\262W\203O `f\262\304\305!\210\211\306=\203, \307c\210S\262\2027 \310\311!!c\210T\262\312\246\303U\203 \212\313 \210\314\315!c\210)\316c\210\202 \312\246\303U\204k \212\313 \210\314\317Z\320\246\\!c\210)\316c\210\321c\210b\210\322c)\207" [base64-encode-region t nil 0 delete-char 1 61 "`" tramp-uu-byte-to-uu-char tramp-uu-b64-char-to-byte 60 beginning-of-line char-to-string 77 "\n" 32 45 "`\nend\n" "begin 600 xxx\n"] 9 (#$ . 850)]) (byte-code "\300\301\302\"\210\303\304!\207" [add-hook tramp-unload-hook #[0 "\300\301\302\"\207" [unload-feature tramp-uu force] 3] provide tramp-uu] 3)