haskell-debug-adapter-0.0.29.0: src/Haskell/Debug/Adapter/TH/Utility.hs

module Haskell.Debug.Adapter.TH.Utility where


-- |
--
rdrop :: String -> String -> String
rdrop str = reverse . drop (length str) . reverse

-- |
--
fieldModifier :: String -> String -> String
fieldModifier str  = tail . rdrop str