Test cases for GHCi data, class, etc.
[ghc.git] / testsuite / tests / ghci / scripts / ghci052.script
1 --Testing data type and constructor shadowing with functions
2 data Planet = Mercury | Venus | Earth
3 let pn Mercury = "M" ; pn Venus = "V" ; pn Earth = "E"
4 pn Mercury
5 data Planet = Mercury | Venus | Mars
6 pn Mercury
7 pn Venus
8 pn Mars
9 pn Earth
10 let pn Mercury = "M" ; pn Venus = "V" ; pn Earth = "E" ; pn Mars = "M"