Add regression test for multi-repl with utf-8 directory

Author: fendor

cabal-testsuite/PackageTests/MultiRepl/Utf8-文档/app/Main.hs

@@ -0,0 +1,6 @@
+module Main (main) where
+
+import MyLib (mylib)
+
+main :: IO ()
+main = print mylib

cabal-testsuite/PackageTests/MultiRepl/Utf8-文档/bar/Main.hs

@@ -0,0 +1,6 @@
+module Main (main) where
+
+import MyLib (mylib)
+
+main :: IO ()
+main = print (mylib + 1)

cabal-testsuite/PackageTests/MultiRepl/Utf8-文档/cabal.all.out

@@ -0,0 +1,13 @@
+# cabal v2-repl
+Resolving dependencies...
+Build profile: -w ghc-<GHCVER> -O1
+In order, the following will be built:
+ - foo-文档-0.1.0.0 (interactive) (lib) (first run)
+ - foo-文档-0.1.0.0 (interactive) (exe:foo) (first run)
+ - foo-文档-0.1.0.0 (interactive) (exe:bar) (first run)
+Configuring library for foo-文档-0.1.0.0...
+Preprocessing library for foo-文档-0.1.0.0...
+Configuring executable 'foo' for foo-文档-0.1.0.0...
+Preprocessing executable 'foo' for foo-文档-0.1.0.0...
+Configuring executable 'bar' for foo-文档-0.1.0.0...
+Preprocessing executable 'bar' for foo-文档-0.1.0.0...

cabal-testsuite/PackageTests/MultiRepl/Utf8-文档/cabal.project

@@ -0,0 +1 @@
+packages: .

cabal-testsuite/PackageTests/MultiRepl/Utf8-文档/cabal.test.hs

@@ -0,0 +1,10 @@
+import Test.Cabal.Prelude
+
+-- Test for issue #12573;
+-- If the test-directory or cabal file contain a utf-8 symbol (文档), the multi-repl shouldn't crash.
+main = do
+  cabalTest' "all" $ do
+    skipUnlessGhcVersion ">= 9.4"
+    res <- cabalWithStdin "v2-repl" ["--enable-multi-repl", "all"] "print 0xdeadbeef"
+    -- The multi-repl session is functional (0xdeadbeef = 3735928559)
+    assertOutputContains "3735928559" res

cabal-testsuite/PackageTests/MultiRepl/Utf8-文档/foo-文档.cabal

@@ -0,0 +1,22 @@
+cabal-version: 3.0
+name: foo-文档
+version: 0.1.0.0
+build-type: Simple
+
+library
+  default-language: Haskell2010
+  hs-source-dirs: src
+  exposed-modules: MyLib
+  build-depends: base
+
+executable foo
+  default-language: Haskell2010
+  hs-source-dirs: app
+  main-is: Main.hs
+  build-depends: base, foo-文档
+
+executable bar
+  default-language: Haskell2010
+  hs-source-dirs: bar
+  main-is: Main.hs
+  build-depends: base, foo-文档

cabal-testsuite/PackageTests/MultiRepl/Utf8-文档/src/MyLib.hs

@@ -0,0 +1,4 @@
+module MyLib (mylib) where
+
+mylib :: Integer
+mylib = 0xdeadc0de