Supporting GHC 7.8's unicode quote.
This commit is contained in:
parent
770644e87d
commit
9cd3d521d4
@ -231,10 +231,10 @@ nil does not display errors/warnings.
|
||||
(if (not (bolp)) (insert "\n")))
|
||||
(insert (match-string 1) " = undefined\n")))
|
||||
;; GHC 7.8 uses Unicode for single-quotes.
|
||||
((string-match "Not in scope: type constructor or class `\\([^'\n\0]+\\)'" data)
|
||||
((string-match "Not in scope: type constructor or class .\\([^\n\0]+\\)." data)
|
||||
(let ((sym (match-string 1 data)))
|
||||
(ghc-ins-mod sym)))
|
||||
((string-match "Not in scope: `\\([^'\n\0]+\\)'" data)
|
||||
((string-match "Not in scope: .\\([^\n\0]+\\)." data)
|
||||
(let ((sym (match-string 1 data)))
|
||||
(if (or (string-match "\\." sym) ;; qualified
|
||||
(y-or-n-p (format "Import module for %s?" sym)))
|
||||
|
Loading…
Reference in New Issue
Block a user