diff --git a/mlir/utils/emacs/mlir-lsp-client.el b/mlir/utils/emacs/mlir-lsp-client.el new file mode 100644 --- /dev/null +++ b/mlir/utils/emacs/mlir-lsp-client.el @@ -0,0 +1,45 @@ +;;; mlir-lsp-clinet.el --- LSP clinet for the MLIR. + +;; Copyright (C) 2022 The MLIR Authors. +;; +;; Licensed under the Apache License, Version 2.0 (the "License"); +;; you may not use this file except in compliance with the License. +;; You may obtain a copy of the License at +;; +;; http://www.apache.org/licenses/LICENSE-2.0 +;; +;; Unless required by applicable law or agreed to in writing, software +;; distributed under the License is distributed on an "AS IS" BASIS, +;; WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +;; See the License for the specific language governing permissions and +;; limitations under the License. + +;;; Commentary: + +;; LSP client to use with `mlir-mode' that uses `mlir-lsp-server' or any +;; user made compatible server. + +;;; Code: +(require 'lsp) + +(defcustom lsp-mlir-server-executable "mlir-lsp-server" + "Command to start the mlir language server." + :group 'lsp-mlir + :risky t + :type 'file) + + +(defun lsp-mlir-setup () + "Setup the LSP client for MLIR." + (add-to-list 'lsp-language-id-configuration '(mlir-mode . "mlir")) + + (lsp-register-client + (make-lsp-client + :new-connection (lsp-stdio-connection (lambda () lsp-mlir-server-executable)) + :activation-fn (lsp-activate-on "mlir") + :priority -1 + :server-id 'mlir-lsp))) + + +(provide 'mlir-lsp-client) +;;; mlir-lsp-client.el ends here