tests/getHomeDirectory001.hs

   1 import System.Directory\r
   2 \r
   3 main = do\r
   4   getHomeDirectory               >>= print\r
   5   getAppUserDataDirectory "test" >>= print\r
   6   getUserDocumentsDirectory      >>= print\r
   7   getTemporaryDirectory          >>= print\r
   8   return ()\r