X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FRtsFlags.c;h=36d5ee15036c48d5c2c60ed6d1fc2749696c062e;hb=c0624c7661a229bfeed128ca96b07e2f4d5d677c;hp=a8f02cb8ca3004090db7619089c37c1dd7d29743;hpb=aa4062bba02e747e7c05cbaa70b7e5b2e5c09b31;p=ghc-hetmet.git diff --git a/ghc/rts/RtsFlags.c b/ghc/rts/RtsFlags.c index a8f02cb..36d5ee1 100644 --- a/ghc/rts/RtsFlags.c +++ b/ghc/rts/RtsFlags.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: RtsFlags.c,v 1.60 2002/10/01 08:53:14 simonmar Exp $ + * $Id: RtsFlags.c,v 1.61 2002/10/05 22:18:45 panne Exp $ * * (c) The AQUA Project, Glasgow University, 1994-1997 * (c) The GHC Team, 1998-1999 @@ -1439,8 +1439,7 @@ process_gran_option(int arg, int *rts_argc, char *rts_argv[], rtsBool *error) } else if (RtsFlags.GranFlags.proc > MAX_PROC || RtsFlags.GranFlags.proc < 1) { - fprintf(stderr,"setupRtsFlags: no more than %u processors -allowed\n", + fprintf(stderr,"setupRtsFlags: no more than %u processors allowed\n", MAX_PROC); *error = rtsTrue; }