branch: elpa/nix-mode
commit 3248864b567dbb1aa153250333ab6495cbb61717
Author: Jakub Piecuch <[email protected]>
Commit: Jakub Piecuch <[email protected]>
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"
