More on FreeBSD/amd64

[Bulat Ziganshin]

Hello Gregory,

Monday, April 2, 2007, 7:57:49 PM, you wrote:

>> puts :: String -> IO ()
>> puts s = do write_rawBuffer 1 (unsafeCoerce# (packCString# s))
>>                             0 (fromIntegral (length s))
>>             return ()
>>
>> (packCString# come from GHC.Pack)

you may try to call C function with a result of (packCString# s)



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