Commit 434d7836 authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Improve error message

Accommodating Simon M's suggestion (Trac #4268, comment 17)
parent 699dc540
......@@ -32,7 +32,7 @@ tcAnnotations [] = return []
tcAnnotations anns@(L loc _ : _)
= do { setSrcSpan loc $ addWarnTc $
(ptext (sLit "Ignoring ANN annotation") <> plural anns <> comma
<+> ptext (sLit "because this is a stage-1 compiler"))
<+> ptext (sLit "because this is a stage-1 compiler or doesn't support GHCi"))
; return [] }
#else
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment