ghc: panic! (the 'impossible' happened) translateConPatVec: lookup
*Main> price Stock{name=name,ric=ric,price=price} = price
ghc: panic! (the 'impossible' happened)
(GHC version 8.0.1 for x86_64-unknown-mingw32):
translateConPatVec: lookup
Please report this as a GHC bug: http://www.haskell.org/ghc/reportabug