factor: clean up spaces in -tests files

[factor.git] / extra / parser-combinators / parser-combinators-tests.factor

diff --git a/extra/parser-combinators/parser-combinators-tests.factor b/extra/parser-combinators/parser-combinators-tests.factor
index 062277ec4d6f2b42dff2ae3d466397d97fa71cd3..cf6a731f53be8df7fe852af25e53eaa4c55159ad 100644 (file)
--- a/extra/parser-combinators/parser-combinators-tests.factor
+++ b/extra/parser-combinators/parser-combinators-tests.factor
@@ -44,11 +44,11 @@ IN: parser-combinators.tests
 
 ! Testing sp
 { { } } [
-  "  abcd" "a" token parse list>array 
+  "  abcd" "a" token parse list>array
 ] unit-test
 
 { { T{ parse-result f "a" T{ slice f 3 6 "  abcd" } } }  } [
-  "  abcd" "a" token sp parse list>array 
+  "  abcd" "a" token sp parse list>array
 ] unit-test
 
 ! Testing just
@@ -58,15 +58,15 @@ IN: parser-combinators.tests
 
 { { T{ parse-result f "abcd" T{ slice f 4 4 "abcd" } } } } [
   "abcd" "abcd" token "abc" token <|> just parse list>array
-] unit-test 
+] unit-test
 
 ! Testing <@
 { { T{ parse-result f 48 T{ slice f 1 5 "01234" } } } } [
-  "01234" [ digit? ] satisfy parse list>array 
+  "01234" [ digit? ] satisfy parse list>array
 ] unit-test
 
 { { T{ parse-result f 0 T{ slice f 1 5 "01234" } } } } [
-  "01234" [ digit? ] satisfy [ digit> ] <@ parse list>array 
+  "01234" [ digit? ] satisfy [ digit> ] <@ parse list>array
 ] unit-test
 
 ! Testing some
@@ -75,11 +75,11 @@ IN: parser-combinators.tests
 ] unit-test
 
 [
-  "begin1" "begin" token some parse 
-] must-fail 
+  "begin1" "begin" token some parse
+] must-fail
 
 { "begin" } [
-  "begin" "begin" token some parse 
+  "begin" "begin" token some parse
 ] unit-test
 
 ! <& parser and &> parser
@@ -100,7 +100,7 @@ IN: parser-combinators.tests
   "1234" "1" token <*> parse list>array
 ] unit-test
 
-{ 
+{
   {
     T{ parse-result f { "1" "1" "1" "1" } T{ slice f 4 7 "1111234" }  }
     T{ parse-result f { "1" "1" "1" } T{ slice f 3 7 "1111234" } }
@@ -113,7 +113,7 @@ IN: parser-combinators.tests
   "1111234" "1" token <*> parse list>array
 ] unit-test
 
-{ 
+{
   {
     T{ parse-result f { "1111" } T{ slice f 4 7 "1111234" } }
     T{ parse-result f { "111" } T{ slice f 3 7 "1111234" } }
@@ -134,7 +134,7 @@ IN: parser-combinators.tests
   "1234" "1" token <+> parse list>array
 ] unit-test
 
-{ 
+{
   {
     T{ parse-result f { "1" "1" "1" "1" } T{ slice f 4 7 "1111234" } }
     T{ parse-result f { "1" "1" "1" }  T{ slice f 3 7 "1111234" } }