
5 Feb
2007
5 Feb
'07
8:33 p.m.
Hi, The following code works:
type ServiceMainClosure = DWORD -> IO ()
foreign import ccall "wrapper" mkServiceMainClosure :: ServiceMainClosure -> IO (FunPtr ServiceMainClosure)
But the following doesn't:
type ServiceMainClosure = DWORD -> [String] -> IO ()
foreign import ccall "wrapper" mkServiceMainClosure :: ServiceMainClosure -> IO (FunPtr ServiceMainClosure)
System\Win32\Service.hsc:108:8: parse error on input `import' What can I do to get this to work? Thanks -John