diff --git a/src/Servant/Swagger/Internal.hs b/src/Servant/Swagger/Internal.hs index 1efdc6df6..e72cc0ae0 100644 --- a/src/Servant/Swagger/Internal.hs +++ b/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 ((<|>))