[config.git] / djavu-asus / emacs / elpa / company-20230926.32 / company-ispell.elc

;ELC\1c\0\0\0
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.


(byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307\310\301%\210\311\312\306\313\314\315%\207" [require company cl-lib ispell custom-declare-group company-ispell nil "Completion backend using Ispell." :group custom-declare-variable company-ispell-dictionary "Dictionary to use for `company-ispell'.\nIf nil, use `ispell-complete-word-dict'." :type (choice (const :tag "default (nil)" nil) (file :tag "dictionary" t))] 6)
(defvar company-ispell-available 'unknown)
(byte-code "\300\301\302\303!\203\f\0\303\202\r\0\304\"\207" [defalias company-ispell--lookup-words fboundp ispell-lookup-words lookup-words] 4)
(defalias 'company-ispell-available #[nil "\b\302=\203#\0\3031\16\0\304\305!\210\306\211\100\210\202#\0\19\307\310\311	!\"\210\312\211\10)\210\b\207" [company-ispell-available err unknown (error) company-ispell--lookup-words "WHATEVER" t message "Company-Ispell: %s" error-message-string nil] 4])
#@49 `company-mode' completion backend using Ispell.\1f
(defalias 'company-ispell #[(command &optional arg &rest ignored) "\b\306\267\2023\0\307\310!\207\311 \2054\0\312 \207\313	\n\206\19\0\v\"\314\1c\1d	\315\230\203'\0\r\202+\0\316	\r\"*\207\317\207\314\207\320\207\321\207" [command arg company-ispell-dictionary ispell-complete-word-dict completion-ignore-case words #s(hash-table size 6 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (interactive 6 prefix 10 candidates 18 kind 45 sorted 47 ignore-case 49)) company-begin-backend company-ispell company-ispell-available company-grab-word company-ispell--lookup-words t "" all-completions text keep-prefix nil] 3 (#$ . 990) (list 'interactive)])
(provide 'company-ispell)
Commit	Line	Data
53e6db90 DC	1	;ELC\1c\0\0\0
	2	;;; Compiled
	3	;;; in Emacs version 28.2
	4	;;; with all optimizations.
	5
	6
	7
	8	(byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307\310\301%\210\311\312\306\313\314\315%\207" [require company cl-lib ispell custom-declare-group company-ispell nil "Completion backend using Ispell." :group custom-declare-variable company-ispell-dictionary "Dictionary to use for `company-ispell'.\nIf nil, use `ispell-complete-word-dict'." :type (choice (const :tag "default (nil)" nil) (file :tag "dictionary" t))] 6)
	9	(defvar company-ispell-available 'unknown)
	10	(byte-code "\300\301\302\303!\203\f\0\303\202\r\0\304\"\207" [defalias company-ispell--lookup-words fboundp ispell-lookup-words lookup-words] 4)
	11	(defalias 'company-ispell-available #[nil "\b\302=\203#\0\3031\16\0\304\305!\210\306\211\100\210\202#\0\19\307\310\311 !\"\210\312\211\10)\210\b\207" [company-ispell-available err unknown (error) company-ispell--lookup-words "WHATEVER" t message "Company-Ispell: %s" error-message-string nil] 4])
	12	#@49 `company-mode' completion backend using Ispell.\1f
	13	(defalias 'company-ispell #[(command &optional arg &rest ignored) "\b\306\267\2023\0\307\310!\207\311 \2054\0\312 \207\313 \n\206\19\0\v\"\314\1c\1d \315\230\203'\0\r\202+\0\316 \r\"*\207\317\207\314\207\320\207\321\207" [command arg company-ispell-dictionary ispell-complete-word-dict completion-ignore-case words #s(hash-table size 6 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (interactive 6 prefix 10 candidates 18 kind 45 sorted 47 ignore-case 49)) company-begin-backend company-ispell company-ispell-available company-grab-word company-ispell--lookup-words t "" all-completions text keep-prefix nil] 3 (#$ . 990) (list 'interactive)])
	14	(provide 'company-ispell)