From 3f4a0d5370ae6c34afe180df96add3b8522f4af1 Mon Sep 17 00:00:00 2001 From: mattkae Date: Wed, 11 May 2022 09:23:58 -0400 Subject: initial commit --- elpa/company-20220326.48/company-abbrev.el | 52 + elpa/company-20220326.48/company-abbrev.elc | Bin 0 -> 1289 bytes elpa/company-20220326.48/company-autoloads.el | 384 ++ elpa/company-20220326.48/company-bbdb.el | 63 + elpa/company-20220326.48/company-bbdb.elc | Bin 0 -> 1798 bytes elpa/company-20220326.48/company-capf.el | 225 ++ elpa/company-20220326.48/company-capf.elc | Bin 0 -> 5358 bytes elpa/company-20220326.48/company-clang.el | 420 +++ elpa/company-20220326.48/company-clang.elc | Bin 0 -> 15697 bytes elpa/company-20220326.48/company-cmake.el | 207 ++ elpa/company-20220326.48/company-cmake.elc | Bin 0 -> 6111 bytes elpa/company-20220326.48/company-css.el | 446 +++ elpa/company-20220326.48/company-css.elc | Bin 0 -> 16988 bytes elpa/company-20220326.48/company-dabbrev-code.el | 105 + elpa/company-20220326.48/company-dabbrev-code.elc | Bin 0 -> 3734 bytes elpa/company-20220326.48/company-dabbrev.el | 207 ++ elpa/company-20220326.48/company-dabbrev.elc | Bin 0 -> 7099 bytes elpa/company-20220326.48/company-elisp.el | 226 ++ elpa/company-20220326.48/company-elisp.elc | Bin 0 -> 6669 bytes elpa/company-20220326.48/company-etags.el | 108 + elpa/company-20220326.48/company-etags.elc | Bin 0 -> 3148 bytes elpa/company-20220326.48/company-files.el | 161 + elpa/company-20220326.48/company-files.elc | Bin 0 -> 4914 bytes elpa/company-20220326.48/company-gtags.el | 161 + elpa/company-20220326.48/company-gtags.elc | Bin 0 -> 5275 bytes elpa/company-20220326.48/company-ispell.el | 83 + elpa/company-20220326.48/company-ispell.elc | Bin 0 -> 2033 bytes elpa/company-20220326.48/company-keywords.el | 354 ++ elpa/company-20220326.48/company-keywords.elc | Bin 0 -> 19999 bytes elpa/company-20220326.48/company-nxml.el | 143 + elpa/company-20220326.48/company-nxml.elc | Bin 0 -> 4470 bytes elpa/company-20220326.48/company-oddmuse.el | 57 + elpa/company-20220326.48/company-oddmuse.elc | Bin 0 -> 1569 bytes elpa/company-20220326.48/company-pkg.el | 12 + elpa/company-20220326.48/company-semantic.el | 168 + elpa/company-20220326.48/company-semantic.elc | Bin 0 -> 5208 bytes elpa/company-20220326.48/company-template.el | 272 ++ elpa/company-20220326.48/company-template.elc | Bin 0 -> 8444 bytes elpa/company-20220326.48/company-tempo.el | 71 + elpa/company-20220326.48/company-tempo.elc | Bin 0 -> 2255 bytes elpa/company-20220326.48/company-tng.el | 196 + elpa/company-20220326.48/company-tng.elc | Bin 0 -> 4986 bytes elpa/company-20220326.48/company-yasnippet.el | 184 + elpa/company-20220326.48/company-yasnippet.elc | Bin 0 -> 4333 bytes elpa/company-20220326.48/company.el | 3917 ++++++++++++++++++++ elpa/company-20220326.48/company.elc | Bin 0 -> 131133 bytes elpa/company-20220326.48/company.info | 1695 +++++++++ elpa/company-20220326.48/dir | 18 + elpa/company-20220326.48/icons/LICENSE | 395 ++ elpa/company-20220326.48/icons/attribution.md | 5 + .../icons/vscode-dark/folder.svg | 3 + .../icons/vscode-dark/references.svg | 3 + .../icons/vscode-dark/symbol-array.svg | 3 + .../icons/vscode-dark/symbol-boolean.svg | 3 + .../icons/vscode-dark/symbol-class.svg | 3 + .../icons/vscode-dark/symbol-color.svg | 3 + .../icons/vscode-dark/symbol-constant.svg | 4 + .../icons/vscode-dark/symbol-enumerator-member.svg | 3 + .../icons/vscode-dark/symbol-enumerator.svg | 3 + .../icons/vscode-dark/symbol-event.svg | 3 + .../icons/vscode-dark/symbol-field.svg | 3 + .../icons/vscode-dark/symbol-file.svg | 3 + .../icons/vscode-dark/symbol-interface.svg | 3 + .../icons/vscode-dark/symbol-key.svg | 3 + .../icons/vscode-dark/symbol-keyword.svg | 3 + .../icons/vscode-dark/symbol-method.svg | 3 + .../icons/vscode-dark/symbol-misc.svg | 3 + .../icons/vscode-dark/symbol-namespace.svg | 3 + .../icons/vscode-dark/symbol-numeric.svg | 3 + .../icons/vscode-dark/symbol-operator.svg | 3 + .../icons/vscode-dark/symbol-parameter.svg | 3 + .../icons/vscode-dark/symbol-property.svg | 3 + .../icons/vscode-dark/symbol-ruler.svg | 3 + .../icons/vscode-dark/symbol-snippet.svg | 3 + .../icons/vscode-dark/symbol-string.svg | 3 + .../icons/vscode-dark/symbol-structure.svg | 3 + .../icons/vscode-dark/symbol-variable.svg | 3 + .../icons/vscode-light/folder.svg | 3 + .../icons/vscode-light/references.svg | 10 + .../icons/vscode-light/symbol-array.svg | 3 + .../icons/vscode-light/symbol-boolean.svg | 3 + .../icons/vscode-light/symbol-class.svg | 3 + .../icons/vscode-light/symbol-color.svg | 3 + .../icons/vscode-light/symbol-constant.svg | 4 + .../vscode-light/symbol-enumerator-member.svg | 3 + .../icons/vscode-light/symbol-enumerator.svg | 3 + .../icons/vscode-light/symbol-event.svg | 3 + .../icons/vscode-light/symbol-field.svg | 3 + .../icons/vscode-light/symbol-file.svg | 3 + .../icons/vscode-light/symbol-interface.svg | 3 + .../icons/vscode-light/symbol-key.svg | 3 + .../icons/vscode-light/symbol-keyword.svg | 3 + .../icons/vscode-light/symbol-method.svg | 3 + .../icons/vscode-light/symbol-misc.svg | 3 + .../icons/vscode-light/symbol-namespace.svg | 10 + .../icons/vscode-light/symbol-numeric.svg | 3 + .../icons/vscode-light/symbol-operator.svg | 3 + .../icons/vscode-light/symbol-parameter.svg | 3 + .../icons/vscode-light/symbol-property.svg | 3 + .../icons/vscode-light/symbol-ruler.svg | 3 + .../icons/vscode-light/symbol-snippet.svg | 3 + .../icons/vscode-light/symbol-string.svg | 3 + .../icons/vscode-light/symbol-structure.svg | 3 + .../icons/vscode-light/symbol-variable.svg | 3 + .../company-20220326.48/images/small/echo-meta.png | Bin 0 -> 43396 bytes elpa/company-20220326.48/images/small/echo-qa.png | Bin 0 -> 18377 bytes .../images/small/echo-strip-qa.png | Bin 0 -> 21063 bytes .../images/small/echo-strip.png | Bin 0 -> 15339 bytes elpa/company-20220326.48/images/small/echo.png | Bin 0 -> 16360 bytes .../images/small/preview-dark.png | Bin 0 -> 5168 bytes .../images/small/preview-light.png | Bin 0 -> 5559 bytes .../images/small/tooltip-annotations.png | Bin 0 -> 29532 bytes .../images/small/tooltip-faces-light.png | Bin 0 -> 14633 bytes .../images/small/tooltip-filter.png | Bin 0 -> 29646 bytes .../images/small/tooltip-flip.png | Bin 0 -> 33501 bytes .../images/small/tooltip-icon-bg.png | Bin 0 -> 25540 bytes .../images/small/tooltip-icon-face.png | Bin 0 -> 28233 bytes .../images/small/tooltip-icons-dot.png | Bin 0 -> 45177 bytes .../images/small/tooltip-icons-text.png | Bin 0 -> 41525 bytes .../images/small/tooltip-icons-vscode.png | Bin 0 -> 47354 bytes .../images/small/tooltip-limit.png | Bin 0 -> 21246 bytes .../images/small/tooltip-margin.png | Bin 0 -> 29931 bytes .../images/small/tooltip-minimum-above.png | Bin 0 -> 42117 bytes .../images/small/tooltip-minimum-below.png | Bin 0 -> 22238 bytes .../images/small/tooltip-offset-display.png | Bin 0 -> 28312 bytes .../images/small/tooltip-qa-faces-light.png | Bin 0 -> 27127 bytes .../images/small/tooltip-quick-access.png | Bin 0 -> 19467 bytes .../images/small/tooltip-search.png | Bin 0 -> 45384 bytes 128 files changed, 10513 insertions(+) create mode 100644 elpa/company-20220326.48/company-abbrev.el create mode 100644 elpa/company-20220326.48/company-abbrev.elc create mode 100644 elpa/company-20220326.48/company-autoloads.el create mode 100644 elpa/company-20220326.48/company-bbdb.el create mode 100644 elpa/company-20220326.48/company-bbdb.elc create mode 100644 elpa/company-20220326.48/company-capf.el create mode 100644 elpa/company-20220326.48/company-capf.elc create mode 100644 elpa/company-20220326.48/company-clang.el create mode 100644 elpa/company-20220326.48/company-clang.elc create mode 100644 elpa/company-20220326.48/company-cmake.el create mode 100644 elpa/company-20220326.48/company-cmake.elc create mode 100644 elpa/company-20220326.48/company-css.el create mode 100644 elpa/company-20220326.48/company-css.elc create mode 100644 elpa/company-20220326.48/company-dabbrev-code.el create mode 100644 elpa/company-20220326.48/company-dabbrev-code.elc create mode 100644 elpa/company-20220326.48/company-dabbrev.el create mode 100644 elpa/company-20220326.48/company-dabbrev.elc create mode 100644 elpa/company-20220326.48/company-elisp.el create mode 100644 elpa/company-20220326.48/company-elisp.elc create mode 100644 elpa/company-20220326.48/company-etags.el create mode 100644 elpa/company-20220326.48/company-etags.elc create mode 100644 elpa/company-20220326.48/company-files.el create mode 100644 elpa/company-20220326.48/company-files.elc create mode 100644 elpa/company-20220326.48/company-gtags.el create mode 100644 elpa/company-20220326.48/company-gtags.elc create mode 100644 elpa/company-20220326.48/company-ispell.el create mode 100644 elpa/company-20220326.48/company-ispell.elc create mode 100644 elpa/company-20220326.48/company-keywords.el create mode 100644 elpa/company-20220326.48/company-keywords.elc create mode 100644 elpa/company-20220326.48/company-nxml.el create mode 100644 elpa/company-20220326.48/company-nxml.elc create mode 100644 elpa/company-20220326.48/company-oddmuse.el create mode 100644 elpa/company-20220326.48/company-oddmuse.elc create mode 100644 elpa/company-20220326.48/company-pkg.el create mode 100644 elpa/company-20220326.48/company-semantic.el create mode 100644 elpa/company-20220326.48/company-semantic.elc create mode 100644 elpa/company-20220326.48/company-template.el create mode 100644 elpa/company-20220326.48/company-template.elc create mode 100644 elpa/company-20220326.48/company-tempo.el create mode 100644 elpa/company-20220326.48/company-tempo.elc create mode 100644 elpa/company-20220326.48/company-tng.el create mode 100644 elpa/company-20220326.48/company-tng.elc create mode 100644 elpa/company-20220326.48/company-yasnippet.el create mode 100644 elpa/company-20220326.48/company-yasnippet.elc create mode 100644 elpa/company-20220326.48/company.el create mode 100644 elpa/company-20220326.48/company.elc create mode 100644 elpa/company-20220326.48/company.info create mode 100644 elpa/company-20220326.48/dir create mode 100644 elpa/company-20220326.48/icons/LICENSE create mode 100644 elpa/company-20220326.48/icons/attribution.md create mode 100644 elpa/company-20220326.48/icons/vscode-dark/folder.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/references.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-array.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-boolean.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-class.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-color.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-constant.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-enumerator-member.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-enumerator.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-event.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-field.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-file.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-interface.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-key.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-keyword.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-method.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-misc.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-namespace.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-numeric.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-operator.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-parameter.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-property.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-ruler.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-snippet.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-string.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-structure.svg create mode 100644 elpa/company-20220326.48/icons/vscode-dark/symbol-variable.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/folder.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/references.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-array.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-boolean.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-class.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-color.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-constant.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-enumerator-member.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-enumerator.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-event.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-field.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-file.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-interface.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-key.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-keyword.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-method.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-misc.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-namespace.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-numeric.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-operator.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-parameter.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-property.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-ruler.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-snippet.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-string.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-structure.svg create mode 100644 elpa/company-20220326.48/icons/vscode-light/symbol-variable.svg create mode 100755 elpa/company-20220326.48/images/small/echo-meta.png create mode 100755 elpa/company-20220326.48/images/small/echo-qa.png create mode 100755 elpa/company-20220326.48/images/small/echo-strip-qa.png create mode 100755 elpa/company-20220326.48/images/small/echo-strip.png create mode 100755 elpa/company-20220326.48/images/small/echo.png create mode 100755 elpa/company-20220326.48/images/small/preview-dark.png create mode 100755 elpa/company-20220326.48/images/small/preview-light.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-annotations.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-faces-light.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-filter.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-flip.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-icon-bg.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-icon-face.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-icons-dot.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-icons-text.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-icons-vscode.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-limit.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-margin.png create mode 100644 elpa/company-20220326.48/images/small/tooltip-minimum-above.png create mode 100644 elpa/company-20220326.48/images/small/tooltip-minimum-below.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-offset-display.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-qa-faces-light.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-quick-access.png create mode 100755 elpa/company-20220326.48/images/small/tooltip-search.png (limited to 'elpa/company-20220326.48') diff --git a/elpa/company-20220326.48/company-abbrev.el b/elpa/company-20220326.48/company-abbrev.el new file mode 100644 index 0000000..b8f81c4 --- /dev/null +++ b/elpa/company-20220326.48/company-abbrev.el @@ -0,0 +1,52 @@ +;;; company-abbrev.el --- company-mode completion backend for abbrev + +;; Copyright (C) 2009-2011, 2013-2015, 2021 Free Software Foundation, Inc. + +;; Author: Nikolaj Schumacher + +;; This file is part of GNU Emacs. + +;; GNU Emacs is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; GNU Emacs is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with GNU Emacs. If not, see . + + +;;; Commentary: +;; + +;;; Code: + +(require 'company) +(require 'cl-lib) +(require 'abbrev) + +(defun company-abbrev-insert (match) + "Replace MATCH with the expanded abbrev." + (expand-abbrev)) + +;;;###autoload +(defun company-abbrev (command &optional arg &rest ignored) + "`company-mode' completion backend for abbrev." + (interactive (list 'interactive)) + (cl-case command + (interactive (company-begin-backend 'company-abbrev + 'company-abbrev-insert)) + (prefix (company-grab-symbol)) + (candidates (nconc + (delete "" (all-completions arg global-abbrev-table)) + (delete "" (all-completions arg local-abbrev-table)))) + (kind 'snippet) + (meta (abbrev-expansion arg)) + (post-completion (expand-abbrev)))) + +(provide 'company-abbrev) +;;; company-abbrev.el ends here diff --git a/elpa/company-20220326.48/company-abbrev.elc b/elpa/company-20220326.48/company-abbrev.elc new file mode 100644 index 0000000..6b3db1a Binary files /dev/null and b/elpa/company-20220326.48/company-abbrev.elc differ diff --git a/elpa/company-20220326.48/company-autoloads.el b/elpa/company-20220326.48/company-autoloads.el new file mode 100644 index 0000000..541366e --- /dev/null +++ b/elpa/company-20220326.48/company-autoloads.el @@ -0,0 +1,384 @@ +;;; company-autoloads.el --- automatically extracted autoloads +;; +;;; Code: + +(add-to-list 'load-path (directory-file-name + (or (file-name-directory #$) (car load-path)))) + + +;;;### (autoloads nil "company" "company.el" (0 0 0 0)) +;;; Generated autoloads from company.el + +(autoload 'company-mode "company" "\ +\"complete anything\"; is an in-buffer completion framework. +Completion starts automatically, depending on the values +`company-idle-delay' and `company-minimum-prefix-length'. + +If called interactively, enable Company mode if ARG is positive, +and disable it if ARG is zero or negative. If called from Lisp, +also enable the mode if ARG is omitted or nil, and toggle it if +ARG is `toggle'; disable the mode otherwise. + +Completion can be controlled with the commands: +`company-complete-common', `company-complete-selection', `company-complete', +`company-select-next', `company-select-previous'. If these commands are +called before `company-idle-delay', completion will also start. + +Completions can be searched with `company-search-candidates' or +`company-filter-candidates'. These can be used while completion is +inactive, as well. + +The completion data is retrieved using `company-backends' and displayed +using `company-frontends'. If you want to start a specific backend, call +it interactively or use `company-begin-backend'. + +By default, the completions list is sorted alphabetically, unless the +backend chooses otherwise, or `company-transformers' changes it later. + +regular keymap (`company-mode-map'): + +\\{company-mode-map} +keymap during active completions (`company-active-map'): + +\\{company-active-map} + +\(fn &optional ARG)" t nil) + +(put 'global-company-mode 'globalized-minor-mode t) + +(defvar global-company-mode nil "\ +Non-nil if Global Company mode is enabled. +See the `global-company-mode' command +for a description of this minor mode. +Setting this variable directly does not take effect; +either customize it (see the info node `Easy Customization') +or call the function `global-company-mode'.") + +(custom-autoload 'global-company-mode "company" nil) + +(autoload 'global-company-mode "company" "\ +Toggle Company mode in all buffers. +With prefix ARG, enable Global Company mode if ARG is positive; +otherwise, disable it. If called from Lisp, enable the mode if +ARG is omitted or nil. + +Company mode is enabled in all buffers where +`company-mode-on' would do it. +See `company-mode' for more information on Company mode. + +\(fn &optional ARG)" t nil) + +(autoload 'company-manual-begin "company" nil t nil) + +(autoload 'company-complete "company" "\ +Insert the common part of all candidates or the current selection. +The first time this is called, the common part is inserted, the second +time, or when the selection has been changed, the selected candidate is +inserted." t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company" '("company-"))) + +;;;*** + +;;;### (autoloads nil "company-abbrev" "company-abbrev.el" (0 0 0 +;;;;;; 0)) +;;; Generated autoloads from company-abbrev.el + +(autoload 'company-abbrev "company-abbrev" "\ +`company-mode' completion backend for abbrev. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-abbrev" '("company-abbrev-insert"))) + +;;;*** + +;;;### (autoloads nil "company-bbdb" "company-bbdb.el" (0 0 0 0)) +;;; Generated autoloads from company-bbdb.el + +(autoload 'company-bbdb "company-bbdb" "\ +`company-mode' completion backend for BBDB. + +\(fn COMMAND &optional ARG &rest IGNORE)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-bbdb" '("company-bbdb-"))) + +;;;*** + +;;;### (autoloads nil "company-capf" "company-capf.el" (0 0 0 0)) +;;; Generated autoloads from company-capf.el + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-capf" '("company-"))) + +;;;*** + +;;;### (autoloads nil "company-clang" "company-clang.el" (0 0 0 0)) +;;; Generated autoloads from company-clang.el + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-clang" '("company-clang"))) + +;;;*** + +;;;### (autoloads nil "company-cmake" "company-cmake.el" (0 0 0 0)) +;;; Generated autoloads from company-cmake.el + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-cmake" '("company-cmake"))) + +;;;*** + +;;;### (autoloads nil "company-css" "company-css.el" (0 0 0 0)) +;;; Generated autoloads from company-css.el + +(autoload 'company-css "company-css" "\ +`company-mode' completion backend for `css-mode'. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-css" '("company-css-"))) + +;;;*** + +;;;### (autoloads nil "company-dabbrev" "company-dabbrev.el" (0 0 +;;;;;; 0 0)) +;;; Generated autoloads from company-dabbrev.el + +(autoload 'company-dabbrev "company-dabbrev" "\ +dabbrev-like `company-mode' completion backend. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-dabbrev" '("company-dabbrev-"))) + +;;;*** + +;;;### (autoloads nil "company-dabbrev-code" "company-dabbrev-code.el" +;;;;;; (0 0 0 0)) +;;; Generated autoloads from company-dabbrev-code.el + +(autoload 'company-dabbrev-code "company-dabbrev-code" "\ +dabbrev-like `company-mode' backend for code. +The backend looks for all symbols in the current buffer that aren't in +comments or strings. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-dabbrev-code" '("company-dabbrev-code-"))) + +;;;*** + +;;;### (autoloads nil "company-elisp" "company-elisp.el" (0 0 0 0)) +;;; Generated autoloads from company-elisp.el + +(autoload 'company-elisp "company-elisp" "\ +`company-mode' completion backend for Emacs Lisp. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-elisp" '("company-elisp-"))) + +;;;*** + +;;;### (autoloads nil "company-etags" "company-etags.el" (0 0 0 0)) +;;; Generated autoloads from company-etags.el + +(autoload 'company-etags "company-etags" "\ +`company-mode' completion backend for etags. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-etags" '("company-etags-"))) + +;;;*** + +;;;### (autoloads nil "company-files" "company-files.el" (0 0 0 0)) +;;; Generated autoloads from company-files.el + +(autoload 'company-files "company-files" "\ +`company-mode' completion backend existing file names. +Completions works for proper absolute and relative files paths. +File paths with spaces are only supported inside strings. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-files" '("company-file"))) + +;;;*** + +;;;### (autoloads nil "company-gtags" "company-gtags.el" (0 0 0 0)) +;;; Generated autoloads from company-gtags.el + +(autoload 'company-gtags "company-gtags" "\ +`company-mode' completion backend for GNU Global. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-gtags" '("company-gtags-"))) + +;;;*** + +;;;### (autoloads nil "company-ispell" "company-ispell.el" (0 0 0 +;;;;;; 0)) +;;; Generated autoloads from company-ispell.el + +(autoload 'company-ispell "company-ispell" "\ +`company-mode' completion backend using Ispell. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-ispell" '("company-ispell-"))) + +;;;*** + +;;;### (autoloads nil "company-keywords" "company-keywords.el" (0 +;;;;;; 0 0 0)) +;;; Generated autoloads from company-keywords.el + +(autoload 'company-keywords "company-keywords" "\ +`company-mode' backend for programming language keywords. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-keywords" '("company-keywords-"))) + +;;;*** + +;;;### (autoloads nil "company-nxml" "company-nxml.el" (0 0 0 0)) +;;; Generated autoloads from company-nxml.el + +(autoload 'company-nxml "company-nxml" "\ +`company-mode' completion backend for `nxml-mode'. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-nxml" '("company-nxml-"))) + +;;;*** + +;;;### (autoloads nil "company-oddmuse" "company-oddmuse.el" (0 0 +;;;;;; 0 0)) +;;; Generated autoloads from company-oddmuse.el + +(autoload 'company-oddmuse "company-oddmuse" "\ +`company-mode' completion backend for `oddmuse-mode'. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-oddmuse" '("company-oddmuse-"))) + +;;;*** + +;;;### (autoloads nil "company-semantic" "company-semantic.el" (0 +;;;;;; 0 0 0)) +;;; Generated autoloads from company-semantic.el + +(autoload 'company-semantic "company-semantic" "\ +`company-mode' completion backend using CEDET Semantic. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-semantic" '("company-semantic-"))) + +;;;*** + +;;;### (autoloads nil "company-template" "company-template.el" (0 +;;;;;; 0 0 0)) +;;; Generated autoloads from company-template.el + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-template" '("company-template-"))) + +;;;*** + +;;;### (autoloads nil "company-tempo" "company-tempo.el" (0 0 0 0)) +;;; Generated autoloads from company-tempo.el + +(autoload 'company-tempo "company-tempo" "\ +`company-mode' completion backend for tempo. + +\(fn COMMAND &optional ARG &rest IGNORED)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-tempo" '("company-tempo-"))) + +;;;*** + +;;;### (autoloads nil "company-tng" "company-tng.el" (0 0 0 0)) +;;; Generated autoloads from company-tng.el + +(autoload 'company-tng-frontend "company-tng" "\ +When the user changes the selection at least once, this +frontend will display the candidate in the buffer as if it's +already there and any key outside of `company-active-map' will +confirm the selection and finish the completion. + +\(fn COMMAND)" nil nil) + +(define-obsolete-function-alias 'company-tng-configure-default 'company-tng-mode "0.9.14" "\ +Applies the default configuration to enable company-tng.") + +(defvar company-tng-mode nil "\ +Non-nil if Company-Tng mode is enabled. +See the `company-tng-mode' command +for a description of this minor mode. +Setting this variable directly does not take effect; +either customize it (see the info node `Easy Customization') +or call the function `company-tng-mode'.") + +(custom-autoload 'company-tng-mode "company-tng" nil) + +(autoload 'company-tng-mode "company-tng" "\ +This minor mode enables `company-tng-frontend'. + +If called interactively, enable Company-Tng mode if ARG is +positive, and disable it if ARG is zero or negative. If called +from Lisp, also enable the mode if ARG is omitted or nil, and +toggle it if ARG is `toggle'; disable the mode otherwise. + +\(fn &optional ARG)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-tng" '("company-tng-"))) + +;;;*** + +;;;### (autoloads nil "company-yasnippet" "company-yasnippet.el" +;;;;;; (0 0 0 0)) +;;; Generated autoloads from company-yasnippet.el + +(autoload 'company-yasnippet "company-yasnippet" "\ +`company-mode' backend for `yasnippet'. + +This backend should be used with care, because as long as there are +snippets defined for the current major mode, this backend will always +shadow backends that come after it. Recommended usages: + +* In a buffer-local value of `company-backends', grouped with a backend or + several that provide actual text completions. + + (add-hook \\='js-mode-hook + (lambda () + (set (make-local-variable \\='company-backends) + \\='((company-dabbrev-code company-yasnippet))))) + +* After keyword `:with', grouped with other backends. + + (push \\='(company-semantic :with company-yasnippet) company-backends) + +* Not in `company-backends', just bound to a key. + + (global-set-key (kbd \"C-c y\") \\='company-yasnippet) + +\(fn COMMAND &optional ARG &rest IGNORE)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "company-yasnippet" '("company-yasnippet-"))) + +;;;*** + +;;;### (autoloads nil nil ("company-pkg.el") (0 0 0 0)) + +;;;*** + +;; Local Variables: +;; version-control: never +;; no-byte-compile: t +;; no-update-autoloads: t +;; coding: utf-8 +;; End: +;;; company-autoloads.el ends here diff --git a/elpa/company-20220326.48/company-bbdb.el b/elpa/company-20220326.48/company-bbdb.el new file mode 100644 index 0000000..1016e2a --- /dev/null +++ b/elpa/company-20220326.48/company-bbdb.el @@ -0,0 +1,63 @@ +;;; company-bbdb.el --- company-mode completion backend for BBDB in message-mode + +;; Copyright (C) 2013-2016, 2020 Free Software Foundation, Inc. + +;; Author: Jan Tatarik + +;; This file is part of GNU Emacs. + +;; GNU Emacs is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; GNU Emacs is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with GNU Emacs. If not, see . + +(require 'company) +(require 'cl-lib) + +(declare-function bbdb-record-get-field "bbdb") +(declare-function bbdb-records "bbdb") +(declare-function bbdb-dwim-mail "bbdb-com") +(declare-function bbdb-search "bbdb-com") + +(defgroup company-bbdb nil + "Completion backend for BBDB." + :group 'company) + +(defcustom company-bbdb-modes '(message-mode) + "Major modes in which `company-bbdb' may complete." + :type '(repeat (symbol :tag "Major mode")) + :package-version '(company . "0.8.8")) + +(defun company-bbdb--candidates (arg) + (cl-mapcan (lambda (record) + (mapcar (lambda (mail) (bbdb-dwim-mail record mail)) + (bbdb-record-get-field record 'mail))) + (eval '(bbdb-search (bbdb-records) arg nil arg)))) + +;;;###autoload +(defun company-bbdb (command &optional arg &rest ignore) + "`company-mode' completion backend for BBDB." + (interactive (list 'interactive)) + (cl-case command + (interactive (company-begin-backend 'company-bbdb)) + (prefix (and (memq major-mode company-bbdb-modes) + (featurep 'bbdb-com) + (let ((case-fold-search t)) + (looking-back + "^\\([^ :]*-\\)?\\(To\\|B?Cc\\|From\\):.*? *\\([^,;]*\\)" + (line-beginning-position))) + (match-string-no-properties 3))) + (candidates (company-bbdb--candidates arg)) + (sorted t) + (no-cache t))) + +(provide 'company-bbdb) +;;; company-bbdb.el ends here diff --git a/elpa/company-20220326.48/company-bbdb.elc b/elpa/company-20220326.48/company-bbdb.elc new file mode 100644 index 0000000..420f161 Binary files /dev/null and b/elpa/company-20220326.48/company-bbdb.elc differ diff --git a/elpa/company-20220326.48/company-capf.el b/elpa/company-20220326.48/company-capf.el new file mode 100644 index 0000000..52f677f --- /dev/null +++ b/elpa/company-20220326.48/company-capf.el @@ -0,0 +1,225 @@ +;;; company-capf.el --- company-mode completion-at-point-functions backend -*- lexical-binding: t -*- + +;; Copyright (C) 2013-2021 Free Software Foundation, Inc. + +;; Author: Stefan Monnier + +;; This file is part of GNU Emacs. + +;; GNU Emacs is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; GNU Emacs is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with GNU Emacs. If not, see . + + +;;; Commentary: +;; +;; The CAPF back-end provides a bridge to the standard +;; completion-at-point-functions facility, and thus can support any major mode +;; that defines a proper completion function, including emacs-lisp-mode, +;; css-mode and nxml-mode. + +;;; Code: + +(require 'company) +(require 'cl-lib) + +;; Amortizes several calls to a c-a-p-f from the same position. +(defvar company--capf-cache nil) + +;; FIXME: Provide a way to save this info once in Company itself +;; (https://github.com/company-mode/company-mode/pull/845). +(defvar-local company-capf--current-completion-data nil + "Value last returned by `company-capf' when called with `candidates'. +For most properties/actions, this is just what we need: the exact values +that accompanied the completion table that's currently is use. + +`company-capf', however, could be called at some different positions during +a completion session (most importantly, by `company-sort-by-occurrence'), +so we can't just use the preceding variable instead.") + +(defun company--capf-data () + (let ((cache company--capf-cache)) + (if (and (equal (current-buffer) (car cache)) + (equal (point) (car (setq cache (cdr cache)))) + (equal (buffer-chars-modified-tick) (car (setq cache (cdr cache))))) + (cadr cache) + (let ((data (company--capf-data-real))) + (setq company--capf-cache + (list (current-buffer) (point) (buffer-chars-modified-tick) data)) + data)))) + +(defun company--capf-data-real () + (cl-letf* (((default-value 'completion-at-point-functions) + ;; Ignore tags-completion-at-point-function because it subverts + ;; company-etags in the default value of company-backends, where + ;; the latter comes later. + (remove 'tags-completion-at-point-function + (default-value 'completion-at-point-functions))) + (completion-at-point-functions (company--capf-workaround)) + (data (run-hook-wrapped 'completion-at-point-functions + ;; Ignore misbehaving functions. + #'completion--capf-wrapper 'optimist))) + (when (and (consp (cdr data)) (integer-or-marker-p (nth 1 data))) data))) + +(declare-function python-shell-get-process "python") + +(defun company--capf-workaround () + ;; For http://debbugs.gnu.org/cgi/bugreport.cgi?bug=18067 + (if (or (not (listp completion-at-point-functions)) + (not (memq 'python-completion-complete-at-point completion-at-point-functions)) + (python-shell-get-process)) + completion-at-point-functions + (remq 'python-completion-complete-at-point completion-at-point-functions))) + +(defun company-capf--save-current-data (data) + (setq company-capf--current-completion-data data) + (add-hook 'company-after-completion-hook + #'company-capf--clear-current-data nil t)) + +(defun company-capf--clear-current-data (_ignored) + (setq company-capf--current-completion-data nil)) + +(defvar-local company-capf--sorted nil) + +(defun company-capf (command &optional arg &rest _args) + "`company-mode' backend using `completion-at-point-functions'." + (interactive (list 'interactive)) + (pcase command + (`interactive (company-begin-backend 'company-capf)) + (`prefix + (let ((res (company--capf-data))) + (when res + (let ((length (plist-get (nthcdr 4 res) :company-prefix-length)) + (prefix (buffer-substring-no-properties (nth 1 res) (point)))) + (cond + ((> (nth 2 res) (point)) 'stop) + (length (cons prefix length)) + (t prefix)))))) + (`candidates + (company-capf--candidates arg)) + (`sorted + company-capf--sorted) + (`match + ;; Ask the for the `:company-match' function. If that doesn't help, + ;; fallback to sniffing for face changes to get a suitable value. + (let ((f (plist-get (nthcdr 4 company-capf--current-completion-data) + :company-match))) + (if f (funcall f arg) + (let* ((match-start nil) (pos -1) + (prop-value nil) (faces nil) + (has-face-p nil) chunks + (limit (length arg))) + (while (< pos limit) + (setq pos + (if (< pos 0) 0 (next-property-change pos arg limit))) + (setq prop-value (or + (get-text-property pos 'face arg) + (get-text-property pos 'font-lock-face arg)) + faces (if (listp prop-value) prop-value (list prop-value)) + has-face-p (memq 'completions-common-part faces)) + (cond ((and (not match-start) has-face-p) + (setq match-start pos)) + ((and match-start (not has-face-p)) + (push (cons match-start pos) chunks) + (setq match-start nil)))) + (nreverse chunks))))) + (`duplicates t) + (`no-cache t) ;Not much can be done here, as long as we handle + ;non-prefix matches. + (`meta + (let ((f (plist-get (nthcdr 4 company-capf--current-completion-data) + :company-docsig))) + (when f (funcall f arg)))) + (`doc-buffer + (let ((f (plist-get (nthcdr 4 company-capf--current-completion-data) + :company-doc-buffer))) + (when f (funcall f arg)))) + (`location + (let ((f (plist-get (nthcdr 4 company-capf--current-completion-data) + :company-location))) + (when f (funcall f arg)))) + (`annotation + (company-capf--annotation arg)) + (`kind + (let ((f (plist-get (nthcdr 4 company-capf--current-completion-data) + :company-kind))) + (when f (funcall f arg)))) + (`deprecated + (let ((f (plist-get (nthcdr 4 company-capf--current-completion-data) + :company-deprecated))) + (when f (funcall f arg)))) + (`require-match + (plist-get (nthcdr 4 (company--capf-data)) :company-require-match)) + (`init nil) ;Don't bother: plenty of other ways to initialize the code. + (`post-completion + (company--capf-post-completion arg)) + )) + +(defun company-capf--annotation (arg) + (let* ((f (plist-get (nthcdr 4 company-capf--current-completion-data) + :annotation-function)) + (annotation (when f (funcall f arg)))) + (if (and company-format-margin-function + (equal annotation " ") ; elisp-completion-at-point, pre-icons + (plist-get (nthcdr 4 company-capf--current-completion-data) + :company-kind)) + nil + annotation))) + +(defun company-capf--candidates (input) + (let ((res (company--capf-data))) + (company-capf--save-current-data res) + (when res + (let* ((table (nth 3 res)) + (pred (plist-get (nthcdr 4 res) :predicate)) + (meta (completion-metadata + (buffer-substring (nth 1 res) (nth 2 res)) + table pred)) + (candidates (completion-all-completions input table pred + (length input) + meta)) + (sortfun (cdr (assq 'display-sort-function meta))) + (last (last candidates)) + (base-size (and (numberp (cdr last)) (cdr last)))) + (when base-size + (setcdr last nil)) + (setq company-capf--sorted (functionp sortfun)) + (when sortfun + (setq candidates (funcall sortfun candidates))) + (if (not (zerop (or base-size 0))) + (let ((before (substring input 0 base-size))) + (mapcar (lambda (candidate) + (concat before candidate)) + candidates)) + candidates))))) + +(defun company--capf-post-completion (arg) + (let* ((res company-capf--current-completion-data) + (exit-function (plist-get (nthcdr 4 res) :exit-function)) + (table (nth 3 res))) + (if exit-function + ;; We can more or less know when the user is done with completion, + ;; so we do something different than `completion--done'. + (funcall exit-function arg + ;; FIXME: Should probably use an additional heuristic: + ;; completion-at-point doesn't know when the user picked a + ;; particular candidate explicitly (it only checks whether + ;; further completions exist). Whereas company user can press + ;; RET (or use implicit completion with company-tng). + (if (= (car (completion-boundaries arg table nil "")) + (length arg)) + 'sole + 'finished))))) + +(provide 'company-capf) + +;;; company-capf.el ends here diff --git a/elpa/company-20220326.48/company-capf.elc b/elpa/company-20220326.48/company-capf.elc new file mode 100644 index 0000000..2423daa Binary files /dev/null and b/elpa/company-20220326.48/company-capf.elc differ diff --git a/elpa/company-20220326.48/company-clang.el b/elpa/company-20220326.48/company-clang.el new file mode 100644 index 0000000..5d8ca5a --- /dev/null +++ b/elpa/company-20220326.48/company-clang.el @@ -0,0 +1,420 @@ +;;; company-clang.el --- company-mode completion backend for Clang -*- lexical-binding: t -*- + +;; Copyright (C) 2009-2011, 2013-2021 Free Software Foundation, Inc. + +;; Author: Nikolaj Schumacher + +;; This file is part of GNU Emacs. + +;; GNU Emacs is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; GNU Emacs is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with GNU Emacs. If not, see . + + +;;; Commentary: +;; + +;;; Code: + +(require 'company) +(require 'company-template) +(require 'cl-lib) + +(defgroup company-clang nil + "Completion backend for Clang." + :group 'company) + +(defcustom company-clang-executable + (executable-find "clang") + "Location of clang executable." + :type 'file) + +(defcustom company-clang-begin-after-member-access t + "When non-nil, start automatic completion after member access operators. + +Automatic completion starts whenever the current symbol is preceded by +\".\", \"->\" or \"::\", ignoring `company-minimum-prefix-length'. + +If `company-begin-commands' is a list, it should include `c-electric-lt-gt' +and `c-electric-colon', for automatic completion right after \">\" and +\":\"." + :type 'boolean) + +(defcustom company-clang-use-compile-flags-txt nil + "When non-nil, use flags from compile_flags.txt if present. + +The lines from that files will be appended to `company-clang-arguments'. + +And if such file is found, Clang is called from the directory containing +it. That allows the flags use relative file names within the project." + :type 'boolean + :safe 'booleanp) + +(defcustom company-clang-arguments nil + "A list of additional arguments to pass to clang when completing. +Prefix files (-include ...) can be selected with `company-clang-set-prefix' +or automatically through a custom `company-clang-prefix-guesser'." + :type '(repeat (string :tag "Argument"))) + +(defcustom company-clang-prefix-guesser 'company-clang-guess-prefix + "A function to determine the prefix file for the current buffer." + :type '(function :tag "Guesser function" nil)) + +(defvar company-clang-modes '(c-mode c++-mode objc-mode) + "Major modes which clang may complete.") + +(defcustom company-clang-insert-arguments t + "When non-nil, insert function arguments as a template after completion." + :type 'boolean + :package-version '(company . "0.8.0")) + +;; prefix ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +(defvar company-clang--prefix nil) + +(defsubst company-clang--guess-pch-file (file) + (let ((dir (directory-file-name (file-name-directory file)))) + (when (equal (file-name-nondirectory dir) "Classes") + (setq dir (file-name-directory dir))) + (car (directory-files dir t "\\([^.]h\\|[^h]\\).pch\\'" t)))) + +(defsubst company-clang--file-substring (file beg end) + (with-temp-buffer + (insert-file-contents-literally file nil beg end) + (buffer-string))) + +(defun company-clang-guess-prefix () + "Try to guess the prefix file for the current buffer." + ;; Prefixes seem to be called .pch. Pre-compiled headers do, too. + ;; So we look at the magic number to rule them out. + (let* ((file (company-clang--guess-pch-file buffer-file-name)) + (magic-number (and file (company-clang--file-substring file 0 4)))) + (unless (member magic-number '("CPCH" "gpch")) + file))) + +(defun company-clang-set-prefix (&optional prefix) + "Use PREFIX as a prefix (-include ...) file for clang completion." + (interactive (let ((def (funcall company-clang-prefix-guesser))) + (unless (stringp def) + (setq def default-directory)) + (list (read-file-name "Prefix file: " + (when def (file-name-directory def)) + def t (when def (file-name-nondirectory def)))))) + ;; TODO: pre-compile? + (setq company-clang--prefix (and (stringp prefix) + (file-regular-p prefix) + prefix))) + +;; Clean-up on exit. +(add-hook 'kill-emacs-hook 'company-clang-set-prefix) + +;; parsing ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +;; TODO: Handle Pattern (syntactic hints would be neat). +;; Do we ever see OVERLOAD (or OVERRIDE)? +(defconst company-clang--completion-pattern + "^COMPLETION: \\_<\\(%s[a-zA-Z0-9_:]*\\)\\(?:\\(?: (InBase)\\)? : \\(.*\\)$\\)?$") + +(defconst company-clang--error-buffer-name "*clang-error*") + +(defun company-clang--lang-option () + (if (eq major-mode 'objc-mode) + (if (string= "m" (file-name-extension buffer-file-name)) + "objective-c" "objective-c++") + (substring (symbol-name major-mode) 0 -5))) + +(defun company-clang--parse-output (prefix _objc) + (goto-char (point-min)) + (let ((pattern (format company-clang--completion-pattern + (regexp-quote prefix))) + (case-fold-search nil) + (results (make-hash-table :test 'equal :size (/ (point-max) 100))) + lines match) + (while (re-search-forward pattern nil t) + (setq match (match-string-no-properties 1)) + (unless (equal match "Pattern") + (save-match-data + (when (string-match ":" match) + (setq match (substring match 0 (match-beginning 0))))) + (let ((meta (match-string-no-properties 2))) + ;; Avoiding duplicates: + ;; https://github.com/company-mode/company-mode/issues/841 + (cond + ;; Either meta != completion (not a macro) + ((not (equal match meta)) + (puthash match meta results)) + ;; Or it's the first time we see this completion + ((eq (gethash match results 'none) 'none) + (puthash match nil results)))))) + (maphash + (lambda (match meta) + (when meta + (put-text-property 0 1 'meta (company-clang--strip-formatting meta) match)) + (push match lines)) + results) + lines)) + +(defun company-clang--meta (candidate) + (get-text-property 0 'meta candidate)) + +(defun company-clang--annotation (candidate) + (let ((ann (company-clang--annotation-1 candidate))) + (if (not (and ann (string-prefix-p "(*)" ann))) + ann + (with-temp-buffer + (insert ann) + (search-backward ")") + (let ((pt (1+ (point)))) + (re-search-forward ".\\_>" nil t) + (delete-region pt (point))) + (buffer-string))))) + +(defun company-clang--annotation-1 (candidate) + (let ((meta (company-clang--meta candidate))) + (cond + ((null meta) nil) + ((string-match "[^:]:[^:]" meta) + (substring meta (1+ (match-beginning 0)))) + ((string-match "(anonymous)" meta) nil) + ((string-match "\\((.*)[ a-z]*\\'\\)" meta) + (let ((paren (match-beginning 1))) + (if (not (eq (aref meta (1- paren)) ?>)) + (match-string 1 meta) + (with-temp-buffer + (insert meta) + (goto-char paren) + (substring meta (1- (search-backward "<")))))))))) + +(defun company-clang--strip-formatting (text) + (replace-regexp-in-string + "#]" " " + (replace-regexp-in-string "[<{[]#\\|#[>}]" "" text t) + t)) + +(defun company-clang--handle-error (res args) + (goto-char (point-min)) + (let* ((buf (get-buffer-create company-clang--error-buffer-name)) + (cmd (concat company-clang-executable " " (mapconcat 'identity args " "))) + (pattern (format company-clang--completion-pattern "")) + (message-truncate-lines t) + (err (if (and (re-search-forward pattern nil t) + ;; Something in the Windows build? + ;; Looks like Clang doesn't always include the error text + ;; before completions (even if exited with error). + (> (match-beginning 0) (point-min))) + (buffer-substring-no-properties (point-min) + (1- (match-beginning 0))) + ;; Warn the user more aggressively if no match was found. + (message "clang failed with error %d: %s" res cmd) + (buffer-string)))) + + (with-current-buffer buf + (let ((inhibit-read-only t)) + (erase-buffer) + (insert (current-time-string) + (format "\nclang failed with error %d:\n" res) + cmd "\n\n") + (insert err) + (setq buffer-read-only t) + (goto-char (point-min)))))) + +(defun company-clang--start-process (prefix callback &rest args) + (let* ((objc (derived-mode-p 'objc-mode)) + (buf (get-buffer-create "*clang-output*")) + ;; Looks unnecessary in Emacs 25.1 and later. + ;; (Inconclusive, needs more testing): + ;; https://github.com/company-mode/company-mode/pull/288#issuecomment-72491808 + (process-adaptive-read-buffering nil) + (existing-process (get-buffer-process buf))) + (when existing-process + (kill-process existing-process)) + (with-current-buffer buf + (erase-buffer) + (setq buffer-undo-list t)) + (let* ((process-connection-type nil) + (process (apply #'start-file-process "company-clang" buf + company-clang-executable args))) + (set-process-sentinel + process + (lambda (proc status) + (unless (string-match-p "hangup\\|killed" status) + (funcall + callback + (let ((res (process-exit-status proc))) + (with-current-buffer buf + (unless (eq 0 res) + (company-clang--handle-error res args)) + ;; Still try to get any useful input. + (company-clang--parse-output prefix objc))))))) + (unless (company-clang--auto-save-p) + (send-region process (point-min) (point-max)) + (send-string process "\n") + (process-send-eof process))))) + +(defsubst company-clang--build-location (pos) + (save-excursion + (goto-char pos) + (format "%s:%d:%d" + (if (company-clang--auto-save-p) buffer-file-name "-") + (line-number-at-pos) + (1+ (length + (encode-coding-region + (line-beginning-position) + (point) + 'utf-8 + t)))))) + +(defsubst company-clang--build-complete-args (pos) + (append '("-fsyntax-only" "-Xclang" "-code-completion-macros") + (unless (company-clang--auto-save-p) + (list "-x" (company-clang--lang-option))) + (company-clang--arguments) + (when (stringp company-clang--prefix) + (list "-include" (expand-file-name company-clang--prefix))) + (list "-Xclang" (format "-code-completion-at=%s" + (company-clang--build-location pos))) + (list (if (company-clang--auto-save-p) buffer-file-name "-")))) + +(defun company-clang--arguments () + (let ((fname "compile_flags.txt") + (args company-clang-arguments) + current-dir-rel) + (when company-clang-use-compile-flags-txt + (let ((dir (locate-dominating-file default-directory fname))) + (when dir + (setq current-dir-rel (file-relative-name default-directory dir)) + (setq default-directory dir) + (with-temp-buffer + (insert-file-contents fname) + (setq args + (append + args + (split-string (buffer-substring-no-properties + (point-min) (point-max)) + "[\n\r]+" + t + "[ \t]+")))) + (unless (equal current-dir-rel "./") + (push (format "-I%s" current-dir-rel) args))))) + args)) + +(defun company-clang--candidates (prefix callback) + (and (company-clang--auto-save-p) + (buffer-modified-p) + (basic-save-buffer)) + (when (null company-clang--prefix) + (company-clang-set-prefix (or (funcall company-clang-prefix-guesser) + 'none))) + (let ((default-directory default-directory)) + (apply 'company-clang--start-process + prefix + callback + (company-clang--build-complete-args + (if (company-clang--check-version 4.0 9.0) + (point) + (- (point) (length prefix))))))) + +(defun company-clang--prefix () + (if company-clang-begin-after-member-access + (company-grab-symbol-cons "\\.\\|->\\|::" 2) + (company-grab-symbol))) + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +(defconst company-clang-required-version 1.1) + +(defvar company-clang--version nil) + +(defun company-clang--auto-save-p () + (not + (company-clang--check-version 2.9 3.1))) + +(defun company-clang--check-version (min apple-min) + (pcase-exhaustive company-clang--version + (`(apple . ,ver) (>= ver apple-min)) + (`(normal . ,ver) (>= ver min)))) + +(defsubst company-clang-version () + "Return the version of `company-clang-executable'." + (with-temp-buffer + (call-process company-clang-executable nil t nil "--version") + (goto-char (point-min)) + (if (re-search-forward + "\\(clang\\|Apple LLVM\\|bcc32x\\|bcc64\\) version \\([0-9.]+\\)" nil t) + (cons + (if (equal (match-string-no-properties 1) "Apple LLVM") + 'apple + 'normal) + (string-to-number (match-string-no-properties 2))) + 0))) + +(defun company-clang (command &optional arg &rest ignored) + "`company-mode' completion backend for Clang. +Clang is a parser for C and ObjC. Clang version 1.1 or newer is required. + +Additional command line arguments can be specified in +`company-clang-arguments'. Prefix files (-include ...) can be selected +with `company-clang-set-prefix' or automatically through a custom +`company-clang-prefix-guesser'. + +With Clang versions before 2.9, we have to save the buffer before +performing completion. With Clang 2.9 and later, buffer contents are +passed via standard input." + (interactive (list 'interactive)) + (cl-case command + (interactive (company-begin-backend 'company-clang)) + (init (when (memq major-mode company-clang-modes) + (unless company-clang-executable + (error "Company found no clang executable")) + (setq company-clang--version (company-clang-version)) + (unless (company-clang--check-version + company-clang-required-version + company-clang-required-version) + (error "Company requires clang version %s" + company-clang-required-version)))) + (prefix (and (memq major-mode company-clang-modes) + buffer-file-name + company-clang-executable + (not (company-in-string-or-comment)) + (or (company-clang--prefix) 'stop))) + (candidates (cons :async + (lambda (cb) (company-clang--candidates arg cb)))) + (meta (company-clang--meta arg)) + (kind (company-clang--kind arg)) + (annotation (company-clang--annotation arg)) + (post-completion (let ((anno (company-clang--annotation arg))) + (when (and company-clang-insert-arguments anno) + (insert anno) + (if (string-match "\\`:[^:]" anno) + (company-template-objc-templatify anno) + (company-template-c-like-templatify + (concat arg anno)))))))) + +(defun company-clang--kind (arg) + ;; XXX: Not very precise. + ;; E.g. it will say that an arg-less ObjC method is a variable (perhaps we + ;; could look around for brackets, etc, if there any actual users who's + ;; bothered by it). + ;; And we can't distinguish between local vars and struct fields. + ;; Or between keywords and macros. + (let ((meta (company-clang--meta arg))) + (cond + ((null meta) 'keyword) + ((string-match "(" meta) + (if (string-match-p (format "\\`%s *\\'" (regexp-quote arg)) + (substring meta 0 (match-beginning 0))) + 'keyword ; Also macro, actually (no return type). + 'function)) + (t 'variable)))) + +(provide 'company-clang) +;;; company-clang.el ends here diff --git a/elpa/company-20220326.48/company-clang.elc b/elpa/company-20220326.48/company-clang.elc new file mode 100644 index 0000000..02645b2 Binary files /dev/null and b/elpa/company-20220326.48/company-clang.elc differ diff --git a/elpa/company-20220326.48/company-cmake.el b/elpa/company-20220326.48/company-cmake.el new file mode 100644 index 0000000..a072be1 --- /dev/null +++ b/elpa/company-20220326.48/company-cmake.el @@ -0,0 +1,207 @@ +;;; company-cmake.el --- company-mode completion backend for CMake + +;; Copyright (C) 2013-2015, 2017-2018, 2020 Free Software Foundation, Inc. + +;; Author: Chen Bin +;; Version: 0.2 + +;; This program is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see . + +;;; Commentary: +;; +;; company-cmake offers completions for module names, variable names and +;; commands used by CMake. And their descriptions. + +;;; Code: + +(require 'company) +(require 'cl-lib) + +(defgroup company-cmake nil + "Completion backend for CMake." + :group 'company) + +(defcustom company-cmake-executable + (executable-find "cmake") + "Location of cmake executable." + :type 'file) + +(defvar company-cmake-executable-arguments + '("--help-command-list" + "--help-module-list" + "--help-property-list" + "--help-variable-list") + "The arguments we pass to cmake, separately. +They affect which types of symbols we get completion candidates for.") + +(defvar company-cmake--completion-pattern + "^\\(%s[a-zA-Z0-9_<>]%s\\)$" + "Regexp to match the candidates.") + +(defvar company-cmake-modes '(cmake-mode) + "Major modes in which cmake may complete.") + +(defvar company-cmake--candidates-cache nil + "Cache for the raw candidates.") + +(defvar company-cmake--meta-command-cache nil + "Cache for command arguments to retrieve descriptions for the candidates.") + +(defun company-cmake--replace-tags (rlt) + (setq rlt (replace-regexp-in-string + "\\(.*?\\(IS_GNU\\)?\\)\\(.*\\)" + (lambda (_match) + (mapconcat 'identity + (if (match-beginning 2) + '("\\1CXX\\3" "\\1C\\3" "\\1G77\\3") + '("\\1CXX\\3" "\\1C\\3" "\\1Fortran\\3")) + "\n")) + rlt t)) + (setq rlt (replace-regexp-in-string + "\\(.*\\)\\(.*\\)" + (mapconcat 'identity '("\\1DEBUG\\2" "\\1RELEASE\\2" + "\\1RELWITHDEBINFO\\2" "\\1MINSIZEREL\\2") + "\n") + rlt)) + rlt) + +(defun company-cmake--fill-candidates-cache (arg) + "Fill candidates cache if needed." + (let (rlt) + (unless company-cmake--candidates-cache + (setq company-cmake--candidates-cache (make-hash-table :test 'equal))) + + ;; If hash is empty, fill it. + (unless (gethash arg company-cmake--candidates-cache) + (with-temp-buffer + (let ((res (call-process company-cmake-executable nil t nil arg))) + (unless (zerop res) + (message "cmake executable exited with error=%d" res))) + (setq rlt (buffer-string))) + (setq rlt (company-cmake--replace-tags rlt)) + (puthash arg rlt company-cmake--candidates-cache)) + )) + +(defun company-cmake--parse (prefix content cmd) + (let ((start 0) + (pattern (format company-cmake--completion-pattern + (regexp-quote prefix) + (if (zerop (length prefix)) "+" "*"))) + (lines (split-string content "\n")) + match + rlt) + (dolist (line lines) + (when (string-match pattern line) + (let ((match (match-string 1 line))) + (when match + (puthash match cmd company-cmake--meta-command-cache) + (push match rlt))))) + rlt)) + +(defun company-cmake--candidates (prefix) + (let (results + cmd-opts + str) + + (unless company-cmake--meta-command-cache + (setq company-cmake--meta-command-cache (make-hash-table :test 'equal))) + + (dolist (arg company-cmake-executable-arguments) + (company-cmake--fill-candidates-cache arg) + (setq cmd-opts (replace-regexp-in-string "-list$" "" arg) ) + + (setq str (gethash arg company-cmake--candidates-cache)) + (when str + (setq results (nconc results + (company-cmake--parse prefix str cmd-opts))))) + results)) + +(defun company-cmake--unexpand-candidate (candidate) + (cond + ((string-match "^CMAKE_\\(C\\|CXX\\|Fortran\\)\\(_.*\\)$" candidate) + (setq candidate (concat "CMAKE_" (match-string 2 candidate)))) + + ;; C flags + ((string-match "^\\(.*_\\)IS_GNU\\(C\\|CXX\\|G77\\)$" candidate) + (setq candidate (concat (match-string 1 candidate) "IS_GNU"))) + + ;; C flags + ((string-match "^\\(.*_\\)OVERRIDE_\\(C\\|CXX\\|Fortran\\)$" candidate) + (setq candidate (concat (match-string 1 candidate) "OVERRIDE_"))) + + ((string-match "^\\(.*\\)\\(_DEBUG\\|_RELEASE\\|_RELWITHDEBINFO\\|_MINSIZEREL\\)\\(.*\\)$" candidate) + (setq candidate (concat (match-string 1 candidate) + "_" + (match-string 3 candidate))))) + candidate) + +(defun company-cmake--meta (candidate) + (let ((cmd-opts (gethash candidate company-cmake--meta-command-cache)) + result) + (setq candidate (company-cmake--unexpand-candidate candidate)) + + ;; Don't cache the documentation of every candidate (command) + ;; Cache in this case will cost too much memory. + (with-temp-buffer + (call-process company-cmake-executable nil t nil cmd-opts candidate) + ;; Go to the third line, trim it and return the result. + ;; Tested with cmake 2.8.9. + (goto-char (point-min)) + (forward-line 2) + (setq result (buffer-substring-no-properties (line-beginning-position) + (line-end-position))) + (setq result (replace-regexp-in-string "^[ \t\n\r]+" "" result)) + result))) + +(defun company-cmake--doc-buffer (candidate) + (let ((cmd-opts (gethash candidate company-cmake--meta-command-cache))) + + (setq candidate (company-cmake--unexpand-candidate candidate)) + (with-temp-buffer + (call-process company-cmake-executable nil t nil cmd-opts candidate) + ;; Go to the third line, trim it and return the doc buffer. + ;; Tested with cmake 2.8.9. + (goto-char (point-min)) + (forward-line 2) + (company-doc-buffer + (buffer-substring-no-properties (line-beginning-position) + (point-max)))))) + +(defun company-cmake-prefix-dollar-brace-p () + "Test if the current symbol follows ${." + (save-excursion + (skip-syntax-backward "w_") + (and (eq (char-before (point)) ?\{) + (eq (char-before (1- (point))) ?$)))) + +(defun company-cmake (command &optional arg &rest ignored) + "`company-mode' completion backend for CMake. +CMake is a cross-platform, open-source make system." + (interactive (list 'interactive)) + (cl-case command + (interactive (company-begin-backend 'company-cmake)) + (init (when (memq major-mode company-cmake-modes) + (unless company-cmake-executable + (error "Company found no cmake executable")))) + (prefix (and (memq major-mode company-cmake-modes) + (or (not (company-in-string-or-comment)) + (company-cmake-prefix-dollar-brace-p)) + (company-grab-symbol))) + (candidates (company-cmake--candidates arg)) + (meta (company-cmake--meta arg)) + (doc-buffer (company-cmake--doc-buffer arg)) + )) + +(provide 'company-cmake) +;;; company-cmake.el ends here diff --git a/elpa/company-20220326.48/company-cmake.elc b/elpa/company-20220326.48/company-cmake.elc new file mode 100644 index 0000000..d2faf35 Binary files /dev/null and b/elpa/company-20220326.48/company-cmake.elc differ diff --git a/elpa/company-20220326.48/company-css.el b/elpa/company-20220326.48/company-css.el new file mode 100644 index 0000000..f5ac7c7 --- /dev/null +++ b/elpa/company-20220326.48/company-css.el @@ -0,0 +1,446 @@ +;;; company-css.el --- company-mode completion backend for css-mode -*- lexical-binding: t -*- + +;; Copyright (C) 2009-2011, 2013-2015, 2018 Free Software Foundation, Inc. + +;; Author: Nikolaj Schumacher + +;; This file is part of GNU Emacs. + +;; GNU Emacs is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; GNU Emacs is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with GNU Emacs. If not, see . + +;;; Commentary: +;; +;; In Emacs >= 26, company-capf is used instead. + +;;; Code: + +(require 'company) +(require 'cl-lib) + +(declare-function web-mode-language-at-pos "web-mode" (&optional pos)) + +(defconst company-css-property-alist + ;; see http://www.w3.org/TR/CSS21/propidx.html + '(("azimuth" angle "left-side" "far-left" "left" "center-left" "center" + "center-right" "right" "far-right" "right-side" "behind" "leftwards" + "rightwards") + ("background" background-color background-image background-repeat + background-attachment background-position + background-clip background-origin background-size) + ("background-attachment" "scroll" "fixed") + ("background-color" color "transparent") + ("background-image" uri "none") + ("background-position" percentage length "left" "center" "right" percentage + length "top" "center" "bottom" "left" "center" "right" "top" "center" + "bottom") + ("background-repeat" "repeat" "repeat-x" "repeat-y" "no-repeat") + ("border" border-width border-style border-color) + ("border-bottom" border) + ("border-bottom-color" border-color) + ("border-bottom-style" border-style) + ("border-bottom-width" border-width) + ("border-collapse" "collapse" "separate") + ("border-color" color "transparent") + ("border-left" border) + ("border-left-color" border-color) + ("border-left-style" border-style) + ("border-left-width" border-width) + ("border-right" border) + ("border-right-color" border-color) + ("border-right-style" border-style) + ("border-right-width" border-width) + ("border-spacing" length length) + ("border-style" border-style) + ("border-top" border) + ("border-top-color" border-color) + ("border-top-style" border-style) + ("border-top-width" border-width) + ("border-width" border-width) + ("bottom" length percentage "auto") + ("caption-side" "top" "bottom") + ("clear" "none" "left" "right" "both") + ("clip" shape "auto") + ("color" color) + ("content" "normal" "none" string uri counter "attr()" "open-quote" + "close-quote" "no-open-quote" "no-close-quote") + ("counter-increment" identifier integer "none") + ("counter-reset" identifier integer "none") + ("cue" cue-before cue-after) + ("cue-after" uri "none") + ("cue-before" uri "none") + ("cursor" uri "*" "auto" "crosshair" "default" "pointer" "move" "e-resize" + "ne-resize" "nw-resize" "n-resize" "se-resize" "sw-resize" "s-resize" + "w-resize" "text" "wait" "help" "progress") + ("direction" "ltr" "rtl") + ("display" "inline" "block" "list-item" "run-in" "inline-block" "table" + "inline-table" "table-row-group" "table-header-group" "table-footer-group" + "table-row" "table-column-group" "table-column" "table-cell" + "table-caption" "none") + ("elevation" angle "below" "level" "above" "higher" "lower") + ("empty-cells" "show" "hide") + ("float" "left" "right" "none") + ("font" font-style font-weight font-size "/" line-height + font-family "caption" "icon" "menu" "message-box" "small-caption" + "status-bar" "normal" "small-caps" + ;; CSS3 + font-stretch) + ("font-family" family-name generic-family) + ("font-size" absolute-size relative-size length percentage) + ("font-style" "normal" "italic" "oblique") + ("font-weight" "normal" "bold" "bolder" "lighter" "100" "200" "300" "400" + "500" "600" "700" "800" "900") + ("height" length percentage "auto") + ("left" length percentage "auto") + ("letter-spacing" "normal" length) + ("line-height" "normal" number length percentage) + ("list-style" list-style-type list-style-position list-style-image) + ("list-style-image" uri "none") + ("list-style-position" "inside" "outside") + ("list-style-type" "disc" "circle" "square" "decimal" "decimal-leading-zero" + "lower-roman" "upper-roman" "lower-greek" "lower-latin" "upper-latin" + "armenian" "georgian" "lower-alpha" "upper-alpha" "none") + ("margin" margin-width) + ("margin-bottom" margin-width) + ("margin-left" margin-width) + ("margin-right" margin-width) + ("margin-top" margin-width) + ("max-height" length percentage "none") + ("max-width" length percentage "none") + ("min-height" length percentage) + ("min-width" length percentage) + ("orphans" integer) + ("outline" outline-color outline-style outline-width) + ("outline-color" color "invert") + ("outline-style" border-style) + ("outline-width" border-width) + ("overflow" "visible" "hidden" "scroll" "auto" + ;; CSS3: + "no-display" "no-content") + ("padding" padding-width) + ("padding-bottom" padding-width) + ("padding-left" padding-width) + ("padding-right" padding-width) + ("padding-top" padding-width) + ("page-break-after" "auto" "always" "avoid" "left" "right") + ("page-break-before" "auto" "always" "avoid" "left" "right") + ("page-break-inside" "avoid" "auto") + ("pause" time percentage) + ("pause-after" time percentage) + ("pause-before" time percentage) + ("pitch" frequency "x-low" "low" "medium" "high" "x-high") + ("pitch-range" number) + ("play-during" uri "mix" "repeat" "auto" "none") + ("position" "static" "relative" "absolute" "fixed") + ("quotes" string string "none") + ("richness" number) + ("right" length percentage "auto") + ("speak" "normal" "none" "spell-out") + ("speak-header" "once" "always") + ("speak-numeral" "digits" "continuous") + ("speak-punctuation" "code" "none") + ("speech-rate" number "x-slow" "slow" "medium" "fast" "x-fast" "faster" + "slower") + ("stress" number) + ("table-layout" "auto" "fixed") + ("text-align" "left" "right" "center" "justify") + ("text-indent" length percentage) + ("text-transform" "capitalize" "uppercase" "lowercase" "none") + ("top" length percentage "auto") + ("unicode-bidi" "normal" "embed" "bidi-override") + ("vertical-align" "baseline" "sub" "super" "top" "text-top" "middle" + "bottom" "text-bottom" percentage length) + ("visibility" "visible" "hidden" "collapse") + ("voice-family" specific-voice generic-voice "*" specific-voice + generic-voice) + ("volume" number percentage "silent" "x-soft" "soft" "medium" "loud" + "x-loud") + ("white-space" "normal" "pre" "nowrap" "pre-wrap" "pre-line") + ("widows" integer) + ("width" length percentage "auto") + ("word-spacing" "normal" length) + ("z-index" "auto" integer) + ;; CSS3 + ("align-content" align-stretch "space-between" "space-around") + ("align-items" align-stretch "baseline") + ("align-self" align-items "auto") + ("animation" animation-name animation-duration animation-timing-function + animation-delay animation-iteration-count animation-direction + animation-fill-mode) + ("animation-delay" time) + ("animation-direction" "normal" "reverse" "alternate" "alternate-reverse") + ("animation-duration" time) + ("animation-fill-mode" "none" "forwards" "backwards" "both") + ("animation-iteration-count" integer "infinite") + ("animation-name" "none") + ("animation-play-state" "paused" "running") + ("animation-timing-function" transition-timing-function + "step-start" "step-end" "steps(,)") + ("backface-visibility" "visible" "hidden") + ("background-clip" background-origin) + ("background-origin" "border-box" "padding-box" "content-box") + ("background-size" length percentage "auto" "cover" "contain") + ("border-image" border-image-outset border-image-repeat border-image-source + border-image-slice border-image-width) + ("border-image-outset" length) + ("border-image-repeat" "stretch" "repeat" "round" "space") + ("border-image-source" uri "none") + ("border-image-slice" length) + ("border-image-width" length percentage) + ("border-radius" length) + ("border-top-left-radius" length) + ("border-top-right-radius" length) + ("border-bottom-left-radius" length) + ("border-bottom-right-radius" length) + ("box-decoration-break" "slice" "clone") + ("box-shadow" length color) + ("box-sizing" "content-box" "border-box") + ("break-after" "auto" "always" "avoid" "left" "right" "page" "column" + "avoid-page" "avoid-column") + ("break-before" break-after) + ("break-inside" "avoid" "auto") + ("columns" column-width column-count) + ("column-count" integer) + ("column-fill" "auto" "balance") + ("column-gap" length "normal") + ("column-rule" column-rule-width column-rule-style column-rule-color) + ("column-rule-color" color) + ("column-rule-style" border-style) + ("column-rule-width" border-width) + ("column-span" "all" "none") + ("column-width" length "auto") + ("filter" url "blur()" "brightness()" "contrast()" "drop-shadow()" + "grayscale()" "hue-rotate()" "invert()" "opacity()" "saturate()" "sepia()") + ("flex" flex-grow flex-shrink flex-basis) + ("flex-basis" percentage length "auto") + ("flex-direction" "row" "row-reverse" "column" "column-reverse") + ("flex-flow" flex-direction flex-wrap) + ("flex-grow" number) + ("flex-shrink" number) + ("flex-wrap" "nowrap" "wrap" "wrap-reverse") + ("font-feature-setting" normal string number) + ("font-kerning" "auto" "normal" "none") + ("font-language-override" "normal" string) + ("font-size-adjust" "none" number) + ("font-stretch" "normal" "ultra-condensed" "extra-condensed" "condensed" + "semi-condensed" "semi-expanded" "expanded" "extra-expanded" "ultra-expanded") + ("font-synthesis" "none" "weight" "style") + ("font-variant" font-variant-alternates font-variant-caps + font-variant-east-asian font-variant-ligatures font-variant-numeric + font-variant-position) + ("font-variant-alternates" "normal" "historical-forms" "stylistic()" + "styleset()" "character-variant()" "swash()" "ornaments()" "annotation()") + ("font-variant-caps" "normal" "small-caps" "all-small-caps" "petite-caps" + "all-petite-caps" "unicase" "titling-caps") + ("font-variant-east-asian" "jis78" "jis83" "jis90" "jis04" "simplified" + "traditional" "full-width" "proportional-width" "ruby") + ("font-variant-ligatures" "normal" "none" "common-ligatures" + "no-common-ligatures" "discretionary-ligatures" "no-discretionary-ligatures" + "historical-ligatures" "no-historical-ligatures" "contextual" "no-contextual") + ("font-variant-numeric" "normal" "ordinal" "slashed-zero" + "lining-nums" "oldstyle-nums" "proportional-nums" "tabular-nums" + "diagonal-fractions" "stacked-fractions") + ("font-variant-position" "normal" "sub" "super") + ("hyphens" "none" "manual" "auto") + ("justify-content" align-common "space-between" "space-around") + ("line-break" "auto" "loose" "normal" "strict") + ("marquee-direction" "forward" "reverse") + ("marquee-play-count" integer "infinite") + ("marquee-speed" "slow" "normal" "fast") + ("marquee-style" "scroll" "slide" "alternate") + ("opacity" number) + ("order" number) + ("outline-offset" length) + ("overflow-x" overflow) + ("overflow-y" overflow) + ("overflow-style" "auto" "marquee-line" "marquee-block") + ("overflow-wrap" "normal" "break-word") + ("perspective" "none" length) + ("perspective-origin" percentage length "left" "center" "right" "top" "bottom") + ("resize" "none" "both" "horizontal" "vertical") + ("tab-size" integer length) + ("text-align-last" "auto" "start" "end" "left" "right" "center" "justify") + ("text-decoration" text-decoration-color text-decoration-line text-decoration-style) + ("text-decoration-color" color) + ("text-decoration-line" "none" "underline" "overline" "line-through" "blink") + ("text-decoration-style" "solid" "double" "dotted" "dashed" "wavy") + ("text-overflow" "clip" "ellipsis") + ("text-shadow" color length) + ("text-underline-position" "auto" "under" "left" "right") + ("transform" "matrix(,,,,,)" "translate(,)" "translateX()" "translateY()" + "scale()" "scaleX()" "scaleY()" "rotate()" "skewX()" "skewY()" "none") + ("transform-origin" perspective-origin) + ("transform-style" "flat" "preserve-3d") + ("transition" transition-property transition-duration + transition-timing-function transition-delay) + ("transition-delay" time) + ("transition-duration" time) + ("transition-timing-function" + "ease" "linear" "ease-in" "ease-out" "ease-in-out" "cubic-bezier(,,,)") + ("transition-property" "none" "all" identifier) + ("word-wrap" overflow-wrap) + ("word-break" "normal" "break-all" "keep-all")) + "A list of CSS properties and their possible values.") + +(defconst company-css-value-classes + '((absolute-size "xx-small" "x-small" "small" "medium" "large" "x-large" + "xx-large") + (align-common "flex-start" "flex-end" "center") + (align-stretch align-common "stretch") + (border-style "none" "hidden" "dotted" "dashed" "solid" "double" "groove" + "ridge" "inset" "outset") + (border-width "thick" "medium" "thin") + (color "aqua" "black" "blue" "fuchsia" "gray" "green" "lime" "maroon" "navy" + "olive" "orange" "purple" "red" "silver" "teal" "white" "yellow") + (counter "counter(,)") + (family-name "Courier" "Helvetica" "Times") + (generic-family "serif" "sans-serif" "cursive" "fantasy" "monospace") + (generic-voice "male" "female" "child") + (margin-width "auto") ;; length percentage + (relative-size "larger" "smaller") + (shape "rect(,,,)") + (uri "url()")) + "A list of CSS property value classes and their contents.") +;; missing, because not completable +;; +;;