CI Implementation (#97)

* Add CI badge

* Add CI config

* Add CI command makefile

* Copy windows-bootstrap from lsp-mode

* Change dep for windows-bootstrap

* Rename to treemacs specific files

* Rename to treemacs specific files

* Use byte-compile on warn

* Attempt to fix CI

* Revert free variables issue

* Fixed byte compile warnings

Author: jcs090218

.github/workflows/test.yml

@@ -0,0 +1,51 @@
+name: CI
+
+on: [push, pull_request]
+
+jobs:
+  unix-test:
+    runs-on: ${{ matrix.os }}
+    strategy:
+      matrix:
+        os: [ubuntu-latest, macos-latest]
+        emacs-version:
+          - 26.1
+          - 26.2
+          - 26.3
+          - 27.1
+          - snapshot
+
+    steps:
+      - uses: actions/checkout@v2
+
+      - uses: purcell/setup-emacs@master
+        with:
+          version: ${{ matrix.emacs-version }}
+
+      - uses: conao3/setup-cask@master
+        with:
+          version: 0.8.4
+
+      - name: Run tests
+        run: make unix-ci
+
+  windows-test:
+    runs-on: windows-latest
+    strategy:
+      matrix:
+        emacs-version:
+          - 26.1
+          - 26.2
+          - 26.3
+          - 27.1
+          - snapshot
+
+    steps:
+      - uses: actions/checkout@v2
+
+      - uses: jcs090218/setup-emacs-windows@master
+        with:
+          version: ${{ matrix.emacs-version }}
+
+      - name: Run tests
+        run: make windows-ci

Makefile

@@ -0,0 +1,34 @@
+.PHONY: all build unix-compile windows-compile clean
+
+EMACS ?= emacs
+CASK ?= cask
+
+LSP-TREEMACS-GENERAL := lsp-treemacs.el lsp-treemacs-themes.el
+
+all:
+	$(CASK) build
+
+build:
+	$(CASK) install
+
+# NOTE: treemacs also sets treemacs-no-load-time-warnings to t in its Makefile, so I guess it's OK?
+unix-compile:
+	@$(CASK) $(EMACS) -Q --batch \
+		-L . \
+		--eval '(setq byte-compile-error-on-warn t)' \
+		-f batch-byte-compile $(LSP-TREEMACS-GENERAL)
+
+windows-compile:
+	@$(CASK) $(EMACS) -Q --batch \
+		-l test/windows-bootstrap.el \
+		-L . \
+		--eval '(setq byte-compile-error-on-warn t)' \
+		-f batch-byte-compile $(LSP-TREEMACS-GENERAL)
+
+unix-ci: clean build unix-compile
+
+windows-ci: CASK=
+windows-ci: clean windows-compile
+
+clean:
+	rm -rf .cask *.elc

README.org

@@ -1,3 +1,4 @@
+[[https://github.com/emacs-lsp/dap-mode/actions][file:https://github.com/emacs-lsp/lsp-treemacs/workflows/CI/badge.svg]]
 [[https://melpa.org/#/lsp-treemacs][file:https://melpa.org/packages/lsp-treemacs-badge.svg]]
 [[https://stable.melpa.org/#/lsp-treemacs][file:https://stable.melpa.org/packages/lsp-treemacs-badge.svg]]
 

lsp-treemacs.el

@@ -988,7 +988,7 @@ With a prefix argument, select the new window expand the tree of implementations
           callback
           (seq-map
            (-lambda (node)
-             (-let* (((child-item &as &CallHierarchyItem :kind :uri :selection-range (&Range :start))
+             (-let* (((child-item &as &CallHierarchyItem :_name :kind :_detail? :_uri :selection-range (&Range :_start))
                       (if outgoing
                           (lsp:call-hierarchy-outgoing-call-to node)
                         (lsp:call-hierarchy-incoming-call-from node)))

test/windows-bootstrap.el

@@ -0,0 +1,45 @@
+;;; windows-bootstrap.el --- Windows test bootstrap  -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2020-2021 emacs-lsp maintainers
+;;
+;; 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 <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;;  Windows test bootstrap
+;;
+;;; Code:
+
+(require 'package)
+
+(setq user-emacs-directory (expand-file-name (make-temp-name ".emacs.d")
+                                             "~")
+      package-user-dir (expand-file-name (make-temp-name "tmp-elpa")
+                                         user-emacs-directory))
+
+(let* ((package-archives '(("melpa" . "https://melpa.org/packages/")
+                           ("gnu" . "http://elpa.gnu.org/packages/")))
+       (pkgs '(dash dash-functional f ht treemacs lsp-mode)))
+  (package-initialize)
+  (package-refresh-contents)
+
+  (mapc (lambda (pkg)
+          (unless (package-installed-p pkg)
+            (package-install pkg)))
+        pkgs)
+
+  (add-hook 'kill-emacs-hook
+            `(lambda () (delete-directory ,user-emacs-directory t))))
+
+;;; windows-bootstrap.el ends here