Use Haskell to Output Utf8 String in the PowerShell on Windows 10

Question

Here is the code.

module Lib
    ( someFunc
    ) where

someFunc :: IO ()
someFunc = putStrLn "你好"