I wrote:
Just a note: This commit breaks Hugs. Probabaly nothing really serious
(provide a saved_termios), but I currently don't have the time to fix it.

Now I've tried to fix this, but I ran into trouble: When I define an externally visible variable saved_termios in Hugs' machdep.c like RtsStartup.c does, the dlopen used in Hugs is unhappy with System/Posix/Internals.so (which contains a reference to saved_termios):

undefined symbol: saved_termios

When I change Internals.hs to use a getter/setter like

   foreign import ccall unsafe "HsBase.h __hscore_get_saved_termios"
      get_saved_termios :: Int -> IO (Ptr CTermios)

   foreign import ccall unsafe "HsBase.h __hscore_set_saved_termios"
      set_saved_termios :: Int -> (Ptr CTermios) -> IO ()

instead and define these as externally visible functions in Hugs,
everything is fine!? Strange... Can somebody explain this?

Cheers,
   S.


_______________________________________________ Cvs-ghc mailing list [EMAIL PROTECTED] http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to