Skip to content

Commit 160f527

Browse files
committed
Document assertion in haskell-indent.
Document assertion failure reported in #415. module Test where -- {{{ A header -- ! <-- TAB here Results in (or (<= start end) (signal (quote cl-assertion-failed)...
1 parent db3c604 commit 160f527

File tree

1 file changed

+12
-0
lines changed

1 file changed

+12
-0
lines changed

tests/haskell-indent-tests.el

Lines changed: 12 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -3,6 +3,18 @@
33
(require 'haskell-mode)
44

55

6+
(ert-deftest haskell-indent-in-comment-1 ()
7+
"Document bad behavior. Should not assert."
8+
:expected-result :failed
9+
(should (with-temp-buffer
10+
(haskell-mode)
11+
(haskell-indent-mode)
12+
(insert (concat "module Test where\n"
13+
"-- {{{ A header\n"
14+
"--\n"))
15+
(indent-for-tab-command)
16+
t)))
17+
618

719
;; haskell-indent-put-region-in-literate happens to be in haskell-indent
820
;; when the function is moved, move the tests also

0 commit comments

Comments
 (0)