diff --git a/ghc/rts/Printer.c b/ghc/rts/Printer.c
index c8059ab43bc5bdd813347dfe49703e37141057e8..c165adaab4a558a563fc5febf37a9c2576ceffb9 100644
--- a/ghc/rts/Printer.c
+++ b/ghc/rts/Printer.c
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: Printer.c,v 1.20 2000/01/14 14:56:40 simonmar Exp $
+ * $Id: Printer.c,v 1.21 2000/02/14 10:59:30 sewardj Exp $
  *
  * (c) The GHC Team, 1994-2000.
  *
@@ -410,7 +410,7 @@ void printStackChunk( StgPtr sp, StgPtr spBottom )
 	  sp++;
 	small_bitmap:
 	  while (bitmap != 0) {
-	    fprintf(stderr,"Stack[%d] (%p) = ", spBottom-sp, sp);
+	    fprintf(stderr,"   stk[%d] (%p) = ", spBottom-sp, sp);
 	    if ((bitmap & 1) == 0) {
 	      printPtr((P_)*sp);
 	      fprintf(stderr,"\n");