如何确定正在运行的Haskell脚本或应用程序所在的目录？

要确定正在运行的Haskell脚本或应用程序所在的目录，可以使用以下方法：

使用getCurrentDirectory函数：

在Haskell中，可以使用System.Directory模块中的getCurrentDirectory函数来获取当前目录。以下是一个简单的示例：

import System.Directory

main :: IO ()
main = do
  currentDir <- getCurrentDirectory
  putStrLn $ "当前目录: " ++ currentDir

使用getExecutablePath函数：

System.Directory模块中的getExecutablePath函数可以获取当前运行的可执行文件的路径。可以通过splitPath函数来分割路径，然后获取目录部分。

import System.Directory
import System.FilePath

main :: IO ()
main = do
  executablePath <- getExecutablePath
  let dir = takeDirectory executablePath
  putStrLn $ "可执行文件目录: " ++ dir

使用getAppUserDataDirectory函数：

System.Directory模块中的getAppUserDataDirectory函数可以获取当前应用程序的用户数据目录。这个目录通常是操作系统中的用户数据目录，例如/home/username/.local/share（Linux）或C:\Users\username\AppData\Local（Windows）。

import System.Directory
import System.FilePath

main :: IO ()
main = do
  appDataDir <- getAppUserDataDirectory "MyApp"
  createDirectoryIfMissing True appDataDir
  putStrLn $ "应用程序数据目录: " ++ appDataDir

这些方法可以帮助你确定正在运行的Haskell脚本或应用程序所在的目录。