| Server IP : 217.160.0.212 / Your IP : 216.73.216.71 Web Server : Apache System : Linux www 6.18.52-i1-ampere #1203 SMP Mon Sep 14 18:29:59 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/international/ |
Upload File : |
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.
(byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\210\312\313\314\315\316DD\317\320\321%\207" [require disp-table custom-declare-group iso-ascii nil "Set up char tables for ISO 8859/1 on ASCII terminals." :prefix "iso-ascii-" :group i18n custom-declare-variable iso-ascii-convenient funcall function #[0 "\300\207" [nil] 1 ""] "Non-nil means `iso-ascii' should aim for convenience, not precision." :type boolean] 8)
#@40 Display table used for ISO-ASCII mode.
(defvar iso-ascii-display-table (make-display-table) (#$ . 510))
#@48 Display table used when not in ISO-ASCII mode.
(defvar iso-ascii-standard-display-table nil (#$ . 620))
(byte-code "\204 \302\207" [iso-ascii-standard-display-table standard-display-table nil] 1)
#@48
(fn CODE STRING &optional CONVENIENT-STRING)
(defalias 'iso-ascii-display #[770 "\203 \211\206 \262\202 \302\303Q\262 I\210 \304\305\306Z\"I\207" [iso-ascii-convenient iso-ascii-display-table "{" "}" make-char latin-iso8859-1 128] 8 (#$ . 826)])
(byte-code "\300\301\302\303#\210\300\304\305\"\210\300\306\307\"\210\300\310\311\"\210\300\312\313\"\210\300\314\315\"\210\300\316\317\"\210\300\320\321\322#\210\300\323\324\"\210\300\325\326\327#\210\300\330\331\"\210\300\332\333\"\210\300\334\335\"\210\300\336\337\"\210\300\340\341\342#\210\300\343\344\"\210\300\345\346\"\210\300\347\350\"\210\300\351\352\"\210\300\353\354\"\210\300\355\356\"\210\300\357\360\"\210\300\361\362\363#\210\300\364\365\"\210\300\366\367\"\210\300\370\371\"\210\300\372\373\"\210\300\374\375\"\210\300\376\377\"\210\300\201@ \201A \"\210\300\201B \201C \"\210\300\201D \201E \"\210\300\201F \201G \"\210\300\201H \201I \"\210\300\201J \201K \"\210\300\201L \201M \"\210\300\201N \201O \"\210\300\201P \201Q \"\210\300\201R \201S \"\210\300\201T \201U \"\210\300\201V \201W \"\210\300\201X \201Y \"\210\300\201Z \201[ \"\210\300\201\\ \201] \"\210\300\201^ \201_ \"\210\300\201` \201a \"\210\300\201b \201c \"\210\300\201d \201e \"\210\300\201f \201g \"\210\300\201h \201i \"\210\300\201j \201k \"\210\300\201l \201m \"\210\300\201n \201o \"\210\300\201p \201q \"\210\300\201r \201s \"\210\300\201t \201u \"\210\300\201v \201w \"\210\300\201x \201y \"\210\300\201z \201{ \"\210\300\201| \201} \"\210\300\201~ \201 \"\210\300\201\200 \201\201 \"\210\300\201\202 \201\203 \"\210\300\201\204 \201\205 \"\210\300\201\206 \201\207 \"\210\300\201\210 \201\211 \"\210\300\201\212 \201\213 \"\210\300\201\214 \201\215 \"\210\300\201\216 \201\217 \"\210\300\201\220 \201\221 \"\210\300\201\222 \201\223 \"\210\300\201\224 \201\225 \"\210\300\201\226 \201\227 \"\210\300\201\230 \201\231 \"\210\300\201\232 \201\233 \"\210\300\201\234 \201\235 \"\210\300\201\236 \201\237 \"\210\300\201\240 \201\241 \"\210\300\201\242 \201\243 \"\210\300\201\244 \201\245 \"\210\300\201\246 \201\247 \"\210\300\201\250 \201\251 \"\210\300\201\252 \201\253 \"\210\300\201\254 \201\255 \"\210\300\201\256 \201\257 \"\210\300\201\260 \201\261 \"\210\300\201\262 \201\263 \"\210\300\201\264 \201\265 \"\210\300\201\266 \201\267 \"\210\300\201\270 \201\271 \"\210\300\201\272 \201\273 \"\210\300\201\274 \201\275 \"\210\300\201\276 \201\277 \"\210\300\201\300 \201\301 \"\210\300\201\302 \201\303 \"\210\300\201\304 \201\305 \"\207" [iso-ascii-display 160 "_" " " 161 "!" 162 "c" 163 "GBP" 164 "$" 165 "JPY" 166 "|" 167 "S" "(S)" 168 "\"" 169 "C" "(C)" 170 "_a" 171 "<<" 172 "~" 173 "-" 174 "R" "(R)" 175 "=" 176 "o" 177 "+-" 178 "2" 179 "3" 180 "'" 181 "u" 182 "P" "(P)" 183 "." 184 "," 185 "1" 186 "_o" 187 ">>" 188 "1/4" 189 "1/2" 190 "3/4" 191 "?" 192 "`A" 193 "'A" 194 "^A" 195 "~A" 196 "\"A" 197 "AA" 198 "AE" 199 ",C" 200 "`E" 201 "'E" 202 "^E" 203 "\"E" 204 "`I" 205 "'I" 206 "^I" 207 "\"I" 208 "-D" 209 "~N" 210 "`O" 211 "'O" 212 "^O" 213 "~O" 214 "\"O" 215 "x" 216 "/O" 217 "`U" 218 "'U" 219 "^U" 220 "\"U" 221 "'Y" 222 "TH" 223 "ss" 224 "`a" 225 "'a" 226 "^a" 227 "~a" 228 "\"a" 229 "aa" 230 "ae" 231 ",c" 232 "`e" 233 "'e" 234 "^e" 235 "\"e" 236 "`i" 237 "'i" 238 "^i" 239 "\"i" 240 "-d" 241 "~n" 242 "`o" 243 "'o" 244 "^o" 245 "~o" 246 "\"o" 247 "/" 248 "/o" 249 "`u" 250 "'u" 251 "^u" 252 "\"u" 253 "'y" 254 "th" 255 "\"y"] 4)
#@614 Toggle ISO-ASCII mode.
This is a minor mode. If called interactively, toggle the `Iso-Ascii
mode' mode. If the prefix argument is positive, enable the mode, and
if it is zero or negative, disable the mode.
If called from Lisp, toggle the mode if ARG is `toggle'. Enable the
mode if ARG is nil, omitted, or is a positive number. Disable the
mode if ARG is a negative number.
To check whether the minor mode is enabled in the current buffer,
evaluate `(eq standard-display-table iso-ascii-display-table)'.
The mode's hook is called both when the mode is enabled and when it is
disabled.
(fn &optional ARG)
(defalias 'iso-ascii-mode #[256 "\304 \305=\203 =?\202 \247\203 \306W\203 \307\202 \310\211\203' \2022 =\2031 \n\2022 \210\311\303!\203I \312\313 \" =\203I \313 B\314\315 =\203U \316\202V \317\"\210\320\321!\203z \304 \203j \211\304 \232\203z \322\323 =\203v \324\202w \325\326#\210\210\327 \210 =\207" [standard-display-table iso-ascii-display-table iso-ascii-standard-display-table local-minor-modes current-message toggle 1 nil t boundp delq iso-ascii-mode run-hooks iso-ascii-mode-hook iso-ascii-mode-on-hook iso-ascii-mode-off-hook called-interactively-p any message "Iso-Ascii mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 6 (#$ . 4237) (byte-code "\203\n \301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar iso-ascii-mode-hook nil)
(byte-code "\300\301N\204\f \302\300\301\303#\210\302\300\304\305#\210\302\300\306\307C#\210\310\311!\207" [iso-ascii-mode-hook variable-documentation put "Hook run after entering or leaving `iso-ascii-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" custom-type hook standard-value nil provide iso-ascii] 4)