Load fixes

db4
Slava Pestov 2008-04-04 06:28:51 -05:00
parent 5cc78f5b39
commit c8588a37ee
2 changed files with 0 additions and 19 deletions

View File

@ -4,12 +4,6 @@ IN: prettyprint.config
ABOUT: "prettyprint-variables"
HELP: indent
{ $var-description "The prettyprinter's current indent level." } ;
HELP: pprinter-stack
{ $var-description "A stack of " { $link block } " objects currently being constructed by the prettyprinter." } ;
HELP: tab-size
{ $var-description "Prettyprinter tab size. Indent nesting is always a multiple of the tab size." } ;

View File

@ -5,18 +5,9 @@ strings definitions ;
HELP: position
{ $var-description "The prettyprinter's current character position." } ;
HELP: last-newline
{ $var-description "The character position of the last newline output by the prettyprinter." } ;
HELP: recursion-check
{ $var-description "The current nesting of collections being output by the prettyprinter, used to detect circularity and prevent infinite recursion." } ;
HELP: line-count
{ $var-description "The number of lines output by the prettyprinter so far, used for line limiting (see " { $link line-limit } ")." } ;
HELP: end-printing
{ $var-description "A continuation captured by " { $link do-pprint } " that breaks out of the printer." } ;
HELP: line-limit?
{ $values { "?" "a boolean" } }
{ $description "Tests if the line number limit has been reached, and thus if prettyprinting should stop." } ;
@ -90,10 +81,6 @@ HELP: construct-section
{ $values { "style" hashtable } { "length" integer } { "section" section } }
{ $description "Creates a new section with the given length starting from " { $link position } ", advancing " { $link position } "." } ;
HELP: change-indent
{ $values { "section" section } { "n" integer } }
{ $description "If the section requests indentation, adds " { $snippet "n" } " to the indent level, otherwise does nothing." } ;
HELP: <indent
{ $values { "section" section } }
{ $description "Increases indentation by the " { $link tab-size } " if requested by the section." } ;