config

Personal configuration.
git clone git://code.dwrz.net/config
Log | Files | Refs

lsp-prolog.el (1706B)


      1 ;;; lsp-prolog.el --- Prolog Client settings -*- lexical-binding: t; -*-
      2 
      3 ;; Copyright (C) 2020  James Cash
      4 
      5 ;; Author: James Cash <james.nvc@gmail.com>
      6 ;; Keywords: languages,tools
      7 
      8 ;; This program is free software; you can redistribute it and/or modify
      9 ;; it under the terms of the GNU General Public License as published by
     10 ;; the Free Software Foundation, either version 3 of the License, or
     11 ;; (at your option) any later version.
     12 
     13 ;; This program is distributed in the hope that it will be useful,
     14 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
     15 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     16 ;; GNU General Public License for more details.
     17 
     18 ;; You should have received a copy of the GNU General Public License
     19 ;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
     20 
     21 ;;; Commentary:
     22 
     23 ;; lsp-prolog client
     24 
     25 ;;; Code:
     26 
     27 (require 'lsp-mode)
     28 
     29 (defgroup lsp-prolog nil
     30   "LSP support for Prolog."
     31   :link '(url-link "https://github.com/jamesnvc/lsp_server")
     32   :group 'lsp-mode
     33   :tag "Lsp Prolog")
     34 
     35 (defcustom lsp-prolog-server-command '("swipl"
     36                                        "-g" "use_module(library(lsp_server))."
     37                                        "-g" "lsp_server:main"
     38                                        "-t" "halt"
     39                                        "--" "stdio")
     40   "The prolog-lsp server command."
     41   :group 'lsp-prolog
     42   :risky t
     43   :type 'list)
     44 
     45 (lsp-register-client
     46  (make-lsp-client
     47   :new-connection (lsp-stdio-connection (lambda () lsp-prolog-server-command))
     48   :major-modes '(prolog-mode)
     49   :multi-root t
     50   :server-id 'prolog-lsp))
     51 
     52 (lsp-consistency-check lsp-prolog)
     53 
     54 (provide 'lsp-prolog)
     55 ;;; lsp-prolog.el ends here