From 39d21af5ff199d97ebb5f33aef23f40e2f666bf9 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Wed, 26 Jan 2022 08:55:30 -0800 Subject: [PATCH] prettyprint.config: adding some docs for has-limits? --- basis/prettyprint/config/config-docs.factor | 19 +++++++++++++++++-- 1 file changed, 17 insertions(+), 2 deletions(-) diff --git a/basis/prettyprint/config/config-docs.factor b/basis/prettyprint/config/config-docs.factor index a263ef3cc3..90a16a898b 100644 --- a/basis/prettyprint/config/config-docs.factor +++ b/basis/prettyprint/config/config-docs.factor @@ -32,10 +32,25 @@ HELP: boa-tuples? HELP: c-object-pointers? { $var-description "Toggles whether C objects such as structs and direct arrays only print their underlying address. If this flag isn't set, C objects will attempt to print their contents. If a C object points to invalid memory, it will display only its address regardless." } ; -HELP: with-short-limits +HELP: has-limits? +{ $var-description "Used to indicate that prettyprint limits have been set." } ; + +HELP: (with-short-limits) { $values { "quot" quotation } } { $description "Calls a quotation in a new dynamic scope with prettyprinter limits set to produce a single line of output." } ; -HELP: without-limits +HELP: with-short-limits +{ $values { "quot" quotation } } +{ $description "Calls a quotation in a new dynamic scope with prettyprinter limits set to produce a single line of output, if " { $link has-limits? } " is not set." } ; + +{ with-short-limits (with-short-limits) } related-words + +HELP: (without-limits) { $values { "quot" quotation } } { $description "Calls a quotation in a new dynamic scope with prettyprinter limits set to produce unlimited output." } ; + +HELP: without-limits +{ $values { "quot" quotation } } +{ $description "Calls a quotation in a new dynamic scope with prettyprinter limits set to produce unlimited output, if " { $link has-limits? } " is not set." } ; + +{ without-limits (without-limits) } related-words -- 2.34.1