...

Author: fisx

src/Servant/Swagger/Internal.hs

@@ -1,6 +1,7 @@
 {-# LANGUAGE CPP                  #-}
 {-# LANGUAGE ConstraintKinds      #-}
 {-# LANGUAGE DataKinds            #-}
+{-# LANGUAGE GeneralizedNewtypeDeriving #-}  -- TODO: can we get rid of this?
 {-# LANGUAGE FlexibleContexts     #-}
 {-# LANGUAGE FlexibleInstances    #-}
 {-# LANGUAGE OverloadedStrings    #-}
@@ -14,6 +15,8 @@
 #endif
 module Servant.Swagger.Internal where
 
+-- TODO: write tests!
+
 -- TODO: shuffle this into the other imports.
 #if MIN_VERSION_servant(0,18,0)
 import Control.Applicative ((<|>))