path: root/testsuite/tests/ghci/scripts/T12158.script

data Stock = Stock {name :: String, ric :: String, price :: Float} deriving (Show)
price Stock{name=name,ric=ric,price=price} = price