From 018676c7f883886b388652c913c99a10d2591b0b Mon Sep 17 00:00:00 2001 From: Herbert Valerio Riedel Date: Sun, 23 Feb 2014 22:00:57 +0100 Subject: Use U+2018 instead of U+201B quote mark in compiler messages This matches GCC's choice of Unicode quotation marks (i.e. U+2018 and U+2019) and therefore looks more familiar on the console. This addresses #2507. Signed-off-by: Herbert Valerio Riedel --- testsuite/tests/safeHaskell/flags/SafeFlags22.stderr | 2 +- testsuite/tests/safeHaskell/flags/SafeFlags23.stderr | 2 +- testsuite/tests/safeHaskell/flags/SafeFlags25.stderr | 2 +- testsuite/tests/safeHaskell/flags/SafeFlags26.stderr | 2 +- testsuite/tests/safeHaskell/ghci/p10.stderr | 2 +- testsuite/tests/safeHaskell/ghci/p13.stderr | 4 ++-- testsuite/tests/safeHaskell/ghci/p14.stderr | 2 +- testsuite/tests/safeHaskell/ghci/p15.stderr | 8 ++++---- testsuite/tests/safeHaskell/ghci/p4.stderr | 6 +++--- testsuite/tests/safeHaskell/ghci/p6.stderr | 4 ++-- testsuite/tests/safeHaskell/ghci/p9.stderr | 2 +- testsuite/tests/safeHaskell/safeInfered/UnsafeInfered07.stderr | 8 ++++---- testsuite/tests/safeHaskell/safeInfered/UnsafeInfered11.stderr | 2 +- testsuite/tests/safeHaskell/safeInfered/UnsafeInfered12.stderr | 2 +- testsuite/tests/safeHaskell/safeLanguage/SafeLang10.stderr | 4 ++-- 15 files changed, 26 insertions(+), 26 deletions(-) (limited to 'testsuite/tests/safeHaskell') diff --git a/testsuite/tests/safeHaskell/flags/SafeFlags22.stderr b/testsuite/tests/safeHaskell/flags/SafeFlags22.stderr index 784f0472be..5e1801c0cb 100644 --- a/testsuite/tests/safeHaskell/flags/SafeFlags22.stderr +++ b/testsuite/tests/safeHaskell/flags/SafeFlags22.stderr @@ -1,6 +1,6 @@ SafeFlags22.hs:1:16: Warning: - ‛SafeFlags22’ has been inferred as unsafe! + ‘SafeFlags22’ has been inferred as unsafe! Reason: SafeFlags22.hs:7:1: System.IO.Unsafe: Can't be safely imported! diff --git a/testsuite/tests/safeHaskell/flags/SafeFlags23.stderr b/testsuite/tests/safeHaskell/flags/SafeFlags23.stderr index 8af4d95f57..b2a57091ce 100644 --- a/testsuite/tests/safeHaskell/flags/SafeFlags23.stderr +++ b/testsuite/tests/safeHaskell/flags/SafeFlags23.stderr @@ -1,6 +1,6 @@ SafeFlags23.hs:1:16: Warning: - ‛SafeFlags22’ has been inferred as unsafe! + ‘SafeFlags22’ has been inferred as unsafe! Reason: SafeFlags23.hs:7:1: System.IO.Unsafe: Can't be safely imported! diff --git a/testsuite/tests/safeHaskell/flags/SafeFlags25.stderr b/testsuite/tests/safeHaskell/flags/SafeFlags25.stderr index 3e1d7b3607..434ea2b9ca 100644 --- a/testsuite/tests/safeHaskell/flags/SafeFlags25.stderr +++ b/testsuite/tests/safeHaskell/flags/SafeFlags25.stderr @@ -1,3 +1,3 @@ SafeFlags25.hs:1:16: Warning: - ‛SafeFlags25’ has been inferred as safe! + ‘SafeFlags25’ has been inferred as safe! diff --git a/testsuite/tests/safeHaskell/flags/SafeFlags26.stderr b/testsuite/tests/safeHaskell/flags/SafeFlags26.stderr index 640f5be414..47dd8828d4 100644 --- a/testsuite/tests/safeHaskell/flags/SafeFlags26.stderr +++ b/testsuite/tests/safeHaskell/flags/SafeFlags26.stderr @@ -1,6 +1,6 @@ SafeFlags26.hs:1:16: Warning: - ‛SafeFlags26’ has been inferred as safe! + ‘SafeFlags26’ has been inferred as safe! : Failing due to -Werror. diff --git a/testsuite/tests/safeHaskell/ghci/p10.stderr b/testsuite/tests/safeHaskell/ghci/p10.stderr index 71ace73569..d8ba4ab762 100644 --- a/testsuite/tests/safeHaskell/ghci/p10.stderr +++ b/testsuite/tests/safeHaskell/ghci/p10.stderr @@ -1,2 +1,2 @@ -:10:1: Not in scope: ‛b’ +:10:1: Not in scope: ‘b’ diff --git a/testsuite/tests/safeHaskell/ghci/p13.stderr b/testsuite/tests/safeHaskell/ghci/p13.stderr index 226aac2f05..edf5e1eb91 100644 --- a/testsuite/tests/safeHaskell/ghci/p13.stderr +++ b/testsuite/tests/safeHaskell/ghci/p13.stderr @@ -1,7 +1,7 @@ :12:1: Unsafe overlapping instances for Pos [Int] - arising from a use of ‛res’ + arising from a use of ‘res’ The matching instance is: instance [overlap ok] [safe] Pos [Int] -- Defined at :10:10 @@ -10,4 +10,4 @@ overlaps the following instances from different modules: instance [overlap ok] [safe] Pos [a] -- Defined at P13_A.hs:6:10 In the expression: res [1 :: Int, 2 :: Int] - In an equation for ‛it’: it = res [1 :: Int, 2 :: Int] + In an equation for ‘it’: it = res [1 :: Int, 2 :: Int] diff --git a/testsuite/tests/safeHaskell/ghci/p14.stderr b/testsuite/tests/safeHaskell/ghci/p14.stderr index 0d1b1728a7..4d0b14e970 100644 --- a/testsuite/tests/safeHaskell/ghci/p14.stderr +++ b/testsuite/tests/safeHaskell/ghci/p14.stderr @@ -1,2 +1,2 @@ -:10:1: parse error on input ‛{-# RULES’ +:10:1: parse error on input ‘{-# RULES’ diff --git a/testsuite/tests/safeHaskell/ghci/p15.stderr b/testsuite/tests/safeHaskell/ghci/p15.stderr index 0bc16dfbf1..19684b3937 100644 --- a/testsuite/tests/safeHaskell/ghci/p15.stderr +++ b/testsuite/tests/safeHaskell/ghci/p15.stderr @@ -1,9 +1,9 @@ Top level: Warning: - Module ‛Data.OldTypeable’ is deprecated: Use Data.Typeable instead + Module ‘Data.OldTypeable’ is deprecated: Use Data.Typeable instead :10:36: Warning: - In the use of type constructor or class ‛Typeable’ + In the use of type constructor or class ‘Typeable’ (imported from Data.OldTypeable, but defined in Data.OldTypeable.Internal): Deprecated: "Use Data.Typeable.Internal instead" @@ -11,8 +11,8 @@ Top level: Warning: Can't create hand written instances of Typeable in Safe Haskell! Can only derive them :22:22: - No instance for (Typeable G) arising from a use of ‛cast’ + No instance for (Typeable G) arising from a use of ‘cast’ In the expression: (cast y) :: Maybe H In a pattern binding: (Just y_as_H) = (cast y) :: Maybe H -:23:1: Not in scope: ‛y_as_H’ +:23:1: Not in scope: ‘y_as_H’ diff --git a/testsuite/tests/safeHaskell/ghci/p4.stderr b/testsuite/tests/safeHaskell/ghci/p4.stderr index 8ff140a7bd..c7eb6070e1 100644 --- a/testsuite/tests/safeHaskell/ghci/p4.stderr +++ b/testsuite/tests/safeHaskell/ghci/p4.stderr @@ -1,6 +1,6 @@ -:6:9: Not in scope: ‛System.IO.Unsafe.unsafePerformIO’ +:6:9: Not in scope: ‘System.IO.Unsafe.unsafePerformIO’ -:7:9: Not in scope: ‛x’ +:7:9: Not in scope: ‘x’ -:8:1: Not in scope: ‛y’ +:8:1: Not in scope: ‘y’ diff --git a/testsuite/tests/safeHaskell/ghci/p6.stderr b/testsuite/tests/safeHaskell/ghci/p6.stderr index f46c1f815e..9b6c0cfdb4 100644 --- a/testsuite/tests/safeHaskell/ghci/p6.stderr +++ b/testsuite/tests/safeHaskell/ghci/p6.stderr @@ -6,5 +6,5 @@ foreign import ccall safe "static sin" c_sin :: Double -> Double :13:1: - Not in scope: ‛c_sin’ - Perhaps you meant ‛c_sin'’ (line 8) + Not in scope: ‘c_sin’ + Perhaps you meant ‘c_sin'’ (line 8) diff --git a/testsuite/tests/safeHaskell/ghci/p9.stderr b/testsuite/tests/safeHaskell/ghci/p9.stderr index 71ace73569..d8ba4ab762 100644 --- a/testsuite/tests/safeHaskell/ghci/p9.stderr +++ b/testsuite/tests/safeHaskell/ghci/p9.stderr @@ -1,2 +1,2 @@ -:10:1: Not in scope: ‛b’ +:10:1: Not in scope: ‘b’ diff --git a/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered07.stderr b/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered07.stderr index e318319eaa..153ba0f77e 100644 --- a/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered07.stderr +++ b/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered07.stderr @@ -1,20 +1,20 @@ [1 of 2] Compiling UnsafeInfered07_A ( UnsafeInfered07_A.hs, UnsafeInfered07_A.o ) UnsafeInfered07_A.hs:4:1: Warning: - Module ‛Data.OldTypeable’ is deprecated: Use Data.Typeable instead + Module ‘Data.OldTypeable’ is deprecated: Use Data.Typeable instead UnsafeInfered07_A.hs:8:10: Warning: - In the use of type constructor or class ‛Typeable’ + In the use of type constructor or class ‘Typeable’ (imported from Data.OldTypeable, but defined in Data.OldTypeable.Internal): Deprecated: "Use Data.Typeable.Internal instead" UnsafeInfered07_A.hs:8:10: Warning: - In the use of type constructor or class ‛Typeable’ + In the use of type constructor or class ‘Typeable’ (imported from Data.OldTypeable, but defined in Data.OldTypeable.Internal): Deprecated: "Use Data.Typeable.Internal instead" UnsafeInfered07_A.hs:9:16: Warning: - In the use of ‛typeOf’ + In the use of ‘typeOf’ (imported from Data.OldTypeable, but defined in Data.OldTypeable.Internal): Deprecated: "Use Data.Typeable.Internal instead" [2 of 2] Compiling UnsafeInfered07 ( UnsafeInfered07.hs, UnsafeInfered07.o ) diff --git a/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered11.stderr b/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered11.stderr index ec700d62fd..d1cfe99158 100644 --- a/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered11.stderr +++ b/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered11.stderr @@ -1,7 +1,7 @@ [1 of 2] Compiling UnsafeInfered11_A ( UnsafeInfered11_A.hs, UnsafeInfered11_A.o ) UnsafeInfered11_A.hs:1:16: Warning: - ‛UnsafeInfered11_A’ has been inferred as unsafe! + ‘UnsafeInfered11_A’ has been inferred as unsafe! Reason: UnsafeInfered11_A.hs:17:11: Warning: Rule "lookupx/T" ignored diff --git a/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered12.stderr b/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered12.stderr index 53d7a4c328..470e1b71e6 100644 --- a/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered12.stderr +++ b/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered12.stderr @@ -1,6 +1,6 @@ UnsafeInfered12.hs:2:16: Warning: - ‛UnsafeInfered12’ has been inferred as unsafe! + ‘UnsafeInfered12’ has been inferred as unsafe! Reason: UnsafeInfered12.hs:1:14: -XTemplateHaskell is not allowed in Safe Haskell diff --git a/testsuite/tests/safeHaskell/safeLanguage/SafeLang10.stderr b/testsuite/tests/safeHaskell/safeLanguage/SafeLang10.stderr index a226c79744..83c79da75f 100644 --- a/testsuite/tests/safeHaskell/safeLanguage/SafeLang10.stderr +++ b/testsuite/tests/safeHaskell/safeLanguage/SafeLang10.stderr @@ -4,7 +4,7 @@ SafeLang10.hs:8:13: Unsafe overlapping instances for Pos [Int] - arising from a use of ‛res’ + arising from a use of ‘res’ The matching instance is: instance [overlap ok] [safe] Pos [Int] -- Defined at SafeLang10_B.hs:14:10 @@ -13,7 +13,7 @@ SafeLang10.hs:8:13: overlaps the following instances from different modules: instance Pos [a] -- Defined at SafeLang10_A.hs:13:10 In the expression: res [(1 :: Int)] - In an equation for ‛r’: r = res [(1 :: Int)] + In an equation for ‘r’: r = res [(1 :: Int)] In the expression: do { let r = res ...; putStrLn $ "Result: " ++ show r; -- cgit v1.2.1