@@ -86,5 +86,8 @@
 	-constraints SHA1 \
 	-setup {set data [binary decode hex f78f92141bcd170ae89b4fba15a1d59f3fd84d223c9251bdacbbae61d05ed115a06a7ce117b7beead24421ded9c32592bd57edeae39c39fa1fe8946a84d0cf1f7beead1713e2e0959897347f67c80b0400c209815d6b10a683836fd5562a56cab1a28e81b6576654631cf16566b86e3b33a108b05307c00aff14a768ed7350606a0f85e6a91d396f5b5cbe577f9b38807c7d523d6d792f6ebc24a4ecf2b3a427cdbbfb]} \
 	-body {tls::digest -digest SHA1 -data $data} \
 	-match exact -result cb0082c8f197d260991ba6a460e76e202bad27b3
 
+# Cleanup
+::tcltest::cleanupTests
+return