From: simonm <unknown>
Date: Thu, 2 Jul 1998 08:44:56 +0000 (+0000)
Subject: [project @ 1998-07-02 08:44:56 by simonm]
X-Git-Tag: Approx_2487_patches~538
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;ds=sidebyside;h=e2f4dad7c45bd1026aa1b7a3370182a7b473dd64;p=ghc-hetmet.git

[project @ 1998-07-02 08:44:56 by simonm]
update for alpha/osf3.
---

diff --git a/ghc/lib/misc/SocketPrim.lhs b/ghc/lib/misc/SocketPrim.lhs
index 5991a91..3ec51fd 100644
--- a/ghc/lib/misc/SocketPrim.lhs
+++ b/ghc/lib/misc/SocketPrim.lhs
@@ -643,7 +643,7 @@ unpackFamily family = (range (AF_UNSPEC, AF_NIT))!!family
 
 #endif
 
-#if osf1_TARGET_OS
+#if osf1_TARGET_OS || osf3_TARGET_OS
        
 data Family =
 	  AF_UNSPEC	-- unspecified 
@@ -813,8 +813,8 @@ unpackFamily family = (range (AF_UNSPEC, AF_MAX))!!family
 
 -- Alpha running OSF or a SPARC with SunOS, rather than Solaris.
 
-#if osf1_TARGET_OS || sunos4_TARGET_OS || hpux_TARGET_OS || aix_TARGET_OS \
-	|| freebsd_TARGET_OS
+#if osf1_TARGET_OS || osf3_TARGET_OS || sunos4_TARGET_OS || hpux_TARGET_OS || \
+	aix_TARGET_OS || freebsd_TARGET_OS
 data SocketType = 
 	  Stream 
 	| Datagram