From 8956807f82b44e1584570c7511e0c62dee216ee9 Mon Sep 17 00:00:00 2001
From: rrt <unknown>
Date: Wed, 15 Aug 2001 10:16:46 +0000
Subject: [PATCH] [project @ 2001-08-15 10:16:46 by rrt] argc and argv no
 longer need faking; System.lhs copes

---
 ghc/lib/std/cbits/ilxstubs.c |   18 +-----------------
 1 file changed, 1 insertion(+), 17 deletions(-)

diff --git a/ghc/lib/std/cbits/ilxstubs.c b/ghc/lib/std/cbits/ilxstubs.c
index d1f64ba..3f0aac8 100644
--- a/ghc/lib/std/cbits/ilxstubs.c
+++ b/ghc/lib/std/cbits/ilxstubs.c
@@ -1,7 +1,7 @@
 /* 
  * (c) The GHC Team 2001
  *
- * $Id: ilxstubs.c,v 1.3 2001/08/15 09:23:25 rrt Exp $
+ * $Id: ilxstubs.c,v 1.4 2001/08/15 10:16:46 rrt Exp $
  *
  * ILX stubs for external function calls
  */
@@ -34,22 +34,6 @@
 ../PrelTopHandler.lhs:77:foreign import ccall "stackOverflow" unsafe
 ../PrelTopHandler.lhs:80:foreign import ccall "stg_exit" unsafe */
 
-/* Fake this for now, as a DLL can't refer to main() */
-int argc = 0;
-char **argv = NULL;
-
-int
-prog_argc_addr(void)
-{
-  return &argc;
-}
-
-char ***
-prog_argv_addr(void)
-{
-  return &argv;
-}
-
 void
 stg_exit(I_ n)
 {
-- 
1.7.10.4