factor: second stab at [ ] [ ] unit-test -> { } [ ] unit-test

[factor.git] / extra / hashcash / hashcash-tests.factor

diff --git a/extra/hashcash/hashcash-tests.factor b/extra/hashcash/hashcash-tests.factor
index aee14fdf0fd79a77f9744da37f9a3c12590e3021..1f2ccd5dd948b3b8b4a3898e69a6aec065b7113d 100644 (file)
--- a/extra/hashcash/hashcash-tests.factor
+++ b/extra/hashcash/hashcash-tests.factor
@@ -1,15 +1,15 @@
 USING: accessors sequences tools.test hashcash ;
 
-[ t ] [ "foo@bar.com" mint check-stamp ] unit-test
+{ t } [ "foo@bar.com" mint check-stamp ] unit-test
 
-[ t ] [
+{ t } [
     <hashcash>
         "foo@bar.com" >>resource
         16 >>bits
     mint* check-stamp ] unit-test
 
-[ t ] [
+{ t } [
     "1:20:040927:mertz@gnosis.cx::odVZhQMP:7ca28" check-stamp
 ] unit-test
 
-[ 8 ] [ 8 salt length ] unit-test
+{ 8 } [ 8 salt length ] unit-test