From 5f2977334cd9957cc75e8a36952628517afdfbe8 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Wed, 8 Jul 1998 09:52:32 +0000
Subject: [PATCH] [project @ 1998-07-08 09:52:32 by sof] post 3.02 export
 indexAddrOffAddr from Addr, not ByteArray

---
 ghc/compiler/utils/Argv.lhs |    4 ++++
 1 file changed, 4 insertions(+)

diff --git a/ghc/compiler/utils/Argv.lhs b/ghc/compiler/utils/Argv.lhs
index 6d406a8..1420bfc 100644
--- a/ghc/compiler/utils/Argv.lhs
+++ b/ghc/compiler/utils/Argv.lhs
@@ -10,8 +10,12 @@ module Argv ( argv ) where
 
 import FastString
 
+#if __GLASGOW_HASKELL__ <= 302
 import GlaExts		( Addr )
 import ByteArray 	( indexAddrOffAddr )
+#else
+import Addr		( Addr, indexAddrOffAddr )
+#endif
 
 argv :: [FAST_STRING]
 argv = unpackArgv ``prog_argv'' (``prog_argc''::Int)
-- 
1.7.10.4