@@ -2388,7 +2388,7 @@ addTypeAnnotationsToLiteralsTest = testGroup "add type annotations to literals t
2388
2388
, " "
2389
2389
, " f = 1"
2390
2390
])
2391
- #if MIN_VERSION_ghc (9,4,0)
2391
+ #if MIN_VERSION_GLASGOW_HASKELL (9,4,0 ,0)
2392
2392
[ (DiagnosticSeverity_Warning , (3 , 4 ), " Defaulting the type variable" ) ]
2393
2393
#else
2394
2394
[ (DiagnosticSeverity_Warning , (3 , 4 ), " Defaulting the following constraint" ) ]
@@ -2409,7 +2409,7 @@ addTypeAnnotationsToLiteralsTest = testGroup "add type annotations to literals t
2409
2409
, " let x = 3"
2410
2410
, " in x"
2411
2411
])
2412
- #if MIN_VERSION_ghc (9,4,0)
2412
+ #if MIN_VERSION_GLASGOW_HASKELL (9,4,0 ,0)
2413
2413
[ (DiagnosticSeverity_Warning , (4 , 12 ), " Defaulting the type variable" ) ]
2414
2414
#else
2415
2415
[ (DiagnosticSeverity_Warning , (4 , 12 ), " Defaulting the following constraint" ) ]
@@ -2431,7 +2431,7 @@ addTypeAnnotationsToLiteralsTest = testGroup "add type annotations to literals t
2431
2431
, " let x = let y = 5 in y"
2432
2432
, " in x"
2433
2433
])
2434
- #if MIN_VERSION_ghc (9,4,0)
2434
+ #if MIN_VERSION_GLASGOW_HASKELL (9,4,0 ,0)
2435
2435
[ (DiagnosticSeverity_Warning , (4 , 20 ), " Defaulting the type variable" ) ]
2436
2436
#else
2437
2437
[ (DiagnosticSeverity_Warning , (4 , 20 ), " Defaulting the following constraint" ) ]
@@ -2454,7 +2454,7 @@ addTypeAnnotationsToLiteralsTest = testGroup "add type annotations to literals t
2454
2454
, " "
2455
2455
, " f = seq \" debug\" traceShow \" debug\" "
2456
2456
])
2457
- #if MIN_VERSION_ghc (9,4,0)
2457
+ #if MIN_VERSION_GLASGOW_HASKELL (9,4,0 ,0)
2458
2458
[ (DiagnosticSeverity_Warning , (6 , 8 ), " Defaulting the type variable" )
2459
2459
, (DiagnosticSeverity_Warning , (6 , 16 ), " Defaulting the type variable" )
2460
2460
]
@@ -2482,7 +2482,7 @@ addTypeAnnotationsToLiteralsTest = testGroup "add type annotations to literals t
2482
2482
, " "
2483
2483
, " f a = traceShow \" debug\" a"
2484
2484
])
2485
- #if MIN_VERSION_ghc (9,4,0)
2485
+ #if MIN_VERSION_GLASGOW_HASKELL (9,4,0 ,0)
2486
2486
[ (DiagnosticSeverity_Warning , (6 , 6 ), " Defaulting the type variable" ) ]
2487
2487
#else
2488
2488
[ (DiagnosticSeverity_Warning , (6 , 6 ), " Defaulting the following constraint" ) ]
@@ -2506,7 +2506,7 @@ addTypeAnnotationsToLiteralsTest = testGroup "add type annotations to literals t
2506
2506
, " "
2507
2507
, " f = seq (\" debug\" :: [Char]) (seq (\" debug\" :: [Char]) (traceShow \" debug\" ))"
2508
2508
])
2509
- #if MIN_VERSION_ghc (9,4,0)
2509
+ #if MIN_VERSION_GLASGOW_HASKELL (9,4,0 ,0)
2510
2510
[ (DiagnosticSeverity_Warning , (6 , 54 ), " Defaulting the type variable" ) ]
2511
2511
#else
2512
2512
[ (DiagnosticSeverity_Warning , (6 , 54 ), " Defaulting the following constraint" ) ]
0 commit comments