Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : ghc-7.6
http://hackage.haskell.org/trac/ghc/changeset/4ea2263f584c4de94ff213d2288d6df78eb6e262 >--------------------------------------------------------------- commit 4ea2263f584c4de94ff213d2288d6df78eb6e262 Author: Simon Marlow <[email protected]> Date: Tue Sep 11 16:12:52 2012 +0200 Fix off-by-one (#7227) >--------------------------------------------------------------- rts/RtsFlags.c | 1 + 1 files changed, 1 insertions(+), 0 deletions(-) diff --git a/rts/RtsFlags.c b/rts/RtsFlags.c index f5acca8..cfe5c1b 100644 --- a/rts/RtsFlags.c +++ b/rts/RtsFlags.c @@ -547,6 +547,7 @@ void setupRtsFlags (int *argc, char *argv[], procRtsOpts(rts_argc0, rtsOptsEnabled); appendRtsArg((char *)0); + rts_argc--; // appendRtsArg will have bumped it for the NULL (#7227) normaliseRtsOpts(); _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
