[1 of 1] Compiling Main ( prog.hs, prog.o )
prog.hs:4:10:
Couldn't match expected type `String' against inferred type `ShowS'
In the first argument of `putStr', namely
`(showsTypeRep (typeOf (x)))'
In the expression: putStr (showsTypeRep (typeOf (x)))
In the expression:
do let x = 42
putStr (showsTypeRep (typeOf (x)))