RequestReader now compiles...

[Lucu.git] / Network / HTTP / Lucu / Preprocess.hs

diff --git a/Network/HTTP/Lucu/Preprocess.hs b/Network/HTTP/Lucu/Preprocess.hs
index f2212ab104b3052a47fd91de90050f0ccf31a6cd..99c4bebb16e18c161ad72b0313300b2ff204857f 100644 (file)
--- a/Network/HTTP/Lucu/Preprocess.hs
+++ b/Network/HTTP/Lucu/Preprocess.hs
@@ -41,6 +41,7 @@ data AugmentedRequest
 data RequestBodyLength
     = Fixed !Int
     | Chunked
+    deriving (Eq, Show)
 
 preprocess ∷ Text
            → PortNumber