diff options
author | John MacFarlane <jgm@berkeley.edu> | 2015-04-12 21:39:08 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2015-04-12 21:39:08 -0700 |
commit | fee04fbee08c7deab6c88853540d728f7e613102 (patch) | |
tree | 283fd79b8a56df5f56c16d165ffaba7baf4ab10f /tests | |
parent | 6a83773f03622b5cbf9b15bb96e9487822df5faa (diff) | |
parent | 251ce0738da4ee8c74b84649f5eb86321c56b82c (diff) | |
download | pandoc-fee04fbee08c7deab6c88853540d728f7e613102.tar.gz |
Merge pull request #2072 from lierdakil/latex-reader-cleanup
LaTeX Reader: Code cleanup
Diffstat (limited to 'tests')
-rw-r--r-- | tests/Tests/Readers/LaTeX.hs | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/Tests/Readers/LaTeX.hs b/tests/Tests/Readers/LaTeX.hs index 38363af59..b72d707e7 100644 --- a/tests/Tests/Readers/LaTeX.hs +++ b/tests/Tests/Readers/LaTeX.hs @@ -106,6 +106,16 @@ tests = [ testGroup "basic" [ natbibCitations , biblatexCitations ] + + , let hex = ['0'..'9']++['a'..'f'] in + testGroup "Character Escapes" + [ "Two-character escapes" =: + concat ["^^"++[i,j] | i <- hex, j <- hex] =?> + para (str ['\0'..'\255']) + , "One-character escapes" =: + concat ["^^"++[i] | i <- hex] =?> + para (str $ ['p'..'y']++['!'..'&']) + ] ] baseCitation :: Citation |