[project @ 2001-03-01 12:25:32 by rrt]

[ghc-hetmet.git] / ghc / lib / std / cbits / progargs.c

diff --git a/ghc/lib/std/cbits/progargs.c b/ghc/lib/std/cbits/progargs.c
index c4519d6..b0ee172 100644 (file)
--- a/ghc/lib/std/cbits/progargs.c
+++ b/ghc/lib/std/cbits/progargs.c
@@ -1,7 +1,7 @@
 /* 
  * (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
  *
- * $Id: progargs.c,v 1.2 1999/03/02 20:14:01 sof Exp $
+ * $Id: progargs.c,v 1.4 2001/01/11 17:25:58 simonmar Exp $
  *
  * System.getArgs Runtime Support
  */
@@ -9,16 +9,13 @@
 #include "Rts.h"
 #include "stgio.h"
 
-DLLIMPORT extern char** prog_argv;
-DLLIMPORT extern int prog_argc;
-
-StgAddr
+HsAddr
 get_prog_argv(void)
 { 
   return prog_argv;
 }
 
-StgInt
+HsInt
 get_prog_argc()
 {
   return prog_argc;