O(n) Group characters in a string by equality.
Modulererebase-1.21.2Haskell2010
Data.Text
- 6 types
- 151 values
- Packagererebase-1.21.2
- Exports160
- LanguageHaskell2010
- LicenceMIT
- SourceText.hs
A space efficient, packed, unboxed Unicode text type.
Instances15IsList, Eq, Data, Ord, Read, Show, …
IsList TextDefined in text-2.1.3 · Data.Text · orphanPerforms replacement on invalid scalar values:
Example2 expressions :set -XOverloadedLists['\55555'] :: Text"\65533"
Eq TextDefined in text-2.1.3 · Data.Text · orphanData TextDefined in text-2.1.3 · Data.Text · orphanThis instance preserves data abstraction at the cost of inefficiency. We omit reflection services for the sake of data abstraction.
This instance was created by copying the updated behavior of
Data.Set.Set andData.Map.Data.Map.Map. If you feel a mistake has been made, please feel free to submit improvements.The original discussion is archived here: could we get a Data instance for Data.Text.Text?
The followup discussion that changed the behavior of Set and
Data.Map.Mapis archived here: Proposal: Allow gunfold for Data.Map, ...Ord TextDefined in text-2.1.3 · Data.Text · orphanRead TextDefined in text-2.1.3 · Data.Text · orphanShow TextDefined in text-2.1.3 · Data.Text.Show · orphanIsString TextDefined in text-2.1.3 · Data.Text · orphanPerforms replacement on invalid scalar values:
Example2 expressions :set -XOverloadedStrings"\55555" :: Text"\65533"
Semigroup TextDefined in text-2.1.3 · Data.Text · orphanBeware:
stimeswill crash if the given number does not fit into anInt.Monoid TextDefined in text-2.1.3 · Data.Text · orphanPrintfArg TextDefined in text-2.1.3 · Data.Text · orphanNFData TextDefined in text-2.1.3 · Data.Text · orphanBinary TextDefined in text-2.1.3 · Data.Text · orphanHashable TextDefined in hashable-1.4.7.0 · Data.Hashable.ClassLift TextDefined in text-2.1.3 · Data.Text · orphantype Item Text = CharDefined in text-2.1.3 · Data.Text · orphan
O(n) Concatenate a list of Texts.
O(n) dropWhileEnd p t returns the prefix remaining after
dropping characters that satisfy the predicate p from the end of
t.
Examples:
dropWhileEnd (=='.') "foo...""foo"
O(n) Group characters in a string according to a predicate.
O(n) Return all initial segments of the given Text, shortest first.
O(n) The intercalate function takes a Text and a list of Texts and concatenates the list after interspersing the first argument between each element of the list.
Example:
T.intercalate "NI!" ["We", "seek", "the", "Holy", "Grail"]"WeNI!seekNI!theNI!HolyNI!Grail"
O(n) The intersperse function takes a character and places it between the characters of a Text.
Example:
T.intersperse '.' "SHIELD""S.H.I.E.L.D"
Performs replacement on invalid scalar values.
O(n) The isPrefixOf function takes two Texts and returns True if and only if the first is a prefix of the second.
O(n) The isSuffixOf function takes two Texts and returns True if and only if the first is a suffix of the second.
O(1) Convert a character into a Text. Performs replacement on invalid scalar values.
O(n) Return the suffix of the second string if its prefix matches the entire first string.
Examples:
stripPrefix "foo" "foobar"Just "bar"
stripPrefix "" "baz"Just "baz"
stripPrefix "foo" "quux"Nothing
This is particularly useful with the ViewPatterns extension to
GHC, as follows:
{-# LANGUAGE ViewPatterns #-}
import Data.Text as T
fnordLength :: Text -> Int
fnordLength (stripPrefix "fnord" -> Just suf) = T.length suf
fnordLength _ = -1O(n) Return all final segments of the given Text, longest first.
O(n) The transpose function transposes the rows and columns of its Text argument. Note that this function uses pack, unpack, and the list version of transpose, and is thus not very efficient.
Examples:
transpose ["green","orange"]["go","rr","ea","en","ng","e"]
transpose ["blue","red"]["br","le","ud","e"]
O(n), where n is the length of the result. The unfoldr
function is analogous to the List unfoldr. unfoldr builds a
Text from a seed value. The function takes the element and
returns Nothing if it is done producing the Text, otherwise
Just (a,b). In this case, a is the next Char in the
string, and b is the seed value for further production.
Performs replacement on invalid scalar values.
O(n) Joins lines, after appending a terminating newline to each.
O(n) Joins words using single space characters.
The mapAccumR function behaves like a combination of map and a strict foldr; it applies a function to each element of a Text, passing an accumulating parameter from right to left, and returning a final value of this accumulator together with the new Text. Performs replacement on invalid scalar values.
O(n) A strict version of foldl1.
O(n) span, applied to a predicate p and text t, returns
a pair whose first element is the longest prefix (possibly empty)
of t of elements that satisfy p, and whose second is the
remainder of the text.
T.span (=='0') "000AB"("000","AB")
Write a string to the end of a file.
Read all user input on stdin as a single string.
Read a single line of user input from stdin.
The interact function takes a function of type Text -> Text
as its argument. The entire input from the standard input device is
passed to this function as its argument, and the resulting string
is output on the standard output device.
Write a string to stdout.
Write a string to stdout, followed by a newline.
The readFile function reads a file and returns the contents of the file as a string. The entire file is read strictly, as with getContents.
Beware that this function (similarly to readFile) is locale-dependent. Unexpected system locale may cause your application to read corrupted data or throw runtime exceptions about "invalid argument (invalid byte sequence)" or "invalid argument (invalid character)". This is also slow, because GHC first converts an entire input to UTF-32, which is afterwards converted to UTF-8.
If your data is UTF-8, using decodeUtf8 . readFile is a much faster and safer alternative.
Write a string to a file. The file is truncated to zero length before writing begins.
O(n) Convert a string to lower case, using simple case conversion.
The result string may be longer than the input string. For instance, "İ" (Latin capital letter I with dot above, U+0130) maps to the sequence "i" (Latin small letter i, U+0069) followed by " ̇" (combining dot above, U+0307).
O(n) Convert a string to title case, using simple case conversion.
The first letter (as determined by isLetter) of the input is converted to title case, as is every subsequent letter that immediately follows a non-letter. Every letter that immediately follows another letter is converted to lower case.
This function is not idempotent.
Consider lower-case letter ʼn (U+0149 LATIN SMALL LETTER N PRECEDED BY APOSTROPHE).
Then T.toTitle "ʼn" = "ʼN": the first (and the only) letter of the input
is converted to title case, becoming two letters.
Now ʼ (U+02BC MODIFIER LETTER APOSTROPHE) is a modifier letter
and as such is recognised as a letter by isLetter,
so T.toTitle "ʼN" = "'n".
The result string may be longer than the input string. For example, the Latin small ligature fl (U+FB02) is converted to the sequence Latin capital letter F (U+0046) followed by Latin small letter l (U+006C).
Note: this function does not take language or culture specific rules into account. For instance, in English, different style guides disagree on whether the book name "The Hill of the Red Fox" is correctly title cased—but this function will capitalize every word.
O(n) Convert a string to upper case, using simple case conversion.
The result string may be longer than the input string. For instance, the German "ß" (eszett, U+00DF) maps to the two-letter sequence "SS".
O(1) The empty Text.
O(n) A strict version of foldl.
O(n) foldr, applied to a binary operator, a starting value (typically the right-identity of the operator), and a Text, reduces the Text using the binary operator, from right to left.
If the binary operator is strict in its second argument, use foldr' instead.
foldr is lazy like foldr for lists: evaluation actually traverses the Text from left to right, only as far as it needs to.
For example, head can be defined with O(1) complexity using foldr:
head :: Text -> Char
head = foldr const (error "head empty")
Searches from left to right with short-circuiting behavior can also be defined using foldr (e.g., any, all, find, elem).
O(n) Returns the number of characters in a Text.
O(1) Tests whether a Text is empty or not.
O(n) Text index (subscript) operator, starting from 0.
Convert a value to Text.
O(n) Convert a null-terminated modified UTF-8 (but with a standard UTF-8 representation of characters from supplementary planes) string to a Text. Counterpart to unpackCStringUtf8#. No validation is performed, malformed input can lead to memory access violation.
Decode a ByteString containing UTF-8 encoded text.
If the input contains any invalid UTF-8 data, the relevant exception will be returned, otherwise the decoded text.
Encode text to a ByteString Builder using UTF-8 encoding.
Type synonym for the strict flavour of Text.
O(n) Like unfoldr, unfoldrN builds a Text from a seed value. However, the length of the result should be limited by the first argument to unfoldrN. This function is more efficient than unfoldr when the maximum length of the result is known and correct, otherwise its performance is similar to unfoldr. Performs replacement on invalid scalar values.
O(n) Adds a character to the front of a Text. This function
is more costly than its List counterpart because it requires
copying a new array. Performs replacement on
invalid scalar values.
O(n) A monadic version of foldl'.
O(n) Adds a character to the end of a Text. This copies the entire array in the process. Performs replacement on invalid scalar values.
O(n) Convert a null-terminated ASCII string to a Text. Counterpart to unpackCString#. No validation is performed, malformed input can lead to memory access violation.
splitOn :: HasCallStack=> TextString to split on. If this string is empty, an error will occur.
-> TextInput text.
-> [Text]
O(m+n) Break a Text into pieces separated by the first Text argument (which cannot be empty), consuming the delimiter. An empty delimiter is invalid, and will cause an error to be raised.
Examples:
splitOn "\r\n" "a\r\nb\r\nd\r\ne"["a","b","d","e"]
splitOn "aaa" "aaaXaaaXaaaXaaa"["","X","X","X",""]
splitOn "x" "x"["",""]
and
intercalate s . splitOn s == id
splitOn (singleton c) == split (==c)(Note: the string s to split on above cannot be empty.)
In (unlikely) bad cases, this function's time complexity degrades towards O(n*m).
O(n+m) Find the first instance of needle (which must be
non-null) in haystack. The first element of the returned tuple
is the prefix of haystack before needle is matched. The second
is the remainder of haystack, starting with the match.
Examples:
breakOn "::" "a::b::c"("a","::b::c")
breakOn "/" "foobar"("foobar","")
Laws:
append prefix match == haystack
where (prefix, match) = breakOn needle haystackIf you need to break a string by a substring repeatedly (e.g. you want to break on every instance of a substring), use breakOnAll instead, as it has lower startup overhead.
In (unlikely) bad cases, this function's time complexity degrades towards O(n*m).
breakOnAll :: HasCallStack=> Textneedleto search for-> Texthaystackin which to search-> [(Text, Text)]
O(n+m) Find all non-overlapping instances of needle in
haystack. Each element of the returned list consists of a pair:
The entire string prior to the kth match (i.e. the prefix)
The kth match, followed by the remainder of the string
Examples:
breakOnAll "::" ""[]
breakOnAll "/" "a/b/c/"[("a","/b/c/"),("a/b","/c/"),("a/b/c","/")]
In (unlikely) bad cases, this function's time complexity degrades towards O(n*m).
The needle parameter may not be empty.
O(n+m) Similar to breakOn, but searches from the end of the string.
The first element of the returned tuple is the prefix of haystack
up to and including the last match of needle. The second is the
remainder of haystack, following the match.
breakOnEnd "::" "a::b::c"("a::b::","c")
O(n) Center a string to the given length, using the specified fill character on either side. Performs replacement on invalid scalar values.
Examples:
center 8 'x' "HS""xxxHSxxx"
O(n) Splits a Text into components of length k. The last
element may be shorter than the other chunks, depending on the
length of the input. Examples:
chunksOf 3 "foobarbaz"["foo","bar","baz"]
chunksOf 4 "haskell.org"["hask","ell.","org"]
O(n) Find the longest non-empty common prefix of two strings and return it, along with the suffixes of each string at which they no longer match.
If the strings do not have a common prefix or either one is empty, this function returns Nothing.
Examples:
commonPrefixes "foobar" "fooquux"Just ("foo","bar","quux")
commonPrefixes "veeble" "fetzer"Nothing
commonPrefixes "" "baz"Nothing
O(min(n,c)) Compare the count of characters in a Text to a number.
compareLength t c = compare (length t) c
This function gives the same answer as comparing against the result of length, but can short circuit if the count of characters is greater than the number, and hence be more efficient.
O(n) Make a distinct copy of the given string, sharing no storage with the original string.
As an example, suppose you read a large string, of which you need only a small portion. If you do not use copy, the entire original array will be kept alive in memory by the smaller string. Making a copy "breaks the link" to the original array, allowing it to be garbage collected if there are no other live references to it.
O(n) dropAround p t returns the substring remaining after
dropping characters that satisfy the predicate p from both the
beginning and end of t.
O(n) dropEnd n t returns the prefix remaining after
dropping n characters from the end of t.
Examples:
dropEnd 3 "foobar""foo"
O(n) Return all initial segments of the given Text, shortest first.
O(n) Left-justify a string to the given length, using the specified fill character on the right. Performs replacement on invalid scalar values.
Examples:
justifyLeft 7 'x' "foo""fooxxxx"
justifyLeft 3 'x' "foobar""foobar"
O(n) Right-justify a string to the given length, using the specified fill character on the left. Performs replacement on invalid scalar values.
Examples:
justifyRight 7 'x' "bar""xxxxbar"
justifyRight 3 'x' "foobar""foobar"
O(n) If t is long enough to contain n characters, measureOff n t
returns a non-negative number, measuring their size in Word8. Otherwise,
if t is shorter, return a non-positive number, which is a negated total count
of Char available in t. If t is empty or n = 0, return 0.
This function is used to implement take, drop, splitAt and length and is useful on its own in streaming and parsing libraries.
replace :: HasCallStack=> Textneedleto search for. If this string is empty, an error will occur.-> Textreplacementto replaceneedlewith.-> Texthaystackin which to search.-> Text
O(m+n) Replace every non-overlapping occurrence of needle in
haystack with replacement.
This function behaves as though it was defined as follows:
replace needle replacement haystack =
intercalate replacement (splitOn needle haystack)
As this suggests, each occurrence is replaced exactly once. So if
needle occurs in replacement, that occurrence will not itself
be replaced recursively:
replace "oo" "foo" "oo""foo"
In cases where several instances of needle overlap, only the
first one will be replaced:
replace "ofo" "bar" "ofofo""barfo"
In (unlikely) bad cases, this function's time complexity degrades towards O(n*m).
O(length of suffix) spanEndM, applied to a monadic predicate p,
a text t, returns a pair (t1, t2) where t2 is the longest suffix of
t whose elements satisfy p, and t1 is the remainder of the text.
T.spanEndM (\c -> state $ \i -> (fromEnum c == i, i-1)) "tuvxyz" `runState` 122(("tuv","xyz"),118)
spanEndM p . reverse = fmap (bimap reverse reverse) . spanM p
O(length of prefix) spanM, applied to a monadic predicate p,
a text t, returns a pair (t1, t2) where t1 is the longest prefix of
t whose elements satisfy p, and t2 is the remainder of the text.
T.spanM (\c -> state $ \i -> (fromEnum c == i, i+1)) "abcefg" `runState` 97(("abc","efg"),101)
span is spanM specialized to Identity:
-- for all p :: Char -> Bool
span p = runIdentity . spanM (pure . p)
O(n) Splits a Text into components delimited by separators, where the predicate returns True for a separator element. The resulting components do not contain the separators. Two adjacent separators result in an empty component in the output. eg.
split (=='a') "aabbaca"["","","bb","c",""]
split (=='a') ""[""]
O(n) Remove leading and trailing white space from a string. Equivalent to:
dropAround isSpaceO(n) Remove trailing white space from a string. Equivalent to:
dropWhileEnd isSpaceO(n) Remove leading white space from a string. Equivalent to:
dropWhile isSpaceO(n) Return the prefix of the second string if its suffix matches the entire first string.
Examples:
stripSuffix "bar" "foobar"Just "foo"
stripSuffix "" "baz"Just "baz"
stripSuffix "foo" "quux"Nothing
This is particularly useful with the ViewPatterns extension to
GHC, as follows:
{-# LANGUAGE ViewPatterns #-}
import Data.Text as T
quuxLength :: Text -> Int
quuxLength (stripSuffix "quux" -> Just pre) = T.length pre
quuxLength _ = -1O(n) Return all final segments of the given Text, longest first.
O(n) takeEnd n t returns the suffix remaining after
taking n characters from the end of t.
Examples:
takeEnd 3 "foobar""bar"
O(n) takeWhileEnd, applied to a predicate p and a Text,
returns the longest suffix (possibly empty) of elements that
satisfy p.
Examples:
takeWhileEnd (=='o') "foo""oo"
O(n) Convert a string to folded case.
This function is mainly useful for performing caseless (also known as case insensitive) string comparisons.
A string x is a caseless match for a string y if and only if:
toCaseFold x == toCaseFold yThe result string may be longer than the input string, and may differ from applying toLower to the input string. For instance, the Armenian small ligature "ﬓ" (men now, U+FB13) is case folded to the sequence "մ" (men, U+0574) followed by "ն" (now, U+0576), while the Greek "µ" (micro sign, U+00B5) is case folded to "μ" (small letter mu, U+03BC) instead of itself.
Decode a ByteString containing UTF-8 encoded text.
Surrogate code points in replacement character returned by OnDecodeError
will be automatically remapped to the replacement char U+FFFD.
Read the remaining contents of a Handle as a string. The Handle is closed once the contents have been read, or if an exception is thrown.
Internally, this function reads a chunk at a time from the lower-level buffering abstraction, and concatenates the chunks into a single string once the entire file has been read.
As a result, it requires approximately twice as much memory as its result to construct its result. For files more than a half of available RAM in size, this may result in memory exhaustion.
Read a single line from a handle.
Write a string to a handle.
Write a string to a handle, followed by a newline.
Encode text using UTF-8 encoding.
Experimental. Read a single chunk of strict text from a Handle. The size of the chunk depends on the amount of input currently buffered.
This function blocks only if there is no data available, and EOF has not yet been reached. Once EOF is reached, this function returns an empty string instead of throwing an exception.
Decode a ByteString containing 7-bit ASCII encoded text.
This is a partial function: it checks that input does not contain anything except ASCII and copies buffer or throws an error otherwise.
Decode a ByteString containing 7-bit ASCII encoded text.
This is a total function which returns either the ByteString converted to a Text containing ASCII text, or Nothing.
Use decodeASCIIPrefix to retain the longest ASCII prefix for an invalid input instead of discarding it.
Decode a ByteString containing ASCII text.
This is a total function which returns a pair of the longest ASCII prefix as Text, and the remaining suffix as ByteString.
Important note: the pair is lazy. This lets you check for errors by testing
whether the second component is empty, without forcing the first component
(which does a copy).
To drop references to the input bytestring, force the prefix
(using seq or BangPatterns) and drop references to the suffix.
Properties
If
(prefix, suffix) = decodeAsciiPrefix s, thenencodeUtf8 prefix <> suffix = s.Either
suffixis empty, orhead suffix > 127.
Decode a ByteString containing Latin-1 (aka ISO-8859-1) encoded text.
decodeLatin1 is semantically equivalent to
Data.Text.pack . Data.ByteString.Char8.unpack
This is a total function. However, bear in mind that decoding Latin-1 (non-ASCII) characters to UTf-8 requires actual work and is not just buffer copying.
Decode text from big endian UTF-16 encoding.
If the input contains any invalid big endian UTF-16 data, an exception will be thrown. For more control over the handling of invalid data, use decodeUtf16BEWith.
Decode text from big endian UTF-16 encoding.
Decode text from little endian UTF-16 encoding.
If the input contains any invalid little endian UTF-16 data, an exception will be thrown. For more control over the handling of invalid data, use decodeUtf16LEWith.
Decode text from little endian UTF-16 encoding.
Decode text from big endian UTF-32 encoding.
If the input contains any invalid big endian UTF-32 data, an exception will be thrown. For more control over the handling of invalid data, use decodeUtf32BEWith.
Decode text from big endian UTF-32 encoding.
Decode text from little endian UTF-32 encoding.
If the input contains any invalid little endian UTF-32 data, an exception will be thrown. For more control over the handling of invalid data, use decodeUtf32LEWith.
Decode text from little endian UTF-32 encoding.
Decode a ByteString containing UTF-8 encoded text that is known to be valid.
If the input contains any invalid UTF-8 data, an exception will be thrown that cannot be caught in pure code. For more control over the handling of invalid data, use decodeUtf8' or decodeUtf8With.
This is a partial function: it checks that input is a well-formed UTF-8 sequence and copies buffer or throws an error otherwise.
Decode a ByteString containing UTF-8 encoded text.
Any invalid input bytes will be replaced with the Unicode replacement character U+FFFD.
Encode text using big endian UTF-16 encoding.
Encode text using little endian UTF-16 encoding.
Encode text using big endian UTF-32 encoding.
Encode text using little endian UTF-32 encoding.
Encode text using UTF-8 encoding and escape the ASCII characters using a BoundedPrim.
Use this function is to implement efficient encoders for text-based formats like JSON or HTML.
Decode, in a stream oriented way, a ByteString containing UTF-8 encoded text that is known to be valid.
If the input contains any invalid UTF-8 data, an exception will be thrown (either by this function or a continuation) that cannot be caught in pure code. For more control over the handling of invalid data, use streamDecodeUtf8With.
Decode, in a stream oriented way, a lazy ByteString containing UTF-8 encoded text.
Decode a chunk of UTF-8 text. To be continued with decodeUtf8More.
See decodeUtf8More for details on the result.
Properties
decodeUtf8Chunk = decodeUtf8More startUtf8State
Given:
decodeUtf8Chunk chunk = (builder, rest, ms)
builder is a prefix and rest is a suffix of chunk.
encodeUtf8 (strictBuilderToText builder) <> rest = chunk
Decode another chunk in an ongoing UTF-8 stream.
Returns a triple:
A StrictBuilder for the decoded chunk of text. You can accumulate chunks with
(<>)or output them with toText.The undecoded remainder of the given chunk, for diagnosing errors and resuming (presumably after skipping some bytes).
Just the new state, or Nothing if an invalid byte was encountered (it will be within the first 4 bytes of the undecoded remainder).
Properties
Given:
(pre, suf, ms) = decodeUtf8More s chunk
If the output
preis nonempty (alternatively, iflength chunk > length suf)s2b pre `append` suf = p2b s `append` chunkwhere
s2b = encodeUtf8 . toText p2b =partUtf8ToByteStringIf the output
preis empty (alternatively, iflength chunk = length suf)suf = chunkDecoding chunks separately is equivalent to decoding their concatenation.
Given:
(pre1, suf1, Just s1) = decodeUtf8More s chunk1 (pre2, suf2, ms2) = decodeUtf8More s1 chunk2 (pre3, suf3, ms3) = decodeUtf8More s (chunk1 `B.append` chunk2)we have:
s2b (pre1 <> pre2) = s2b pre3 ms2 = ms3
Initial Utf8State.
Use StrictBuilder to build Text.
Copy Text in a StrictBuilder
Validate a ByteString as UTF-8-encoded text. To be continued using validateUtf8More.
See also validateUtf8More for details on the result of this function.
validateUtf8Chunk = validateUtf8More startUtf8State
Properties
Given:
validateUtf8Chunk chunk = (n, ms)
The prefix is valid UTF-8. In particular, it should be accepted by this validation:
validateUtf8Chunk (take n chunk) = (n, Just startUtf8State)
Validate another ByteString chunk in an ongoing stream of UTF-8-encoded text.
Returns a pair:
The first component
nis the end position, relative to the current chunk, of the longest prefix of the accumulated bytestring which is valid UTF-8.nmay be negative: that happens when an incomplete code point started in a previous chunk and is not completed by the current chunk (either that code point is still incomplete, or it is broken by an invalid byte).The second component
msindicates the following:if
ms = Nothing, the remainder of the chunk contains an invalid byte, within four bytes from positionn;if
ms = Just s', you can carry on validating another chunk by calling validateUtf8More with the new states'.
Properties
Given:
validateUtf8More s chunk = (n, ms)
If the chunk is invalid, it cannot be extended to be valid.
ms = Nothing ==> validateUtf8More s (chunk <> more) = (n, Nothing)Validating two chunks sequentially is the same as validating them together at once:
ms = Just s' ==> validateUtf8More s (chunk <> more) = first (length chunk +) (validateUtf8More s' more)
A stream oriented decoding result.
Constructors
Some !Text !ByteString (ByteString -> Decoding)
State of decoding a ByteString in UTF-8. Enables incremental decoding (validateUtf8Chunk, validateUtf8More, decodeUtf8Chunk, decodeUtf8More).
Deprecated. Use StrictTextBuilder instead
A delayed representation of strict Text.
A delayed representation of strict Text.
Instances2Semigroup, Monoid
Semigroup StrictTextBuilderDefined in text-2.1.3 · Data.Text.Internal.StrictBuilderConcatenation of StrictBuilder is right-biased: the right builder will be run first. This allows a builder to run tail-recursively when it was accumulated left-to-right.
Monoid StrictTextBuilderDefined in text-2.1.3 · Data.Text.Internal.StrictBuilder