src/Data/Map/Internal/DeprecatedShowTree.hs

    {-# LANGUAGE CPP, FlexibleContexts, DataKinds #-}
    #if __GLASGOW_HASKELL__ >= 800
    {-# LANGUAGE MonoLocalBinds #-}
    #endif
    #if __GLASGOW_HASKELL__ < 710
    -- Why do we need this? Guess it doesn't matter; this is all
    -- going away soon.
    {-# LANGUAGE Trustworthy #-}
    #endif

    #include "containers.h"

    -- | This module simply holds disabled copies of functions from
    -- Data.Map.Internal.Debug.
    module Data.Map.Internal.DeprecatedShowTree where

    import Data.Map.Internal (Map)
    import Utils.Containers.Internal.TypeError

    -- | This function has moved to 'Data.Map.Internal.Debug.showTree'.
    showTree :: Whoops "showTree has moved to Data.Map.Internal.Debug.showTree."
             => Map k a -> String
    showTree _ = undefined

    -- | This function has moved to 'Data.Map.Internal.Debug.showTreeWith'.
    showTreeWith ::
          Whoops "showTreeWith has moved to Data.Map.Internal.Debug.showTreeWith."
       => (k -> a -> String) -> Bool -> Bool -> Map k a -> String
    showTreeWith _ _ _ _ = undefined