From: simonmar <unknown>
Date: Thu, 30 Mar 2000 12:04:13 +0000 (+0000)
Subject: [project @ 2000-03-30 12:04:13 by simonmar]
X-Git-Tag: Approximately_9120_patches~4875
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=9a3395bdd27e9eb66a77d670a4291c312d65fc26;p=ghc-hetmet.git

[project @ 2000-03-30 12:04:13 by simonmar]
update for extra parameter to startupHaskell().
---

diff --git a/ghc/interpreter/hugs.c b/ghc/interpreter/hugs.c
index 93a491b..16fabe2 100644
--- a/ghc/interpreter/hugs.c
+++ b/ghc/interpreter/hugs.c
@@ -9,8 +9,8 @@
  * included in the distribution.
  *
  * $RCSfile: hugs.c,v $
- * $Revision: 1.50 $
- * $Date: 2000/03/28 10:20:55 $
+ * $Revision: 1.51 $
+ * $Date: 2000/03/30 12:04:13 $
  * ------------------------------------------------------------------------*/
 
 #include <setjmp.h>
@@ -235,7 +235,7 @@ String argv[]; {
    readOptions(fromEnv("STGHUGSFLAGS",""));
 
    strncpy(argv_0_orig,argv[0],1000);   /* startupHaskell mangles argv[0] */
-   startupHaskell (argc,argv);
+   startupHaskell (argc,argv,NULL);
    argc = prog_argc; 
    argv = prog_argv;