~jaro/balkon

ref: 95140978d0de7440db55a925a664cde01810d601 balkon/test/Data/Text/ParagraphLayout/ParagraphData.hs -rw-r--r-- 884 bytes
95140978 — Jaro Calculate "normal" line height and pen position. 1 year, 8 months ago 
                                                                                
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
module Data.Text.ParagraphLayout.ParagraphData
    (czechHelloParagraph
    ,emptyParagraph
    ,emptySpanParagraph
    ,mixedLanguageLTRParagraph
    ,mixedScriptSerbianParagraph
    )
where

import Data.Text.ParagraphLayout.ParagraphConstruction
import Data.Text.ParagraphLayout.Plain (Paragraph, ParagraphOptions)

emptyParagraph :: ParagraphOptions -> Paragraph
emptyParagraph = "" |<>| ""

emptySpanParagraph :: ParagraphOptions -> Paragraph
emptySpanParagraph = "" |< "en"~"" >| ""

czechHelloParagraph :: ParagraphOptions -> Paragraph
czechHelloParagraph = "" |< "cs"~"Ahoj, světe!" >| ""

mixedScriptSerbianParagraph :: ParagraphOptions -> Paragraph
mixedScriptSerbianParagraph = "" |< "sr"~"Vikipedija (Википедија)" >| ""

mixedLanguageLTRParagraph :: ParagraphOptions -> Paragraph
mixedLanguageLTRParagraph = "Tak " |< "cs"~"jsem tady, " >|< "ja"~"世界!" >| ""