15 lines
299 B
Haskell
15 lines
299 B
Haskell
module Main where
|
|
|
|
import System.PosixCompat.Types
|
|
import System.PosixCompat.Files
|
|
|
|
getFileSize :: FilePath -> IO FileOffset
|
|
getFileSize = (fileSize <$>) . getFileStatus
|
|
|
|
getFolderSize :: FilePath -> IO FileOffset
|
|
getFolderSize path = undefined
|
|
|
|
main :: IO ()
|
|
main = do
|
|
putStrLn "Hello, Haskell!"
|