on master help sign in
Use a flatter hierarchy
b693fbaOllie Charles
docs/concepts.rst+5−5
@@ -79,12 +79,12 @@ which allows you to refine an existing ``DBType``::
79 printer Shipped = "Shipped"
79 printer Shipped = "Shipped"
80
80
81Deriving ``DBType`` via ``ReadShow``
81Deriving ``DBType`` via ``ReadShow``
82−^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
82+------------------------------------
83
83
84+The ``DBType`` definition for ``OrderStatus`` above is a perfectly reasonable
84−This is a perfectly reasonable definition, though it is quite verbose and
85+definition, though it is quite verbose and tedious. Rel8 makes it easy to map
85−tedious. Rel8 makes it easy to map Haskell types that are encoded using
86+Haskell types that are encoded using ``Read``/``Show`` via the ``ReadShow``
86−``Read``/``Show`` via the ``ReadShow`` wrapper. An equivalent ``DBType``
87−definition using ``ReadShow`` is::
87+wrapper. An equivalent ``DBType`` definition using ``ReadShow`` is::
88
88
89 data OrderStatus = PaymentPending | Paid | Packed | Shipped
89 data OrderStatus = PaymentPending | Paid | Packed | Shipped
90 deriving stock (Read, Show)
90 deriving stock (Read, Show)