syntax: fix docs for :

diff --git a/basis/math/vectors/simd/functor/functor.factor b/basis/math/vectors/simd/functor/functor.factor
index 2ddaf2b8a5205a4c261dfc1e5ac23d66975c1167..514c2f62aa2b94f0c5523f1d0bee5229a3fbd55e 100644 (file)
--- a/basis/math/vectors/simd/functor/functor.factor
+++ b/basis/math/vectors/simd/functor/functor.factor
@@ -325,7 +325,7 @@ FUNCTOR: define-simd-256 ( T -- )
 
 N            [ 32 T c:heap-size /i ]
 
-N/2          [ N 2 / ]
+N/2          [ N 2 /i ]
 A/2          IS ${T}-${N/2}
 A/2-boa      IS ${A/2}-boa
 A/2-with     IS ${A/2}-with

diff --git a/core/syntax/syntax-docs.factor b/core/syntax/syntax-docs.factor
index df78083f30cde7c8f6adac105fcc86a9eda11d14..2a8bf53e64bfbf23e092d08d3ddbf827a6513f67 100644 (file)
--- a/core/syntax/syntax-docs.factor
+++ b/core/syntax/syntax-docs.factor
@@ -371,7 +371,7 @@ HELP: POSTPONE:
 HELP: :
 { $syntax ": word ( stack -- effect ) definition... ;" }
 { $values { "word" "a new word to define" } { "definition" "a word definition" } }
-{ $description "Defines a word with the given stack effect in the current vocabulary. The stack effect is optional for words which only push literals on the stack." }
+{ $description "Defines a word with the given stack effect in the current vocabulary." }
 { $examples { $code ": ask-name ( -- name )\n    \"What is your name? \" write readln ;\n: greet ( name -- )\n    \"Greetings, \" write print ;\n: friend ( -- )\n    ask-name greet ;" } } ;
 
 { POSTPONE: : POSTPONE: ; define } related-words