I have no idea what I am doing

app/Main.hs

@@ -1,4 +1,14 @@
 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 = putStrLn "Hello, Haskell!"
+main = do
+  putStrLn "Hello, Haskell!"