]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/lint/lint-tests.factor
factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring tool!
[factor.git] / extra / lint / lint-tests.factor
index bab2171675a3be963c530f5b0b09565a480ffbc2..01c63ba13d82156c04d592f3eff050b9c6d01a17 100644 (file)
@@ -4,7 +4,7 @@ IN: lint.tests
 ! Don't write code like this
 : lint1 ( obj -- ) [ "hi" print ] [ ] if ; ! when
 
-[ { { lint1 { [ [ ] if ] } } } ] [ \ lint1 lint-word ] unit-test
+{ { { lint1 { [ [ ] if ] } } } } [ \ lint1 lint-word ] unit-test
 
 ! : lint2 ( a b -- b a b ) dup -rot ; ! tuck
 
@@ -12,4 +12,4 @@ IN: lint.tests
 
 : lint3 ( seq -- seq ) [ 0 swap nth 1 + ] map ;
 
-[ { { lint3 { [ 0 swap nth ] } } } ] [ \ lint3 lint-word ] unit-test
+{ { { lint3 { [ 0 swap nth ] } } } } [ \ lint3 lint-word ] unit-test