[Git][ghc/ghc][wip/fix-win32-tarball-path] get-win32-tarballs: Improve diagnostics output
Ben Gamari
gitlab at gitlab.haskell.org
Thu Mar 19 14:31:23 UTC 2020
Ben Gamari pushed to branch wip/fix-win32-tarball-path at Glasgow Haskell Compiler / GHC
Commits:
01292151 by Ben Gamari at 2020-03-19T14:31:07Z
get-win32-tarballs: Improve diagnostics output
- - - - -
1 changed file:
- mk/get-win32-tarballs.py
Changes:
=====================================
mk/get-win32-tarballs.py
=====================================
@@ -5,6 +5,7 @@ from pathlib import Path
import urllib.request
import subprocess
import argparse
+from sys import stderr
TARBALL_VERSION = '0.1'
BASE_URL = "https://downloads.haskell.org/ghc/mingw/{}".format(TARBALL_VERSION)
@@ -18,11 +19,13 @@ def file_url(arch: str, fname: str) -> str:
fname=fname)
def fetch(url: str, dest: Path):
- print('Fetching', url, '=>', dest)
+ print('Fetching', url, '=>', dest, file=stderr)
urllib.request.urlretrieve(url, dest)
def fetch_arch(arch: str):
- req = urllib.request.urlopen(file_url(arch, 'MANIFEST'))
+ manifest_url = file_url(arch, 'MANIFEST')
+ print('Fetching', manifest_url, file=stderr)
+ req = urllib.request.urlopen(manifest_url)
files = req.read().decode('UTF-8').split('\n')
d = DEST / arch
if not d.is_dir():
@@ -35,6 +38,9 @@ def fetch_arch(arch: str):
verify(arch)
def verify(arch: str):
+ if not Path(DEST / arch / "SHA256SUMS").is_file():
+ raise IOError("SHA256SUMS doesn't exist; have you fetched?")
+
cmd = ['sha256sum', '--quiet', '--check', '--ignore-missing', 'SHA256SUMS']
subprocess.check_call(cmd, cwd=DEST / arch)
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/commit/01292151c8305cd5a914bd73ca287ba34d3913f4
--
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/commit/01292151c8305cd5a914bd73ca287ba34d3913f4
You're receiving this email because of your account on gitlab.haskell.org.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20200319/6a4104a3/attachment-0001.html>
More information about the ghc-commits
mailing list