From 5b278223df4a182c5f9c4696069fdff0d1927502 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Tue, 21 Jun 2016 10:48:46 -0700 Subject: [PATCH] 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 | 4 ++-- benchmarks/benchmark/raytracer-simd/raytracer-simd.factor | 4 ++-- benchmarks/benchmark/raytracer/raytracer.factor | 2 +- collections/persistent/hashtables/config/config.factor | 2 +- frameworks/game/input/demos/joysticks/joysticks.factor | 2 +- libs/math/floats/env/env.factor | 2 +- tools/codebook/codebook.factor | 2 +- webapps/webapps/mason/dashboard/dashboard.factor | 4 ++-- webapps/webapps/mason/grids/grids.factor | 4 ++-- 9 files changed, 13 insertions(+), 13 deletions(-) diff --git a/benchmarks/benchmark/fasta/fasta.factor b/benchmarks/benchmark/fasta/fasta.factor index fa7271888e..a5c286dd53 100644 --- a/benchmarks/benchmark/fasta/fasta.factor +++ b/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 ] diff --git a/benchmarks/benchmark/raytracer-simd/raytracer-simd.factor b/benchmarks/benchmark/raytracer-simd/raytracer-simd.factor index b590bcc3ea..315f65fd81 100644 --- a/benchmarks/benchmark/raytracer-simd/raytracer-simd.factor +++ b/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 * ; diff --git a/benchmarks/benchmark/raytracer/raytracer.factor b/benchmarks/benchmark/raytracer/raytracer.factor index 70aecc1973..376df2b76f 100644 --- a/benchmarks/benchmark/raytracer/raytracer.factor +++ b/benchmarks/benchmark/raytracer/raytracer.factor @@ -16,7 +16,7 @@ CONSTANT: light -0.2672612419124244 -0.8017837257372732 0.5345224838248488 - } + } ; CONSTANT: oversampling 4 ; diff --git a/collections/persistent/hashtables/config/config.factor b/collections/persistent/hashtables/config/config.factor index b85ad29b44..191970b13a 100644 --- a/collections/persistent/hashtables/config/config.factor +++ b/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 diff --git a/frameworks/game/input/demos/joysticks/joysticks.factor b/frameworks/game/input/demos/joysticks/joysticks.factor index ed1b30cadd..a1743d00f3 100644 --- a/frameworks/game/input/demos/joysticks/joysticks.factor +++ b/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 } } } - } + } ; : ( color -- indicator ) indicator-polygon ; diff --git a/libs/math/floats/env/env.factor b/libs/math/floats/env/env.factor index 3be9e3ab47..abbca416c0 100644 --- a/libs/math/floats/env/env.factor +++ b/libs/math/floats/env/env.factor @@ -26,7 +26,7 @@ CONSTANT: all-fp-exceptions +fp-underflow+ +fp-zero-divide+ +fp-inexact+ - } + } ; SINGLETONS: +round-nearest+ diff --git a/tools/codebook/codebook.factor b/tools/codebook/codebook.factor index 18a2f49751..6c2e571151 100644 --- a/tools/codebook/codebook.factor +++ b/tools/codebook/codebook.factor @@ -34,7 +34,7 @@ CONSTANT: codebook-style { MARKUP [ XML-CHUNK[[ <-> ]] ] } { OPERATOR [ XML-CHUNK[[ <-> ]] ] } [ drop ] - } + } ; : first-line ( filename encoding -- line ) [ readln ] with-file-reader ; diff --git a/webapps/webapps/mason/dashboard/dashboard.factor b/webapps/webapps/mason/dashboard/dashboard.factor index fb18b6fc19..c644805d74 100644 --- a/webapps/webapps/mason/dashboard/dashboard.factor +++ b/webapps/webapps/mason/dashboard/dashboard.factor @@ -6,10 +6,10 @@ webapps.mason.utils ; IN: webapps.mason.downloads CONSTANT: CRASHED -XML-CHUNK[[ CRASHED ]] +XML-CHUNK[[ CRASHED ]] ; CONSTANT: BROKEN -XML-CHUNK[[ BROKEN ]] +XML-CHUNK[[ BROKEN ]] ; : builder-status ( builder -- status/f ) { diff --git a/webapps/webapps/mason/grids/grids.factor b/webapps/webapps/mason/grids/grids.factor index 1fec58ed61..b1420491b6 100644 --- a/webapps/webapps/mason/grids/grids.factor +++ b/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[[ <-> ]] ] map ;