From: panne <unknown>
Date: Thu, 8 Jun 2000 20:41:30 +0000 (+0000)
Subject: [project @ 2000-06-08 20:41:30 by panne]
X-Git-Tag: Approximately_9120_patches~4301
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=9579f611d29329a8a826d76719516a9dc93dc1bf;p=ghc-hetmet.git

[project @ 2000-06-08 20:41:30 by panne]
autoconf hackery for CTypes{,ISO}
---

diff --git a/acconfig.h b/acconfig.h
index a5cd3f3..e6ad3f5 100644
--- a/acconfig.h
+++ b/acconfig.h
@@ -96,6 +96,63 @@
 /* Define if you support the production (and use) of Win32 DLLs. */
 #undef HAVE_WIN32_DLL_SUPPORT
 
+/* Define to Haskell type for char */
+#undef HTYPE_CHAR
+
+/* Define to Haskell type for clock_t */
+#undef HTYPE_CLOCK_T
+
+/* Define to Haskell type for signed double */
+#undef HTYPE_DOUBLE
+
+/* Define to Haskell type for float */
+#undef HTYPE_FLOAT
+
+/* Define to Haskell type for int */
+#undef HTYPE_INT
+
+/* Define to Haskell type for long */
+#undef HTYPE_LONG
+
+/* Define to Haskell type for long long */
+#undef HTYPE_LONG_LONG
+
+/* Define to Haskell type for ptrdiff_t */
+#undef HTYPE_PTRDIFF_T
+
+/* Define to Haskell type for short */
+#undef HTYPE_SHORT
+
+/* Define to Haskell type for sig_atomic_t */
+#undef HTYPE_SIG_ATOMIC_T
+
+/* Define to Haskell type for signed char */
+#undef HTYPE_SIGNED_CHAR
+
+/* Define to Haskell type for size_t */
+#undef HTYPE_SIZE_T
+
+/* Define to Haskell type for time_t */
+#undef HTYPE_TIME_T
+
+/* Define to Haskell type for unsigned char */
+#undef HTYPE_UNSIGNED_CHAR
+
+/* Define to Haskell type for unsigned int */
+#undef HTYPE_UNSIGNED_INT
+
+/* Define to Haskell type for unsigned long */
+#undef HTYPE_UNSIGNED_LONG
+
+/* Define to Haskell type for unsigned long long */
+#undef HTYPE_UNSIGNED_LONG_LONG
+
+/* Define to Haskell type for unsigned short */
+#undef HTYPE_UNSIGNED_SHORT
+
+/* Define to Haskell type for wchar_t */
+#undef HTYPE_WCHAR_T
+
 /* Define if C Symbols have a leading underscore added by the compiler */
 #undef LEADING_UNDERSCORE
 
diff --git a/configure.in b/configure.in
index 436a4d0..c3d0e13 100644
--- a/configure.in
+++ b/configure.in
@@ -612,6 +612,29 @@ fi
 FPTOOLS_CHECK_ALIGNMENT(unsigned short)
 FPTOOLS_CHECK_ALIGNMENT(void *)
 
+dnl ** map standard C types and ISO types to Haskell types
+FPTOOLS_CHECK_HTYPE(char)
+FPTOOLS_CHECK_HTYPE(signed char)
+FPTOOLS_CHECK_HTYPE(unsigned char)
+FPTOOLS_CHECK_HTYPE(short)
+FPTOOLS_CHECK_HTYPE(unsigned short)
+FPTOOLS_CHECK_HTYPE(int)
+FPTOOLS_CHECK_HTYPE(unsigned int)
+FPTOOLS_CHECK_HTYPE(long)
+FPTOOLS_CHECK_HTYPE(unsigned long)
+if test "$fptools_cv_have_long_long" = yes; then
+FPTOOLS_CHECK_HTYPE(long long)
+FPTOOLS_CHECK_HTYPE(unsigned long long)
+fi
+FPTOOLS_CHECK_HTYPE(float)
+FPTOOLS_CHECK_HTYPE(double)
+FPTOOLS_CHECK_HTYPE(ptrdiff_t)
+FPTOOLS_CHECK_HTYPE(size_t)
+FPTOOLS_CHECK_HTYPE(wchar_t)
+FPTOOLS_CHECK_HTYPE(sig_atomic_t)
+FPTOOLS_CHECK_HTYPE(clock_t)
+FPTOOLS_CHECK_HTYPE(time_t)
+
 dnl ** can we open files in binary mode?
 FPTOOLS_O_BINARY
 
diff --git a/mk/config.h.in b/mk/config.h.in
index c7e4b30..cc96838 100644
--- a/mk/config.h.in
+++ b/mk/config.h.in
@@ -147,6 +147,63 @@
 /* Define if you support the production (and use) of Win32 DLLs. */
 #undef HAVE_WIN32_DLL_SUPPORT
 
+/* Define to Haskell type for char */
+#undef HTYPE_CHAR
+
+/* Define to Haskell type for clock_t */
+#undef HTYPE_CLOCK_T
+
+/* Define to Haskell type for signed double */
+#undef HTYPE_DOUBLE
+
+/* Define to Haskell type for float */
+#undef HTYPE_FLOAT
+
+/* Define to Haskell type for int */
+#undef HTYPE_INT
+
+/* Define to Haskell type for long */
+#undef HTYPE_LONG
+
+/* Define to Haskell type for long long */
+#undef HTYPE_LONG_LONG
+
+/* Define to Haskell type for ptrdiff_t */
+#undef HTYPE_PTRDIFF_T
+
+/* Define to Haskell type for short */
+#undef HTYPE_SHORT
+
+/* Define to Haskell type for sig_atomic_t */
+#undef HTYPE_SIG_ATOMIC_T
+
+/* Define to Haskell type for signed char */
+#undef HTYPE_SIGNED_CHAR
+
+/* Define to Haskell type for size_t */
+#undef HTYPE_SIZE_T
+
+/* Define to Haskell type for time_t */
+#undef HTYPE_TIME_T
+
+/* Define to Haskell type for unsigned char */
+#undef HTYPE_UNSIGNED_CHAR
+
+/* Define to Haskell type for unsigned int */
+#undef HTYPE_UNSIGNED_INT
+
+/* Define to Haskell type for unsigned long */
+#undef HTYPE_UNSIGNED_LONG
+
+/* Define to Haskell type for unsigned long long */
+#undef HTYPE_UNSIGNED_LONG_LONG
+
+/* Define to Haskell type for unsigned short */
+#undef HTYPE_UNSIGNED_SHORT
+
+/* Define to Haskell type for wchar_t */
+#undef HTYPE_WCHAR_T
+
 /* Define if C Symbols have a leading underscore added by the compiler */
 #undef LEADING_UNDERSCORE