2006-03-25 01:06:52 -05:00
IN: compiler
2006-06-05 22:04:49 -04:00
USING: assembler help words ;
2006-03-25 01:06:52 -05:00
2006-08-16 21:55:53 -04:00
HELP: compiled? ( word -- ? )
2006-03-25 03:16:25 -05:00
{ $values { "word" "a word" } }
2006-08-16 21:55:53 -04:00
{ $description "Tests if a word is compiled." } ;
2006-03-25 03:16:25 -05:00
2006-08-16 21:55:53 -04:00
HELP: compile
2006-03-25 01:06:52 -05:00
{ $values { "word" "a word" } }
{ $description "Compiles a word together with any uncompiled dependencies. Does nothing if the word is already compiled." }
2006-06-06 15:54:07 -04:00
{ $errors "If compilation fails, this word can throw an error. In particular, if the word's stack effect cannot be inferred, this word will throw an error. The related " { $link try-compile } " word logs errors and returns rather than throwing." } ;
2006-03-25 01:06:52 -05:00
2006-08-16 21:55:53 -04:00
HELP: try-compile
2006-03-25 01:06:52 -05:00
{ $values { "word" "a word" } }
{ $description "Compiles a word together with any uncompiled dependencies. Does nothing if the word is already compiled." }
{ $errors "If compilation fails, this word logs the error to the default stream and returns normally." } ;
2006-08-16 21:55:53 -04:00
HELP: compile-vocabs
2006-03-25 01:06:52 -05:00
{ $values { "seq" "a sequence of strings" } }
{ $description "Compiles all words in the vocabularies named by elements of a sequence, skipping compiled words. Compile errors are logged to the default stream." } ;
2006-08-16 21:55:53 -04:00
HELP: compile-all
2006-03-25 01:06:52 -05:00
{ $description "Compile all words in the dictionary which have not already been compiled. Compile errors are logged to the default stream." } ;
2006-08-16 21:55:53 -04:00
HELP: compile-quot
2006-03-25 01:06:52 -05:00
{ $values { "quot" "a quotation" } { "word" "a new, uninterned word" } }
{ $description "Creates a new uninterned word having the given quotation as its definition, and compiles it. The returned word can be passed to " { $link execute } "." }
2006-06-06 15:54:07 -04:00
{ $errors "Throws an error if the stack effect of the quotation cannot be inferred." } ;
2006-03-25 01:06:52 -05:00
2006-08-16 21:55:53 -04:00
HELP: compile-1
2006-03-25 01:06:52 -05:00
{ $values { "quot" "a quotation" } }
{ $description "Compiles and runs a quotation." }
2006-06-06 15:54:07 -04:00
{ $errors "Throws an error if the stack effect of the quotation cannot be inferred." } ;
2006-08-08 01:38:32 -04:00
IN: assembler
2006-08-16 21:55:53 -04:00
HELP: finalize-compile ( xts -- )
2006-08-11 18:23:14 -04:00
{ $values { "xts" "an array of pairs mapping words to XTs" } }
2006-08-16 21:55:53 -04:00
{ $description "Performs relocation, atomically changes the XT of all given words, and on PowerPC, flushes the CPU instruction cache." } ;