[nongnu] elpa/nix-mode 3248864b56 348/500: Add failing tests that check for correct lexing of angle paths.

[ELPA Syncer]

branch: elpa/nix-mode
commit 3248864b567dbb1aa153250333ab6495cbb61717
Author: Jakub Piecuch <j.piecuch96@gmail.com>
Commit: Jakub Piecuch <j.piecuch96@gmail.com>

    Add failing tests that check for correct lexing of angle paths.
---
 tests/nix-mode-tests.el | 38 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 38 insertions(+)

diff --git a/tests/nix-mode-tests.el b/tests/nix-mode-tests.el
index f3e4a77b98..9bbeff713c 100644
--- a/tests/nix-mode-tests.el
+++ b/tests/nix-mode-tests.el
@@ -27,6 +27,44 @@
             (nix-mode)
             (eq (nix--get-string-type (nix--get-parse-state (point))) nil))))
 
+(ert-deftest nix-smie-angle-path-backward-detection ()
+  (should (with-temp-buffer
+            (nix-mode)
+            (insert "<nixpkgs/nixos>")
+            (nix-smie--skip-angle-path-backward)
+            (bobp))))
+
+(ert-deftest nix-smie-angle-path-backward-invalid ()
+  (should (with-temp-buffer
+            (nix-mode)
+            (insert "<nixpkgs/nixos>foo/bar>")
+            (null (nix-smie--skip-angle-path-backward)))))
+
+(ert-deftest nix-smie-angle-path-backward-early ()
+  (should (with-temp-buffer
+            (nix-mode)
+            (insert "<nixpkgs/nixos<foo/bar>")
+            (equal "<foo/bar>" (nix-smie--skip-angle-path-backward)))))
+
+(ert-deftest nix-smie-angle-path-forward-detection ()
+  (should (with-temp-buffer
+            (nix-mode)
+            (save-excursion (insert "<nixpkgs/nixos>"))
+            (nix-smie--forward-token)
+            (eobp))))
+
+(ert-deftest nix-smie-angle-path-forward-invalid ()
+  (should (with-temp-buffer
+            (nix-mode)
+            (save-excursion (insert "<nixpkgs/nixos<foo/bar>"))
+            (null (nix-smie--skip-angle-path-forward)))))
+
+(ert-deftest nix-smie-angle-path-forward-early ()
+  (should (with-temp-buffer
+            (nix-mode)
+            (save-excursion (insert "<foo/bar>nixpkgs/nixos>"))
+            (equal "<foo/bar>" (nix-smie--skip-angle-path-forward)))))
+
 ;;; Indentation tests
 
 (defvar nix-mode-test-dir (expand-file-name "testcases"