From 071e8839d633d6326048702a323f1c28ebc86d48 Mon Sep 17 00:00:00 2001
From: Simon Marlow <marlowsd@gmail.com>
Date: Mon, 3 Aug 2009 21:03:04 +0000
Subject: [PATCH] move termios prototypes into a public header

---
 includes/Rts.h     |    1 +
 includes/rts/TTY.h |   15 +++++++++++++++
 rts/RtsUtils.h     |    4 ----
 3 files changed, 16 insertions(+), 4 deletions(-)
 create mode 100644 includes/rts/TTY.h

diff --git a/includes/Rts.h b/includes/Rts.h
index f4cf545..3b5c5bd 100644
--- a/includes/Rts.h
+++ b/includes/Rts.h
@@ -176,6 +176,7 @@ void _assertFail(const char *filename, unsigned int linenum)
 #include "rts/Ticky.h"
 #include "rts/Timer.h"
 #include "rts/Stable.h"
+#include "rts/TTY.h"
 
 /* Misc stuff without a home */
 DLL_IMPORT_RTS extern char **prog_argv;	/* so we can get at these from Haskell */
diff --git a/includes/rts/TTY.h b/includes/rts/TTY.h
new file mode 100644
index 0000000..f1ef62e
--- /dev/null
+++ b/includes/rts/TTY.h
@@ -0,0 +1,15 @@
+/* -----------------------------------------------------------------------------
+ *
+ * (c) The GHC Team, 2009
+ *
+ * POSIX TTY-related functionality
+ *
+ * -------------------------------------------------------------------------- */
+
+#ifndef RTS_TTY_H
+#define RTS_TTY_H
+
+void* __hscore_get_saved_termios(int fd);
+void  __hscore_set_saved_termios(int fd, void* ts);
+
+#endif /* RTS_TTY_H */
diff --git a/rts/RtsUtils.h b/rts/RtsUtils.h
index 14856bf..241cbf3 100644
--- a/rts/RtsUtils.h
+++ b/rts/RtsUtils.h
@@ -39,10 +39,6 @@ char *ullong_format_string(ullong, char *, rtsBool);
 void heapCheckFail( void );
 #endif
 
-// XXX shouldn't be here
-void* __hscore_get_saved_termios(int fd);
-void  __hscore_set_saved_termios(int fd, void* ts);
-
 void printRtsInfo(void);
 
 HsInt genSymZh(void);
-- 
1.7.10.4