From 6ce9ae7f33f4f03b72a46c9509bacde155da5f26 Mon Sep 17 00:00:00 2001
From: Jasper Van der Jeugt <m@jaspervdj.be>
Date: Sun, 14 Jan 2024 08:10:47 +0100
Subject: [PATCH] Add test case using empty line

See https://gitlab.haskell.org/ghc/ghc/-/issues/23984
---
 tests/Language/Haskell/Stylish/Step/LanguagePragmas/Tests.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/Language/Haskell/Stylish/Step/LanguagePragmas/Tests.hs b/tests/Language/Haskell/Stylish/Step/LanguagePragmas/Tests.hs
index 5e5d92da..ece69dee 100644
--- a/tests/Language/Haskell/Stylish/Step/LanguagePragmas/Tests.hs
+++ b/tests/Language/Haskell/Stylish/Step/LanguagePragmas/Tests.hs
@@ -230,7 +230,7 @@ case13 = assertSnippet
     input =
         [ "{-# LANGUAGE BangPatterns  #-}"
         , "{-# LANGUAGE DeriveFunctor #-}"
-        , "module Main where"
+        , ""
         , "main = let !x = 1 + 1 in print x"
         ]