[nongnu] elpa/julia-mode 5d693ab 349/352: Fix CI using actions. (#160)

[ELPA Syncer]

branch: elpa/julia-mode
commit 5d693ab5278d70a4cc1fee9bcd30a57a76f49886
Author: Tamas K. Papp <tkpapp@gmail.com>
Commit: GitHub <noreply@github.com>

    Fix CI using actions. (#160)
    
    * Fix CI using actions.
    
    Factor out font locking query code.
    
    * fix typo
    
    * disable linter for now
---
 .github/workflows/CI.yml | 55 ++++++++++++++++++++++++++++++++++++++++++++++++
 julia-mode-tests.el      | 28 ++++++++++++++++--------
 2 files changed, 74 insertions(+), 9 deletions(-)

diff --git a/.github/workflows/CI.yml b/.github/workflows/CI.yml
new file mode 100644
index 0000000..b372ea0
--- /dev/null
+++ b/.github/workflows/CI.yml
@@ -0,0 +1,55 @@
+# uses https://github.com/leotaku/elisp-check for CI and
+# https://github.com/purcell/setup-emacs for Emacs setup
+
+name: check
+
+on:
+  pull_request:
+  push:
+    branches:
+      - master
+      - 'releases/*'
+
+jobs:
+  check:
+    runs-on: ubuntu-latest
+    strategy:
+      fail-fast: false
+      matrix:
+        emacs_version:
+          - 25.1
+          - 25.2
+          - 25.3
+          - 26.1
+          - 26.2
+          - 26.3
+          - 27.1
+          - 27.2
+        ignore_warnings:
+          - true
+        include:
+          - emacs_version: snapshot
+            ignore_warnings: false
+    steps:
+    - uses: actions/checkout@v2
+    - uses: purcell/setup-emacs@master
+      with:
+        version: ${{ matrix.emacs_version }}
+    - name: Run ert
+      uses: leotaku/elisp-check@master
+      with:
+        check: ert
+        file: 'julia-mode-tests.el'
+        ignore_warnings: ${{ matrix.ignore_warnings }}
+    # - name: Run package-lint # FIXME disabled as failing
+    #   uses: leotaku/elisp-check@master
+    #   with:
+    #     file: "julia-mode.el"
+    #     ignore_warnings: true
+    #     check: package-lint
+    - name: Run byte-compile
+      uses: leotaku/elisp-check@master
+      with:
+        file: "julia-mode.el"
+        ignore_warnings: true
+        check: byte-compile
diff --git a/julia-mode-tests.el b/julia-mode-tests.el
index 9befc9d..bb4af97 100644
--- a/julia-mode-tests.el
+++ b/julia-mode-tests.el
@@ -54,16 +54,20 @@
        (should (equal (buffer-substring-no-properties (point-min) (point-max))
                       ,to)))))
 
-(defmacro julia--should-font-lock (text pos face)
-  "Assert that TEXT at position POS gets font-locked with FACE in 
`julia-mode'."
-  `(with-temp-buffer
+(defun julia--get-font-lock (text pos)
+  "Get the face of `text' at `pos' when font-locked as Julia code in this 
mode."
+  (with-temp-buffer
      (julia-mode)
-     (insert ,text)
+     (insert text)
      (if (fboundp 'font-lock-ensure)
          (font-lock-ensure (point-min) (point-max))
        (with-no-warnings
          (font-lock-fontify-buffer)))
-     (should (eq ,face (get-text-property ,pos 'face)))))
+     (get-text-property pos 'face)))
+
+(defmacro julia--should-font-lock (text pos face)
+  "Assert that TEXT at position POS gets font-locked with FACE in 
`julia-mode'."
+  `(should (eq ,face (julia--get-font-lock ,text ,pos))))
 
 (defmacro julia--should-move-point (text fun from to &optional end arg)
   "With TEXT in `julia-mode', after calling FUN, the point should move FROM\
@@ -720,15 +724,21 @@ var = func(begin
     (julia--should-font-lock s1 10 nil)))
 
 (ert-deftest julia--test-char-const-font-lock ()
-  (dolist (c '("'\\''" "'\\\"'" "'\\\\'" "'\\010'" "'\\xfe'" "'\\uabcd'" 
-               "'\\Uabcdef01'" "'\\n'" "'a'" "'z'" "'''"))
+  (dolist (c '("'\\''"
+               "'\\\"'"
+               "'\\\\'"
+               "'\\010'"
+               "'\\xfe'"
+               "'\\uabcd'"
+               "'\\Uabcdef01'"
+               "'\\n'"
+               "'a'" "'z'" "'''"))
     (let ((c (format " %s " c)))
       (progn
         (julia--should-font-lock c 1 nil)
         (julia--should-font-lock c 2 font-lock-string-face)
         (julia--should-font-lock c (- (length c) 1) font-lock-string-face)
-        (julia--should-font-lock c (length c) nil)
-    ))))
+        (julia--should-font-lock c (length c) nil)))))
 
 ;;; Movement
 (ert-deftest julia--test-beginning-of-defun-assn-1 ()