blob: 24bfb76f1d69d589e46414f914265b9580f5019d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
TH_recover_warns.hs:(9,18)-(10,64): Splicing expression
recover
(stringE "splice failed") [| let x = "a" in let x = "b" in x |]
======>
let x = "a" in let x = "b" in x
TH_recover_warns.hs:9:18: warning: [-Wunused-local-binds (in -Wextra, -Wunused-binds)]
Defined but not used: ‘x’
TH_recover_warns.hs:10:34: warning: [-Wunused-local-binds (in -Wextra, -Wunused-binds)]
Defined but not used: ‘x’
TH_recover_warns.hs:10:49: warning: [-Wname-shadowing (in -Wall)]
This binding for ‘x’ shadows the existing binding
bound at TH_recover_warns.hs:10:34
|