bbcode/src/Text/BBCode.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14

{-# LANGUAGE OverloadedStrings #-}

module Text.BBCode
       (
       ) where

import Data.Attoparsec.Text

import Data.Text (Text)
import qualified Data.Text as T (singleton, head, tail)

import Control.Applicative

import Text.BBCode.Lexer (BBToken(..), token)