factor: fix some whitespace

diff --git a/basis/peg/ebnf/ebnf-docs.factor b/basis/peg/ebnf/ebnf-docs.factor
index 664c483097bec5e81004b2fa2aa23a13a771d428..9411f2d378ff770126cfd6f142f8081c6b81648c 100644 (file)
--- a/basis/peg/ebnf/ebnf-docs.factor
+++ b/basis/peg/ebnf/ebnf-docs.factor
@@ -347,9 +347,8 @@ ARTICLE: "peg.ebnf.foreign-rules" "EBNF Foreign Rules"
        "EBNF: parse-abc [=["
        "abc = <foreign a-token> 'b' 'c'"
        "]=]"
-   }
-}
-;
+    }
+} ;
 
 ARTICLE: "peg.ebnf.tokenizers" "EBNF Tokenizers"
 "It is possible to override the tokenizer in an EBNF defined parser. "

diff --git a/core/syntax/syntax-docs.factor b/core/syntax/syntax-docs.factor
index 22483d44923c1bb8cd3f5222cc13ba46ef1694a1..ea133d860c31c27ca8016ba0ac43ce96cb19d8c0 100644 (file)
--- a/core/syntax/syntax-docs.factor
+++ b/core/syntax/syntax-docs.factor
@@ -653,7 +653,7 @@ HELP: FROM:
   { $code "USING: vocabs.parser binary-search ;" "... search ..." }
   "Because " { $link POSTPONE: FROM: } " takes precedence over a " { $link POSTPONE: USING: } ", the ambiguity can be resolved explicitly. Suppose you wanted the " { $vocab-link "binary-search" } " vocabulary's " { $snippet "search" } " word:"
   { $code "USING: vocabs.parser binary-search ;" "FROM: binary-search => search ;" "... search ..." }
- } ;
+} ;
 
 HELP: EXCLUDE:
 { $syntax "EXCLUDE: vocab => words ... ;" }

diff --git a/extra/sequences/extras/extras-docs.factor b/extra/sequences/extras/extras-docs.factor
index c9944b4dd4a7ac35e4c785ede2b4971e4aacaf3d..df64ad41d411c266dd8f408787c9c34c87086804 100644 (file)
--- a/extra/sequences/extras/extras-docs.factor
+++ b/extra/sequences/extras/extras-docs.factor
@@ -227,7 +227,7 @@ HELP: start-all
                "\"ABAABA\" \"ABA\" start-all ."
       "{ 0 3 }"
     }
- } ;
+} ;
 
 HELP: start-all*
 { $values

diff --git a/extra/yaml/config/config-docs.factor b/extra/yaml/config/config-docs.factor
index e668a561d1de2410d8d1395f276da639a827748a..2cb7a6bc1c62fd7d7ab091188c7e369e88cb3c64 100644 (file)
--- a/extra/yaml/config/config-docs.factor
+++ b/extra/yaml/config/config-docs.factor
@@ -13,7 +13,6 @@ HELP: +libyaml-default+
   emitter-width
 } ;
 
-
 HELP: emitter-canonical
 { $var-description "If set, " { $link yaml_emitter_set_canonical } " is called with the value of this variable at the beginning of each document." } ;
 
@@ -66,10 +65,8 @@ ARTICLE: "yaml-output" "YAML serialization control"
 ;
 
 HELP: implicit-tags
-{ $var-description "When this is set, tags are omitted during serialization when it safe to do so. For example, 42 can be safely serialized as \"42\", but \"42\" must be serialized as \"'42'\" or \"\"42\"\" or \"!!str 42\". This uses the "
-{ $snippet "implicit" } " parameter of "
-{ $link yaml_scalar_event_initialize } ", " { $link yaml_sequence_start_event_initialize } " and " { $link yaml_mapping_start_event_initialize } "."
- } ;
+{ $var-description "When this is set, tags are omitted during serialization when it safe to do so. For example, 42 can be safely serialized as \"42\", but \"42\" must be serialized as \"'42'\" or \"\"42\"\" or \"!!str 42\". This uses the " { $snippet "implicit" } " parameter of " { $link yaml_scalar_event_initialize } ", " { $link yaml_sequence_start_event_initialize } " and " { $link yaml_mapping_start_event_initialize } "."
+} ;
 
 HELP: implicit-start
 { $var-description "The \""

diff --git a/extra/yaml/yaml-docs.factor b/extra/yaml/yaml-docs.factor
index 3558b33fb7adafa2b708f0ee4bc40f5ba8254db8..9b473b909c734f096cf289a2dc6ac150ac9ff749 100644 (file)
--- a/extra/yaml/yaml-docs.factor
+++ b/extra/yaml/yaml-docs.factor
@@ -216,7 +216,7 @@ ARTICLE: "yaml" "YAML serialization"
 - 42.0
 - 4.2e1\" yaml> ."
 "{ t f \"42\" \"42\" 42 42 42 42.0 42.0 }"
- }
+}
 { $heading "Output -- human readable" }
   { $unchecked-example "USING: yaml yaml.config ;"
 "t implicit-tags set

diff --git a/extra/yaml/yaml-tests.factor b/extra/yaml/yaml-tests.factor
index b7757361b9662549855e8983dcdb76820ef86932..5547dfbcef94e61dcda29c533d58f5437742a794 100644 (file)
--- a/extra/yaml/yaml-tests.factor
+++ b/extra/yaml/yaml-tests.factor
@@ -799,10 +799,10 @@ t emitter-canonical [
   { emitter-width 32 }
 }
 [
-{ "-     - a string that can be split
+  { "-     - a string that can be split
             in lots of places
 "
- } [ { { "a string that can be split in lots of places" } } >yaml ] unit-test
+  } [ { { "a string that can be split in lots of places" } } >yaml ] unit-test
 ] with-variables
 
 ! line break