factor: fix some missing semi-colons found with:

vocab-roots get [ vocabs-from reject-some-paths ] map concat
{
    "specialized-arrays" "specialized-vectors"
    "math.blas.matrices" "math.blas.vectors" "math.vectors.simd"
    "math.vectors.simd.cords" "game.debug" "gpu.util" "gpu.effects.blur"
    "gpu.effects.step" "model-viewer" "terrain.shaders" "spheres"
    "bunny.cel-shaded" "bunny.outlined"
} diff
[ modern-source-path ] map
[
    dup { [ uppercase-colon-literal? ] [ tag>> "CONSTANT" sequence= ] [ closing-tag>> not ] [ payload>> [ line-comment-literal? ] any? not ] } 1&&
    [
        " ;" >>closing-tag

    ] when
] rewrite-paths

benchmarks/benchmark/fasta/fasta.factor

@@ -35,7 +35,7 @@ CONSTANT: IUB
         { char: V 0.02 }
         { char: W 0.02 }
         { char: Y 0.02 }
-    }
+    } ;
 
 CONSTANT: homo-sapiens
     {
@@ -43,7 +43,7 @@ CONSTANT: homo-sapiens
         { char: c 0.1979883004921 }
         { char: g 0.1975473066391 }
         { char: t 0.3015094502008 }
-    }
+    } ;
 
 TYPED: make-cumulative ( freq -- chars: byte-array floats: double-array )
     [ keys >byte-array ]

benchmarks/benchmark/raytracer-simd/raytracer-simd.factor

@@ -18,7 +18,7 @@ CONSTANT: light
         -0.8017837257372732
         0.5345224838248488
         0.0
-    }
+    } ;
 
 CONSTANT: oversampling 4 ;
 
@@ -122,7 +122,7 @@ CONSTANT: create-offsets
         double-4{ 1.0 1.0 -1.0 0.0 }
         double-4{ -1.0 1.0 1.0 0.0 }
         double-4{ 1.0 1.0 1.0 0.0 }
-    }
+    } ;
 
 : create-bound ( c r -- sphere ) 3.0 * <sphere> ;
 

benchmarks/benchmark/raytracer/raytracer.factor

@@ -16,7 +16,7 @@ CONSTANT: light
         -0.2672612419124244
         -0.8017837257372732
         0.5345224838248488
-    }
+    } ;
 
 CONSTANT: oversampling 4 ;
 

collections/persistent/hashtables/config/config.factor

@@ -3,6 +3,6 @@
 USING: layouts kernel parser math math.bitwise sequences ;
 IN: persistent.hashtables.config
 
-CONSTANT: radix-bits $[ cell 4 = 4 5 ? ]
+CONSTANT: radix-bits $[ cell 4 = 4 5 ? ] ;
 : radix-mask ( -- n ) radix-bits on-bits ; foldable
 : full-bitmap-mask ( -- n ) radix-bits 2^ on-bits ; inline

frameworks/game/input/demos/joysticks/joysticks.factor

@@ -32,7 +32,7 @@ CONSTANT: pov-polygons
         { pov-down-left  { { 67 90 } { 60 90 } { 60 83 } } }
         { pov-left       { { 65 70 } { 60 75 } { 65 80 } } }
         { pov-up-left    { { 67 60 } { 60 60 } { 60 67 } } }
-    }
+    } ;
 
 : <indicator-gadget> ( color -- indicator )
     indicator-polygon <polygon-gadget> ;

libs/math/floats/env/env.factor

@@ -26,7 +26,7 @@ CONSTANT: all-fp-exceptions
         +fp-underflow+
         +fp-zero-divide+
         +fp-inexact+
-    }
+    } ;
 
 SINGLETONS:
     +round-nearest+

tools/codebook/codebook.factor

@@ -34,7 +34,7 @@ CONSTANT: codebook-style
         { MARKUP   [ XML-CHUNK[[ <b><font color="#333333"><-></font></b> ]] ] }
         { OPERATOR [ XML-CHUNK[[ <b><font color="#111111"><-></font></b> ]] ] }
         [ drop ]
-    }
+    } ;
 
 : first-line ( filename encoding -- line )
     [ readln ] with-file-reader ;

webapps/webapps/mason/dashboard/dashboard.factor

@@ -6,10 +6,10 @@ webapps.mason.utils ;
 IN: webapps.mason.downloads
 
 CONSTANT: CRASHED
-XML-CHUNK[[ <span style="background-color: yellow;">CRASHED</span> ]]
+XML-CHUNK[[ <span style="background-color: yellow;">CRASHED</span> ]] ;
 
 CONSTANT: BROKEN
-XML-CHUNK[[ <span style="background-color: red; color: white;">BROKEN</span> ]]
+XML-CHUNK[[ <span style="background-color: red; color: white;">BROKEN</span> ]] ;
 
 : builder-status ( builder -- status/f )
     {

webapps/webapps/mason/grids/grids.factor

@@ -18,13 +18,13 @@ CONSTANT: oses
     { "windows" "Windows" }
     { "macosx" "Mac OS X" }
     { "linux" "Linux" }
-}
+} ;
 
 CONSTANT: cpus
 {
     { "x86.32" "x86" }
     { "x86.64" "x86-64" }
-}
+} ;
 
 : render-grid-header ( -- xml )
     oses values [ XML-CHUNK[[ <th align='center' scope='col'><-></th> ]] ] map ;