@@ -1,5 +1,6 @@
1{-# LANGUAGE OverloadedStrings #-}
1{-# LANGUAGE OverloadedStrings #-}
2{-# LANGUAGE RecordWildCards #-}
2{-# LANGUAGE RecordWildCards #-}
3+{-# LANGUAGE DeriveDataTypeable #-}
3module Servant.Server.Internal.ServantErr where
4module Servant.Server.Internal.ServantErr where
5import Control.Exception (Exception)
6import Control.Exception (Exception)