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