diff --git a/src/test/tpkg/clean.sh b/src/test/tpkg/clean.sh
new file mode 100755
index 00000000..b3ebef5e
--- /dev/null
+++ b/src/test/tpkg/clean.sh
@@ -0,0 +1,7 @@
+#!/bin/sh
+
+export SRCDIR=`dirname $0`
+(	cd $SRCDIR
+	./tpkg clean
+	rm -fr build build-stub-only build-event-loops install scan-build-reports .tpkg.var.master
+)