Difference in Show between ghc and Hugs

[Joachim Korittky]

The following program shows a difference in Show and Read
between ghc and Hugs:


module Main where

data Fields   = Fields { i::Int }
              deriving(Show, Read)

data Foo      = Foo Fields
              deriving(Show, Read)

foo = Foo Fields{ i=0 }

main = putStr (show foo)


In ghc 3.0 (didn't try 3.01 yet) it leads to

  Foo (Fields{i=0})

Hugs Jan 1998 shows

  Foo Fields{i=0}

which is as I think the expected result.


bye
joe