Paste number 312206: checker

Paste number 312206: checker
Pasted by: lfam
When:4 years, 2 months ago
Share:Tweet this! | http://paste.lisp.org/+6OWE
Channel:None
Paste contents:
Raw Source | XML | Display As
#!/bin/sh

set -u
set -e

main() {
	if [ $# -lt 1 ]; then
		printf "Give a package name.\n"
		exit 1
	fi
	package=$1
	shift

	if [ $# -ne 0 ]; then
		printf "Unknown parameter %s\n" "$1"
		exit 1
	fi

	mkdir a
	mkdir b

	mypath="$(./pre-inst-env guix build --no-substitutes $package)" \
	&& rsync -rlptgoD "$mypath" ./a \
	&& guix gc -d "$mypath" \
	&& mypath="$(./pre-inst-env guix build --no-substitutes $package)" \
	&& rsync -rlptgoD "$mypath" ./b \
	&& diffoscope --html ./report ./a ./b
}
main "$@"

This paste has no annotations.

Colorize as:
Show Line Numbers

Lisppaste pastes can be made by anyone at any time. Imagine a fearsomely comprehensive disclaimer of liability. Now fear, comprehensively.