Add content-length property to downloads

This is optional for now. Fixes #367
2022-12-22 00:31:41 +08:00
parent d1075987de
commit 9d4c923649
19 changed files with 3043 additions and 79 deletions
--- a/lib/GHCup/Types.hs
+++ b/lib/GHCup/Types.hs
@@ -262,6 +262,7 @@ data DownloadInfo = DownloadInfo
  { _dlUri    :: URI
  , _dlSubdir :: Maybe TarDir
  , _dlHash   :: Text
+  , _dlCSize  :: Maybe Integer
  }
  deriving (Eq, Ord, GHC.Generic, Show)