[Git][ghc/ghc][master] Add a test for #23355

[Marge Bot (@marge-bot)]

Marge Bot pushed to branch master at Glasgow Haskell Compiler / GHC


Commits:
182df90e by Krzysztof Gogolewski at 2023-05-25T03:30:57-04:00
Add a test for #23355

It was fixed by !10061, so I'm adding it in the same group.

- - - - -


3 changed files:

- + testsuite/tests/ghci/should_run/T22958c.hs
- + testsuite/tests/ghci/should_run/T22958c.stdout
- testsuite/tests/ghci/should_run/all.T


Changes:

=====================================
testsuite/tests/ghci/should_run/T22958c.hs
=====================================
@@ -0,0 +1,15 @@
+-- Test extracted from text-builder-linear, ticket #23355
+{-# LANGUAGE UnliftedDatatypes #-}
+module Main (main) where
+
+import GHC.Exts (UnliftedType)
+
+type Buffer :: UnliftedType
+data Buffer = Buffer
+
+main :: IO ()
+main = case i Buffer of Buffer -> putStrLn "good"
+
+{-# NOINLINE i #-}
+i :: forall (a :: UnliftedType). a -> a
+i x = x


=====================================
testsuite/tests/ghci/should_run/T22958c.stdout
=====================================
@@ -0,0 +1 @@
+good


=====================================
testsuite/tests/ghci/should_run/all.T
=====================================
@@ -90,3 +90,4 @@ test('T22829', just_ghci + [extra_hc_opts("-Wmissing-import-lists -Werror")], co
 test('T23229', just_ghci + [extra_hc_opts("-this-unit-id my-package -Wno-missing-methods T23229")], ghci_script, ['T23229.script'])
 test('T22958a', just_ghci, compile_and_run, [''])
 test('T22958b', just_ghci, compile_and_run, [''])
+test('T22958c', just_ghci, compile_and_run, [''])



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/182df90e4d1f652c3d078294921805b9b982671b

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/182df90e4d1f652c3d078294921805b9b982671b
You're receiving this email because of your account on gitlab.haskell.org.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20230525/bf37c133/attachment-0001.html>