From: panne Date: Sat, 5 Oct 2002 22:18:46 +0000 (+0000) Subject: [project @ 2002-10-05 22:18:45 by panne] X-Git-Tag: Approx_11550_changesets_converted~1591 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=2c59dab883c0676cc8e398912d77e00f86cd7bbc;p=ghc-hetmet.git [project @ 2002-10-05 22:18:45 by panne] Warning police #12: Multi-line string literals are uncool. --- 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; } diff --git a/ghc/utils/prof/cgprof/cgprof.c b/ghc/utils/prof/cgprof/cgprof.c index 838bd5d..878f8ae 100644 --- a/ghc/utils/prof/cgprof/cgprof.c +++ b/ghc/utils/prof/cgprof/cgprof.c @@ -1,5 +1,5 @@ /* ------------------------------------------------------------------------ - * $Id: cgprof.c,v 1.1 2000/04/05 10:06:36 simonmar Exp $ + * $Id: cgprof.c,v 1.2 2002/10/05 22:18:46 panne Exp $ * * Copyright (C) 1995-2000 University of Oxford * @@ -1183,8 +1183,8 @@ void readRawProfile(FILE *fp,int *nonodes, int MaxNoNodes) { } /* end of new for loop */ *nonodes = symbol_table_next; - fprintf(log,"%s: read %d lines from profile.Graph contains %i nodes. - \n",Pgm,nolines,symbol_table_next); + fprintf(log,"%s: read %d lines from profile.Graph contains %i nodes.\n", + Pgm,nolines,symbol_table_next); free_cc_matrix(cc_m); /* be nice and clean up the cost centre matrix */ }