stomp.cli: simplify

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

diff --git a/extra/variants/variants-tests.factor b/extra/variants/variants-tests.factor
index 4a7a7e67e1958b71b968ff17c7aac38cd9221565..f08901c098d27a6efcd71f0f99b1a3c37c342f94 100644 (file)
--- a/extra/variants/variants-tests.factor
+++ b/extra/variants/variants-tests.factor
@@ -1,4 +1,5 @@
-! (c)2009 Joe Groff bsd license
+! Copyright (C) 2009 Joe Groff.
+! See https://factorcode.org/license.txt for BSD license.
 USING: kernel math tools.test variants slots ;
 IN: variants.tests
 
@@ -23,8 +24,8 @@ VARIANT: list
 { nil t } [ list initial-value ] unit-test
 
 VARIANT: list2 ;
-VARIANT-MEMBER: list2 nil2
-VARIANT-MEMBER: list2 cons2: { { first object } { rest list2 } }
+VARIANT-MEMBER: list2 nil2 ;
+VARIANT-MEMBER: list2 cons2: { { first object } { rest list2 } } ;
 
 { t } [ nil2 list2? ] unit-test
 { t } [ 1 nil2 <cons2> list2? ] unit-test