aboutsummaryrefslogtreecommitdiff
path: root/spec/src/Thermoprint/Printout/BBCode.hs
diff options
context:
space:
mode:
Diffstat (limited to 'spec/src/Thermoprint/Printout/BBCode.hs')
-rw-r--r--spec/src/Thermoprint/Printout/BBCode.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/spec/src/Thermoprint/Printout/BBCode.hs b/spec/src/Thermoprint/Printout/BBCode.hs
index 8df70c0..1ca1e01 100644
--- a/spec/src/Thermoprint/Printout/BBCode.hs
+++ b/spec/src/Thermoprint/Printout/BBCode.hs
@@ -71,8 +71,8 @@ data ParseResult = RBlock Block -- ^ Parses only as 'Block'
71 71
72-- | Current parser context 72-- | Current parser context
73data Context a where 73data Context a where
74 BlockCtx :: Context Block -- ^ Parsing 'Block's 74 BlockCtx :: Context Block
75 LineCtx :: Context Line -- ^ Parsing 'Line's 75 LineCtx :: Context Line
76 76
77extract :: Context a -> ParseResult -> Either SemanticError a 77extract :: Context a -> ParseResult -> Either SemanticError a
78-- ^ Extract information from a 'ParseResult' given 'Context' 78-- ^ Extract information from a 'ParseResult' given 'Context'