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-keywords.el | 354 +++++++++++++++++++++++++++ 1 file changed, 354 insertions(+) create mode 100644 elpa/company-20220326.48/company-keywords.el (limited to 'elpa/company-20220326.48/company-keywords.el') diff --git a/elpa/company-20220326.48/company-keywords.el b/elpa/company-20220326.48/company-keywords.el new file mode 100644 index 0000000..0065afb --- /dev/null +++ b/elpa/company-20220326.48/company-keywords.el @@ -0,0 +1,354 @@ +;;; company-keywords.el --- A company backend for programming language keywords + +;; Copyright (C) 2009-2011, 2013-2018, 2020-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) +(eval-when-compile (require 'make-mode)) + +(defgroup company-keywords nil + "Completion backend for keywords." + :group 'company) + +(defcustom company-keywords-ignore-case nil + "Non-nil to ignore case in completion candidates." + :type 'boolean) + +(defun company-keywords-upper-lower (&rest lst) + ;; Upcase order is different for _. + (nconc (sort (mapcar 'upcase lst) 'string<) lst)) + +(defvar company-keywords-alist + ;; Please contribute corrections or additions. + `((c++-mode + ;; from https://en.cppreference.com/w/cpp/keyword + "alignas" "alignof" "and" "and_eq" "asm" "atomic_cancel" "atomic_commit" + "atomic_noexcept" "auto" "bitand" "bitor" "bool" "break" "case" "catch" + "char" "char16_t" "char32_t" "char8_t" "class" "co_await" "co_return" + "co_yield" "compl" "concept" "const" "const_cast" "consteval" "constexpr" + "constinit" "continue" "decltype" "default" "delete" "do" "double" + "dynamic_cast" "else" "enum" "explicit" "export" "extern" "false" "final" + "float" "for" "friend" "goto" "if" "import" "inline" "int" "long" "module" + "mutable" "namespace" "new" "noexcept" "not" "not_eq" "nullptr" "operator" + "or" "or_eq" "override" "private" "protected" "public" "reflexpr" "register" + "reinterpret_cast" "requires" "return" "short" "signed" "sizeof" "static" + "static_assert" "static_cast" "struct" "switch" "synchronized" "template" + "this" "thread_local" "throw" "true" "try" "typedef" "typeid" "typename" + "union" "unsigned" "using" "virtual" "void" "volatile" "wchar_t" "while" + "xor" "xor_eq") + (c-mode + ;; from https://en.cppreference.com/w/c/keyword + "_Alignas" "_Alignof" "_Atomic" "_Bool" "_Complex" "_Generic" "_Imaginary" + "_Noreturn" "_Static_assert" "_Thread_local" + "auto" "break" "case" "char" "const" "continue" "default" "do" + "double" "else" "enum" "extern" "float" "for" "goto" "if" "inline" + "int" "long" "register" "restrict" "return" "short" "signed" "sizeof" + "static" "struct" "switch" "typedef" "union" "unsigned" "void" "volatile" + "while") + (csharp-mode + "abstract" "add" "alias" "as" "base" "bool" "break" "byte" "case" + "catch" "char" "checked" "class" "const" "continue" "decimal" "default" + "delegate" "do" "double" "else" "enum" "event" "explicit" "extern" + "false" "finally" "fixed" "float" "for" "foreach" "get" "global" "goto" + "if" "implicit" "in" "int" "interface" "internal" "is" "lock" "long" + "namespace" "new" "null" "object" "operator" "out" "override" "params" + "partial" "private" "protected" "public" "readonly" "ref" "remove" + "return" "sbyte" "sealed" "set" "short" "sizeof" "stackalloc" "static" + "string" "struct" "switch" "this" "throw" "true" "try" "typeof" "uint" + "ulong" "unchecked" "unsafe" "ushort" "using" "value" "var" "virtual" + "void" "volatile" "where" "while" "yield") + (d-mode + ;; from http://www.digitalmars.com/d/2.0/lex.html + "abstract" "alias" "align" "asm" + "assert" "auto" "body" "bool" "break" "byte" "case" "cast" "catch" + "cdouble" "cent" "cfloat" "char" "class" "const" "continue" "creal" + "dchar" "debug" "default" "delegate" "delete" "deprecated" "do" + "double" "else" "enum" "export" "extern" "false" "final" "finally" + "float" "for" "foreach" "foreach_reverse" "function" "goto" "idouble" + "if" "ifloat" "import" "in" "inout" "int" "interface" "invariant" + "ireal" "is" "lazy" "long" "macro" "mixin" "module" "new" "nothrow" + "null" "out" "override" "package" "pragma" "private" "protected" + "public" "pure" "real" "ref" "return" "scope" "short" "static" "struct" + "super" "switch" "synchronized" "template" "this" "throw" "true" "try" + "typedef" "typeid" "typeof" "ubyte" "ucent" "uint" "ulong" "union" + "unittest" "ushort" "version" "void" "volatile" "wchar" "while" "with") + (f90-mode . + ;; from f90.el + ;; ".AND." ".GE." ".GT." ".LT." ".LE." ".NE." ".OR." ".TRUE." ".FALSE." + ,(company-keywords-upper-lower + "abs" "abstract" "achar" "acos" "adjustl" "adjustr" "aimag" "aint" + "align" "all" "all_prefix" "all_scatter" "all_suffix" "allocatable" + "allocate" "allocated" "and" "anint" "any" "any_prefix" "any_scatter" + "any_suffix" "asin" "assign" "assignment" "associate" "associated" + "asynchronous" "atan" "atan2" "backspace" "bind" "bit_size" "block" + "btest" "c_alert" "c_associated" "c_backspace" "c_bool" + "c_carriage_return" "c_char" "c_double" "c_double_complex" "c_f_pointer" + "c_f_procpointer" "c_float" "c_float_complex" "c_form_feed" "c_funloc" + "c_funptr" "c_horizontal_tab" "c_int" "c_int16_t" "c_int32_t" "c_int64_t" + "c_int8_t" "c_int_fast16_t" "c_int_fast32_t" "c_int_fast64_t" + "c_int_fast8_t" "c_int_least16_t" "c_int_least32_t" "c_int_least64_t" + "c_int_least8_t" "c_intmax_t" "c_intptr_t" "c_loc" "c_long" + "c_long_double" "c_long_double_complex" "c_long_long" "c_new_line" + "c_null_char" "c_null_funptr" "c_null_ptr" "c_ptr" "c_short" + "c_signed_char" "c_size_t" "c_vertical_tab" "call" "case" "ceiling" + "char" "character" "character_storage_size" "class" "close" "cmplx" + "command_argument_count" "common" "complex" "conjg" "contains" "continue" + "copy_prefix" "copy_scatter" "copy_suffix" "cos" "cosh" "count" + "count_prefix" "count_scatter" "count_suffix" "cpu_time" "cshift" + "cycle" "cyclic" "data" "date_and_time" "dble" "deallocate" "deferred" + "digits" "dim" "dimension" "distribute" "do" "dot_product" "double" + "dprod" "dynamic" "elemental" "else" "elseif" "elsewhere" "end" "enddo" + "endfile" "endif" "entry" "enum" "enumerator" "eoshift" "epsilon" "eq" + "equivalence" "eqv" "error_unit" "exit" "exp" "exponent" "extends" + "extends_type_of" "external" "extrinsic" "false" "file_storage_size" + "final" "floor" "flush" "forall" "format" "fraction" "function" "ge" + "generic" "get_command" "get_command_argument" "get_environment_variable" + "goto" "grade_down" "grade_up" "gt" "hpf_alignment" "hpf_distribution" + "hpf_template" "huge" "iachar" "iall" "iall_prefix" "iall_scatter" + "iall_suffix" "iand" "iany" "iany_prefix" "iany_scatter" "iany_suffix" + "ibclr" "ibits" "ibset" "ichar" "ieee_arithmetic" "ieee_exceptions" + "ieee_features" "ieee_get_underflow_mode" "ieee_set_underflow_mode" + "ieee_support_underflow_control" "ieor" "if" "ilen" "implicit" + "import" "include" "independent" "index" "inherit" "input_unit" + "inquire" "int" "integer" "intent" "interface" "intrinsic" "ior" + "iostat_end" "iostat_eor" "iparity" "iparity_prefix" "iparity_scatter" + "iparity_suffix" "ishft" "ishftc" "iso_c_binding" "iso_fortran_env" + "kind" "lbound" "le" "leadz" "len" "len_trim" "lge" "lgt" "lle" "llt" + "log" "log10" "logical" "lt" "matmul" "max" "maxexponent" "maxloc" + "maxval" "maxval_prefix" "maxval_scatter" "maxval_suffix" "merge" + "min" "minexponent" "minloc" "minval" "minval_prefix" "minval_scatter" + "minval_suffix" "mod" "module" "modulo" "move_alloc" "mvbits" "namelist" + "ne" "nearest" "neqv" "new" "new_line" "nint" "non_intrinsic" + "non_overridable" "none" "nopass" "not" "null" "nullify" + "number_of_processors" "numeric_storage_size" "only" "onto" "open" + "operator" "optional" "or" "output_unit" "pack" "parameter" "parity" + "parity_prefix" "parity_scatter" "parity_suffix" "pass" "pause" + "pointer" "popcnt" "poppar" "precision" "present" "print" "private" + "procedure" "processors" "processors_shape" "product" "product_prefix" + "product_scatter" "product_suffix" "program" "protected" "public" + "pure" "radix" "random_number" "random_seed" "range" "read" "real" + "realign" "recursive" "redistribute" "repeat" "reshape" "result" + "return" "rewind" "rrspacing" "same_type_as" "save" "scale" "scan" + "select" "selected_char_kind" "selected_int_kind" "selected_real_kind" + "sequence" "set_exponent" "shape" "sign" "sin" "sinh" "size" "spacing" + "spread" "sqrt" "stop" "subroutine" "sum" "sum_prefix" "sum_scatter" + "sum_suffix" "system_clock" "tan" "tanh" "target" "template" "then" + "tiny" "transfer" "transpose" "trim" "true" "type" "ubound" "unpack" + "use" "value" "verify" "volatile" "wait" "where" "while" "with" "write")) + (go-mode + ;; 1. Keywords ref: https://golang.org/ref/spec#Keywords + ;; 2. Builtin functions and types ref: https://golang.org/pkg/builtin/ + "append" "bool" "break" "byte" "cap" "case" "chan" "close" "complex" "complex128" + "complex64" "const" "continue" "copy" "default" "defer" "delete" "else" "error" + "fallthrough" "false" "float32" "float64" "for" "func" "go" "goto" "if" "imag" + "import" "int" "int16" "int32" "int64" "int8" "interface" "len" "make" + "map" "new" "nil" "package" "panic" "print" "println" "range" "real" "recover" + "return" "rune" "select" "string" "struct" "switch" "true" "type" "uint" "uint16" + "uint32" "uint64" "uint8" "uintptr" "var") + (java-mode + "abstract" "assert" "boolean" "break" "byte" "case" "catch" "char" "class" + "continue" "default" "do" "double" "else" "enum" "extends" "final" + "finally" "float" "for" "if" "implements" "import" "instanceof" "int" + "interface" "long" "native" "new" "package" "private" "protected" "public" + "return" "short" "static" "strictfp" "super" "switch" "synchronized" + "this" "throw" "throws" "transient" "try" "void" "volatile" "while") + (javascript-mode + ;; https://tc39.github.io/ecma262/ + async, static and undefined + "async" "await" "break" "case" "catch" "class" "const" "continue" + "debugger" "default" "delete" "do" "else" "enum" "export" "extends" "false" + "finally" "for" "function" "if" "import" "in" "instanceof" "let" "new" + "null" "return" "static" "super" "switch" "this" "throw" "true" "try" + "typeof" "undefined" "var" "void" "while" "with" "yield") + (kotlin-mode + "abstract" "annotation" "as" "break" "by" "catch" "class" "companion" + "const" "constructor" "continue" "data" "do" "else" "enum" "false" "final" + "finally" "for" "fun" "if" "import" "in" "init" "inner" "interface" + "internal" "is" "lateinit" "nested" "null" "object" "open" "out" "override" + "package" "private" "protected" "public" "return" "super" "this" "throw" + "trait" "true" "try" "typealias" "val" "var" "when" "while") + (lua-mode + ;; https://www.lua.org/manual/5.3/manual.html + "and" "break" "do" "else" "elseif" "end" "false" "for" "function" "goto" "if" + "in" "local" "nil" "not" "or" "repeat" "return" "then" "true" "until" "while") + (objc-mode + "@catch" "@class" "@encode" "@end" "@finally" "@implementation" + "@interface" "@private" "@protected" "@protocol" "@public" + "@selector" "@synchronized" "@throw" "@try" "alloc" "autorelease" + "bycopy" "byref" "in" "inout" "oneway" "out" "release" "retain") + (perl-mode + ;; from cperl.el + "AUTOLOAD" "BEGIN" "CHECK" "CORE" "DESTROY" "END" "INIT" "__END__" + "__FILE__" "__LINE__" "abs" "accept" "alarm" "and" "atan2" "bind" + "binmode" "bless" "caller" "chdir" "chmod" "chomp" "chop" "chown" "chr" + "chroot" "close" "closedir" "cmp" "connect" "continue" "cos" + "crypt" "dbmclose" "dbmopen" "defined" "delete" "die" "do" "dump" "each" + "else" "elsif" "endgrent" "endhostent" "endnetent" "endprotoent" + "endpwent" "endservent" "eof" "eq" "eval" "exec" "exists" "exit" "exp" + "fcntl" "fileno" "flock" "for" "foreach" "fork" "format" "formline" + "ge" "getc" "getgrent" "getgrgid" "getgrnam" "gethostbyaddr" + "gethostbyname" "gethostent" "getlogin" "getnetbyaddr" "getnetbyname" + "getnetent" "getpeername" "getpgrp" "getppid" "getpriority" + "getprotobyname" "getprotobynumber" "getprotoent" "getpwent" "getpwnam" + "getpwuid" "getservbyname" "getservbyport" "getservent" "getsockname" + "getsockopt" "glob" "gmtime" "goto" "grep" "gt" "hex" "if" "index" "int" + "ioctl" "join" "keys" "kill" "last" "lc" "lcfirst" "le" "length" + "link" "listen" "local" "localtime" "lock" "log" "lstat" "lt" "map" + "mkdir" "msgctl" "msgget" "msgrcv" "msgsnd" "my" "ne" "next" "no" + "not" "oct" "open" "opendir" "or" "ord" "our" "pack" "package" "pipe" + "pop" "pos" "print" "printf" "push" "q" "qq" "quotemeta" "qw" "qx" + "rand" "read" "readdir" "readline" "readlink" "readpipe" "recv" "redo" + "ref" "rename" "require" "reset" "return" "reverse" "rewinddir" "rindex" + "rmdir" "scalar" "seek" "seekdir" "select" "semctl" "semget" "semop" + "send" "setgrent" "sethostent" "setnetent" "setpgrp" "setpriority" + "setprotoent" "setpwent" "setservent" "setsockopt" "shift" "shmctl" + "shmget" "shmread" "shmwrite" "shutdown" "sin" "sleep" "socket" + "socketpair" "sort" "splice" "split" "sprintf" "sqrt" "srand" "stat" + "study" "sub" "substr" "symlink" "syscall" "sysopen" "sysread" "system" + "syswrite" "tell" "telldir" "tie" "time" "times" "tr" "truncate" "uc" + "ucfirst" "umask" "undef" "unless" "unlink" "unpack" "unshift" "untie" + "until" "use" "utime" "values" "vec" "wait" "waitpid" + "wantarray" "warn" "while" "write" "x" "xor" "y") + (php-mode ;; https://www.php.net/manual/reserved.php + "Closure" "Error" "Exception" "Generator" "Throwable" + "__CLASS__" "__DIR__" "__FILE__" "__FUNCTION__" "__LINE__" "__METHOD__" + "__NAMESPACE__" "__TRAIT__" + "abstract" "and" "array" "as" "bool" "break" "callable" "case" "catch" + "class" "clone" "const" "continue" "declare" "default" "die" "do" "echo" + "else" "elseif" "empty" "enddeclare" "endfor" "endforeach" "endif" + "endswitch" "endwhile" "enum" "eval" "exit" "extends" "false" "final" "finally" + "float" "fn" "for" "foreach" "function" "global" "goto" "if" + "implements" "include" "include_once" "instanceof" "insteadof" "interface" + "isset" "iterable" "list" "match" "namespace" "new" "null" "object" "or" + "print" "private" "protected" "public" "readonly" "require" "require_once" + "return" "self" "static" "string" "switch" "this" "throw" "trait" "true" + "try" "unset" "use" "var" "void" "while" "xor" "yield" "yield from") + (python-mode + ;; https://docs.python.org/3/reference/lexical_analysis.html#keywords + "False" "None" "True" "and" "as" "assert" "break" "class" "continue" "def" + "del" "elif" "else" "except" "exec" "finally" "for" "from" "global" "if" + "import" "in" "is" "lambda" "nonlocal" "not" "or" "pass" "print" "raise" + "return" "try" "while" "with" "yield") + (ruby-mode + "BEGIN" "END" "alias" "and" "begin" "break" "case" "class" "def" "defined?" + "do" "else" "elsif" "end" "ensure" "false" "for" "if" "in" "module" + "next" "nil" "not" "or" "redo" "rescue" "retry" "return" "self" "super" + "then" "true" "undef" "unless" "until" "when" "while" "yield") + ;; From https://doc.rust-lang.org/grammar.html#keywords + ;; but excluding unused reserved words: https://www.reddit.com/r/rust/comments/34fq0k/is_there_a_good_list_of_rusts_keywords/cqucvnj + (rust-mode + "Self" + "as" "box" "break" "const" "continue" "crate" "else" "enum" "extern" + "false" "fn" "for" "if" "impl" "in" "let" "loop" "macro" "match" "mod" + "move" "mut" "pub" "ref" "return" "self" "static" "struct" "super" + "trait" "true" "type" "unsafe" "use" "where" "while") + (scala-mode + "abstract" "case" "catch" "class" "def" "do" "else" "extends" "false" + "final" "finally" "for" "forSome" "if" "implicit" "import" "lazy" "match" + "new" "null" "object" "override" "package" "private" "protected" + "return" "sealed" "super" "this" "throw" "trait" "true" "try" "type" "val" + "var" "while" "with" "yield") + (swift-mode + "Protocol" "Self" "Type" "and" "as" "assignment" "associatedtype" + "associativity" "available" "break" "case" "catch" "class" "column" "continue" + "convenience" "default" "defer" "deinit" "didSet" "do" "dynamic" "dynamicType" + "else" "elseif" "endif" "enum" "extension" "fallthrough" "false" "file" + "fileprivate" "final" "for" "func" "function" "get" "guard" "higherThan" "if" + "import" "in" "indirect" "infix" "init" "inout" "internal" "is" "lazy" "left" + "let" "line" "lowerThan" "mutating" "nil" "none" "nonmutating" "open" + "operator" "optional" "override" "postfix" "precedence" "precedencegroup" + "prefix" "private" "protocol" "public" "repeat" "required" "rethrows" "return" + "right" "selector" "self" "set" "static" "struct" "subscript" "super" "switch" + "throw" "throws" "true" "try" "typealias" "unowned" "var" "weak" "where" + "while" "willSet") + (julia-mode + "abstract" "break" "case" "catch" "const" "continue" "do" "else" "elseif" + "end" "eval" "export" "false" "finally" "for" "function" "global" "if" + "ifelse" "immutable" "import" "importall" "in" "let" "macro" "module" + "otherwise" "quote" "return" "switch" "throw" "true" "try" "type" + "typealias" "using" "while" + ) + ;; From https://github.com/apache/thrift/blob/master/contrib/thrift.el + (thrift-mode + "binary" "bool" "byte" "const" "double" "enum" "exception" "extends" + "i16" "i32" "i64" "include" "list" "map" "oneway" "optional" "required" + "service" "set" "string" "struct" "throws" "typedef" "void" + ) + ;; aliases + (js2-mode . javascript-mode) + (js2-jsx-mode . javascript-mode) + (espresso-mode . javascript-mode) + (js-mode . javascript-mode) + (js-jsx-mode . javascript-mode) + (rjsx-mode . javascript-mode) + (cperl-mode . perl-mode) + (jde-mode . java-mode) + (ess-julia-mode . julia-mode) + (phps-mode . php-mode) + (enh-ruby-mode . ruby-mode)) + "Alist mapping major-modes to sorted keywords for `company-keywords'.") + +(with-eval-after-load 'make-mode + (mapc + (lambda (mode-stmnts) + (setf (alist-get (car mode-stmnts) company-keywords-alist) + (cl-remove-duplicates + (sort (append makefile-special-targets-list + (cl-mapcan #'identity + (mapcar + #'split-string + (cl-remove-if-not + #'stringp + (symbol-value (cdr mode-stmnts)))))) + #'string<) + :test #'string=))) + '((makefile-automake-mode . makefile-automake-statements) + (makefile-gmake-mode . makefile-gmake-statements) + (makefile-makepp-mode . makefile-makepp-statements) + (makefile-bsdmake-mode . makefile-bsdmake-statements) + (makefile-imake-mode . makefile-statements) + (makefile-mode . makefile-statements)))) + +;;;###autoload +(defun company-keywords (command &optional arg &rest ignored) + "`company-mode' backend for programming language keywords." + (interactive (list 'interactive)) + (cl-case command + (interactive (company-begin-backend 'company-keywords)) + (prefix (and (assq major-mode company-keywords-alist) + (not (company-in-string-or-comment)) + (or (company-grab-symbol) 'stop))) + (candidates + (let ((completion-ignore-case company-keywords-ignore-case) + (symbols (cdr (assq major-mode company-keywords-alist)))) + (all-completions arg (if (consp symbols) + symbols + (cdr (assq symbols company-keywords-alist)))))) + (kind 'keyword) + (sorted t) + (ignore-case company-keywords-ignore-case))) + +(provide 'company-keywords) +;;; company-keywords.el ends here -- cgit v1.2.1