One Hat Cyber Team
Your IP :
13.59.147.113
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
Eksekusi
Dir :
~
/
usr
/
share
/
emacs
/
24.3
/
lisp
/
international
/
View File Name :
kinsoku.elc
;ELC ;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:09:11 2024 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/international/kinsoku.el ;;; in Emacs version 24.3.1 ;;; with all optimizations. ;;; This file contains utf-8 non-ASCII characters, ;;; and so cannot be loaded into Emacs 22 or earlier. (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (string-lessp emacs-version "23") (error "`%s' was compiled for Emacs 23 or later" #$)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@114 How many more columns we can make lines longer by `kinsoku' processing. The value 0 means there's no limitation. (defvar kinsoku-limit 4 (#$ . 565)) (byte-code "\306\211\306G\307\310\311 \n W\203& \312\313\nH\" \314\f!P\nT\211\202 -\315\316\317\320\260\211 G\307\311 \n W\203K \nH\nT\321\f\322\"\210\2026 ,\323\211\323G\307\310\311 \n W\203r \312\313\nH\" \314\f!P\nT\211\202Y -\324\325\326\327\260\211 G\307\311 \n W\203\231 \nH\nT\321\f\330\"\210\202\203 ,\311\207" [str1 len idx str2 ch kinsoku-bol "!)-_~}]:;',.?" 0 "" nil make-char latin-jisx0201 char-to-string "｡｣ｧｨｩｪｫｬｭｮｯｰﾞﾟ" "、。，．・：；？！゛゜´｀¨＾￣＿ヽヾゝゞ〃仝々〆〇ー—‐／＼〜‖｜…‥’”）〕］｝〉》」』】°′″℃ぁぃぅぇぉっゃゅょゎァィゥェォッャュョヮヵヶ" "、。．，・ˉˇ¨〃々―～‖…’”）〕〉》」』〗】；：？！±×÷∶°′″℃／＼＂＿￣｜ㄥ" "，、。．‧；：？！︰…‥﹐﹑﹒·﹔﹕﹖﹗｜–︱—︳╴︴﹏）︶｝︸〕︺】︼》︾〉﹀」﹂』﹄﹚﹜﹞’”〞′〃¯￣＿ˍ﹉﹊﹍﹎﹋﹌×÷±℃℉﹩°ㄥ" modify-category-entry 62 "({[`" "｢" "‘“（〔［｛〈《「『【°′″℃＠§‘“＂（〔〈《「『〖【°′″＠℃§" "ㄅㄆㄇㄈㄉㄊㄋㄌㄍㄎㄏㄐㄑㄒㄓㄔㄕㄖㄗㄘㄙㄨ（︵｛︷〔︹【︻《︽〈︿「﹁『﹃﹙﹛﹝" "‘“〝‵′〃§＠℃℉﹫°ㄅㄆㄇㄈㄉㄊㄋㄌㄍㄎㄏㄐㄑㄒㄓㄔㄕㄖㄗㄘㄙㄨ" 60 kinsoku-eol] 7) (defalias 'kinsoku-longer #[nil "\212\302u\210l\204$ \303g!\304H\204 h\305=\204$ \303h!\306H\204$ \302u\210\202 `i)B \307X\2049 A\310 \\W\205< @b)\207" [pos-and-column kinsoku-limit 1 char-category-set 62 32 124 0 current-fill-column] 3]) (defalias 'kinsoku-shorter #[(linebeg) "\212\302u\210`W\203. \303h!\304H\204( \303g!\305H\204( h\306=\204. \303h!\307H\204. \302u\210\202 `) W\2059 b)\207" [linebeg pos -1 char-category-set 60 62 32 124] 2]) #@589 Go to a line breaking position near point by doing `kinsoku' processing. LINEBEG is a buffer position we can't break a line before. `Kinsoku' processing is to prohibit specific characters to be placed at beginning of line or at end of line. Characters not to be placed at beginning and end of line have character category `>' and `<' respectively. This restriction is dissolved by making a line longer or shorter. `Kinsoku' is a Japanese word which originally means ordering to stay in one place, and is used for the text processing described above in the context of text formatting. (defalias 'kinsoku #[(linebeg) "\205 \302g!\303H\203 \304 \203 \302h!\305H\205 \306 !\207" [enable-kinsoku linebeg char-category-set 62 kinsoku-longer 60 kinsoku-shorter] 2 (#$ . 2612)])