3 Text block: text and string utilities
(require text-block/text) | package: text-block |
procedure
(string-reverse str) → string?
str : string?
> (string-reverse "hello") "olleh"
procedure
(text->lines text ncol [#:align align]) → (listof string?)
text : string? ncol : exact-integer? align : (one-of 'none 'left 'center 'right 'justified) = 'none
> (define lorem-ipsum (string-append "Lorem ipsum dolor sit amet, consectetur adipiscing elit, " "sed do eiusmod tempor incididunt ut labore et dolore magna " "aliqua. Ut enim ad minim veniam, quis nostrud exercitation")) > (text->lines lorem-ipsum 43 #:align 'none)
'("Lorem ipsum dolor sit amet, consectetur"
"adipiscing elit, sed do eiusmod tempor"
"incididunt ut labore et dolore magna"
"aliqua. Ut enim ad minim veniam, quis"
"nostrud exercitation")
> (text->lines lorem-ipsum 43 #:align 'justified)
'("Lorem ipsum dolor sit amet, consectetur"
"adipiscing elit, sed do eiusmod tempor"
"incididunt ut labore et dolore magna"
"aliqua. Ut enim ad minim veniam, quis"
"nostrud exercitation ")
> (text->lines lorem-ipsum 70 #:align 'justified)
'("Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed do"
"eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad"
"minim veniam, quis nostrud exercitation ")
> (text->lines lorem-ipsum 43 #:align 'center)
'(" Lorem ipsum dolor sit amet, consectetur "
" adipiscing elit, sed do eiusmod tempor "
" incididunt ut labore et dolore magna "
" aliqua. Ut enim ad minim veniam, quis "
" nostrud exercitation ")
> (text->lines lorem-ipsum 43 #:align 'right)
'(" Lorem ipsum dolor sit amet, consectetur"
" adipiscing elit, sed do eiusmod tempor"
" incididunt ut labore et dolore magna"
" aliqua. Ut enim ad minim veniam, quis"
" nostrud exercitation")