aboutsummaryrefslogtreecommitdiff
path: root/bbcode/src/Text/BBCode
diff options
context:
space:
mode:
authorGregor Kleen <gkleen@yggdrasil.li>2016-01-12 10:26:45 +0100
committerGregor Kleen <gkleen@yggdrasil.li>2016-01-12 10:26:45 +0100
commitca7cd4ee2470115939523bb985aa576f9d87f18f (patch)
tree986d5d941f718fd813bf3436ae823cf1d0df1774 /bbcode/src/Text/BBCode
parent9f58557a76b5ae5478a7b7fc9e83266cd215c448 (diff)
downloadthermoprint-ca7cd4ee2470115939523bb985aa576f9d87f18f.tar
thermoprint-ca7cd4ee2470115939523bb985aa576f9d87f18f.tar.gz
thermoprint-ca7cd4ee2470115939523bb985aa576f9d87f18f.tar.bz2
thermoprint-ca7cd4ee2470115939523bb985aa576f9d87f18f.tar.xz
thermoprint-ca7cd4ee2470115939523bb985aa576f9d87f18f.zip
cleanup & docs
Diffstat (limited to 'bbcode/src/Text/BBCode')
-rw-r--r--bbcode/src/Text/BBCode/Lexer.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/bbcode/src/Text/BBCode/Lexer.hs b/bbcode/src/Text/BBCode/Lexer.hs
index 4ad0792..218427d 100644
--- a/bbcode/src/Text/BBCode/Lexer.hs
+++ b/bbcode/src/Text/BBCode/Lexer.hs
@@ -5,8 +5,8 @@
5module Text.BBCode.Lexer 5module Text.BBCode.Lexer
6 ( BBToken(..) 6 ( BBToken(..)
7 , token 7 , token
8 , escapedText 8 -- , escapedText
9 , escapedText' 9 -- , escapedText'
10 ) where 10 ) where
11 11
12import Data.Attoparsec.Text 12import Data.Attoparsec.Text
@@ -22,7 +22,7 @@ import Prelude hiding (takeWhile)
22 22
23-- | Our lexicographical unit 23-- | Our lexicographical unit
24data BBToken = BBOpen Text [(Text, Text)] -- ^ Tag open with attributes 24data BBToken = BBOpen Text [(Text, Text)] -- ^ Tag open with attributes
25 | BBContained Text [(Text, Text)] 25 | BBContained Text [(Text, Text)] -- ^ Tag open & immediate close with attributes
26 | BBClose Text -- ^ Tag close 26 | BBClose Text -- ^ Tag close
27 | BBStr Text -- ^ Content of a tag 27 | BBStr Text -- ^ Content of a tag
28 deriving (Eq, Show) 28 deriving (Eq, Show)