diff options
Diffstat (limited to 'compiler/GHC/Tc')
| -rw-r--r-- | compiler/GHC/Tc/Gen/Pat.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/Tc/Gen/Pat.hs b/compiler/GHC/Tc/Gen/Pat.hs index 2480835729..58f64f84ae 100644 --- a/compiler/GHC/Tc/Gen/Pat.hs +++ b/compiler/GHC/Tc/Gen/Pat.hs @@ -650,8 +650,8 @@ AST is used for the subtraction operation. -- See Note [Delaying modFinalizers in untyped splices] in GHC.Rename.Splice. SplicePat _ splice -> case splice of (HsSpliced _ mod_finalizers (HsSplicedPat pat)) -> do - addModFinalizersWithLclEnv mod_finalizers - tc_pat pat_ty penv pat thing_inside + { addModFinalizersWithLclEnv mod_finalizers + ; tc_pat pat_ty penv pat thing_inside } _ -> panic "invalid splice in splice pat" |