From ccd0725300e5529db1776c8221c250307f5ff53c Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Mon, 10 Oct 2005 23:32:51 +0000
Subject: [PATCH] [project @ 2005-10-10 23:32:51 by sof] CSsize fix: this
 Haskell type is defined iff HTYPE_SSIZE_T is. Merge to
 STABLE

---
 System/Posix/Types.hs |    8 ++------
 1 file changed, 2 insertions(+), 6 deletions(-)

diff --git a/System/Posix/Types.hs b/System/Posix/Types.hs
index f24fed1..7ade7bf 100644
--- a/System/Posix/Types.hs
+++ b/System/Posix/Types.hs
@@ -34,7 +34,7 @@ module System.Posix.Types (
 #if defined(HTYPE_PID_T)
   CPid,
 #endif
-#if defined(HTYPE_SIZE_T) || defined(HTYPE_SSIZE_T)
+#if defined(HTYPE_SSIZE_T)
   CSsize,
 #endif
 
@@ -119,11 +119,7 @@ INTEGRAL_TYPE(COff,tyConCOff,"COff",HTYPE_OFF_T)
 INTEGRAL_TYPE(CPid,tyConCPid,"CPid",HTYPE_PID_T)
 #endif
 
-#if defined(HTYPE_SIZE_T)
-INTEGRAL_TYPE(CSsize,tyConCSsize,"CSsize",HTYPE_SIZE_T)
-#endif
-
-#if defined(HTYPE_SSIZE_T) && !defined(HTYPE_SIZE_T)
+#if defined(HTYPE_SSIZE_T)
 INTEGRAL_TYPE(CSsize,tyConCSsize,"CSsize",HTYPE_SSIZE_T)
 #endif
 
-- 
1.7.10.4