CLDouble serialization bug in 6.10.1

Hello glasgow-haskell-users, sorry, i tested it only with 6.6 and 6.10.1. testcase available as http://www.haskell.org/bz/ldouble-bug.zip it's as simple as

foreign import ccall unsafe "" client :: Ptr CLDouble -> IO ()

main = with 1.0 client

and

void client(long double *p) { printf ("%f\n",(double)(*p)); }

-- Best regards, Bulat mailto:Bulat.Ziganshin@gmail.com