From c2e72615a166e1cfa479e44283b5f7f9ecdeb942 Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Tue, 12 Jan 2016 01:12:36 +0000 Subject: more unit tests --- bbcode/test/Text/BBCode/LexerSpec.hs | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'bbcode/test/Text/BBCode') diff --git a/bbcode/test/Text/BBCode/LexerSpec.hs b/bbcode/test/Text/BBCode/LexerSpec.hs index b82b640..d6e1427 100644 --- a/bbcode/test/Text/BBCode/LexerSpec.hs +++ b/bbcode/test/Text/BBCode/LexerSpec.hs @@ -63,6 +63,10 @@ examples = [ ("[t]test[/t]" , [BBOpen "t", BBStr "te\\st", BBClose "t"]) , ("[t]te\\[st[/t]" , [BBOpen "t", BBStr "te[st", BBClose "t"]) + , ("[t]test\\\\[/t]" + , [BBOpen "t", BBStr "test\\", BBClose "t"]) + , ("[t]test\\[/t]" + , [BBOpen "t", BBStr "test[/t]"]) , ("[\\t]test[/t]" , [BBOpen "\\t", BBStr "test", BBClose "t"]) , ("[t]test[/t\\]]" -- cgit v1.2.3