summaryrefslogtreecommitdiff
path: root/src/Codec/Pesto/Serialize.lhs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Codec/Pesto/Serialize.lhs')
-rw-r--r--src/Codec/Pesto/Serialize.lhs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Codec/Pesto/Serialize.lhs b/src/Codec/Pesto/Serialize.lhs
index 5b3007e..b3cce7c 100644
--- a/src/Codec/Pesto/Serialize.lhs
+++ b/src/Codec/Pesto/Serialize.lhs
@@ -31,6 +31,8 @@ Finally transform linear stream of operations into a string again:
> serialize (Reference q) = '*':serialize q
> serialize (Result s) = '>':serializeQstr s
> serialize (Alternative s) = '|':serializeQstr s
+> serialize (Directive s) = '%':serializeQstr s
+> serialize (Unknown s) = s
> instance Serializeable Quantity where
> serialize (Quantity a b "") = serialize a ++ " " ++ serializeQstr b