packages feed

hls-tactics-plugin-1.1.0.0: test/golden/AutoEndo.hs

data Synthesized b a = Synthesized
  { syn_trace :: b
  , syn_val   :: a
  }
  deriving (Eq, Show)


mapTrace :: (b -> b) -> Synthesized b a -> Synthesized b a
mapTrace = _