branch: elpa/haskell-tng-mode
commit e0acc425bf243b5634554b4aa78b6efef7ee89cc
Author: Tseen She <ts33n....@gmail.com>
Commit: Tseen She <ts33n....@gmail.com>
better tasty error detection
---
haskell-tng-compile.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/haskell-tng-compile.el b/haskell-tng-compile.el
index 219573d..6ae8360 100644
--- a/haskell-tng-compile.el
+++ b/haskell-tng-compile.el
@@ -32,13 +32,13 @@
(,(rx-to-string `(: bol ,file ":(" ,num "," ,num ")-(" ,num "," ,num ")"
,war))
1 (2 . 4) (3 . 5) 1 1 (6 'compilation-warning))
- ;; hspec
- (,(rx-to-string `(: bol (+ space) ,file ":" ,num ":" ,num ":"))
- 1 2 3 2 1)
- ;; tasty
+ ;; tasty / hspec
(,(rx-to-string
- `(: bol (+ space) "error, called at" (+ space) ,file ":" ,num ":"
,num " in "))
- 1 2 3 2 1)
+ `(: bol (? (+ space) "error, called at") (+ space) ,file ":" ,num ":"
,num (? "-" ,num ":")))
+ 1 2 (3 . 4) 2 1)
+ (,(rx-to-string
+ `(: bol (? (+ space) "error, called at") (+ space) ,file ":(" ,num
"," ,num ")-(" ,num "," ,num ")"))
+ 1 (2 . 4) (3 . 5) 2 1)
;; ghc information.
(,(rx-to-string
