15 Nov
2006
15 Nov
'06
6:09 a.m.
On Wed, 15 Nov 2006 10:58:23 +0000
Simon Peyton-Jones
Can you send a small example program for 'test'?
Here's an example: module Test(test) where data B = B {-# UNPACK #-} !Int data C a = C {-# UNPACK #-} !Char !a printB :: B -> IO () printB (B x) = print x test :: C B -> IO () test (C c b) = print c >> printB b