Fix typos

slava 2006-06-06 03:28:59 +00:00
parent 3409004602
commit a0a9d2f6c3
2 changed files with 6 additions and 10 deletions

View File

@ -104,7 +104,7 @@ HELP: <=> "( obj1 obj2 -- n )"
HELP: clone "( obj -- cloned )" HELP: clone "( obj -- cloned )"
{ $values { "obj" "an object" } { "cloned" "a new object" } } { $values { "obj" "an object" } { "cloned" "a new object" } }
{ $contract "Outputs a new object equal to the given object. This is not guaranteed to actually copy the object; it does nothing with immutable objects, and does not copy words either. However, sequences and tuples can be cloned to obtain a shallow copy of the original." ; { $contract "Outputs a new object equal to the given object. This is not guaranteed to actually copy the object; it does nothing with immutable objects, and does not copy words either. However, sequences and tuples can be cloned to obtain a shallow copy of the original." } ;
HELP: set-boot "( quot -- )" HELP: set-boot "( quot -- )"
{ $values { "quot" "a quotation" } } { $values { "quot" "a quotation" } }

View File

@ -13,19 +13,15 @@ HELP: inline ""
HELP: foldable "" HELP: foldable ""
{ $description { $description
"Declares that the most recently defined word can be evaluated at compile-time. Foldable words are always " { $link POSTPONE: } "." "Declares that the most recently defined word may be evaluated at compile-time if all inputs are literal. Foldable words must satisfy a very strong contract:"
$terpri
"Foldable words are evaluated at compile time if all inputs are literal. Foldable words must satisfy a very strong contract:"
{ $list { $list
{ "foldable words must not have any observable side effects," } "foldable words must not have any observable side effects,"
{ "foldable words must halt - for example, a word computing a series until it coverges should not be foldable, since compilation will not halt in the event the series does not converge." } "foldable words must halt - for example, a word computing a series until it coverges should not be foldable, since compilation will not halt in the event the series does not converge."
{ "both inputs and outputs of foldable words must be immutable." } "both inputs and outputs of foldable words must be immutable."
} }
"The last restriction ensures that words such as " { $link clone } " do not satisfy the foldable word contract. Indeed, " { $link clone } " will output a mutable object if its input is mutable, and so it is undesirable to evaluate it at compile-time, since doing so would give incorrect semantics for code that clones mutable objects and proceeds to mutate them." "The last restriction ensures that words such as " { $link clone } " do not satisfy the foldable word contract. Indeed, " { $link clone } " will output a mutable object if its input is mutable, and so it is undesirable to evaluate it at compile-time, since doing so would give incorrect semantics for code that clones mutable objects and proceeds to mutate them."
} }
{ $examples { $examples "Most operations on numbers are foldable. For example, " { $snippet "2 2 +" } " compiles to a literal 4, since " { $link + } " is declared foldable." } ;
"Most operations on numbers are foldable. For example, " { $snippet "2 2 +" } " compiles to a literal 4, since " { $link + } " is declared foldable."
} ;
HELP: t "( -- t )" HELP: t "( -- t )"
{ $values { "t" "the canonical truth value" } } { $values { "t" "the canonical truth value" } }