Fix error message when the cache information file is not found.

diff --git a/v7/src/microcode/cmpintmd/hppa.h b/v7/src/microcode/cmpintmd/hppa.h
index 7cc37ea0bcaa90ca6030079cb9eb0397b01faf99..5b13037f614bd015b2ea7546c05c57a7f790a436 100644 (file)
--- a/v7/src/microcode/cmpintmd/hppa.h
+++ b/v7/src/microcode/cmpintmd/hppa.h
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/cmpintmd/hppa.h,v 1.13 1990/08/08 20:20:40 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/cmpintmd/hppa.h,v 1.14 1990/08/08 20:28:21 jinx Exp $
 
 Copyright (c) 1989, 1990 Massachusetts Institute of Technology
 
@@ -261,7 +261,7 @@ flush_i_cache_initialize ()
 
   if ((uname (&sysinfo)) < 0)
   {
-    fprintf (stderr, "\n: flush_i_cache: uname failed.\n");
+    fprintf (stderr, "\nflush_i_cache: uname failed.\n");
     return (-1);
   }
     
@@ -274,7 +274,7 @@ flush_i_cache_initialize ()
   fd = (open ((&filename[0]), O_RDONLY));
   if (fd < 0)
   {
-    fprintf (stderr, "\n: flush_i_cache: open (%s) failed.\n",
+    fprintf (stderr, "\nflush_i_cache: open (%s) failed.\n",
             (&filename[0]));
     return (-1);
   }
@@ -286,7 +286,7 @@ flush_i_cache_initialize ()
 
   if (read_result != (sizeof (struct pdc_cache_dump)))
   {
-    fprintf (stderr, "\n: flush_i_cache: read (%s) failed.\n",
+    fprintf (stderr, "\nflush_i_cache: read (%s) failed.\n",
             (&filename[0]));
     return (-1);
   }
@@ -294,7 +294,7 @@ flush_i_cache_initialize ()
   if ((strcmp (sysinfo.machine, cache_info.hardware)) != 0)
   {
     fprintf (stderr,
-            "\n: flush_i_cache: information in %s does not match hardware.\n",
+            "\nflush_i_cache: information in %s does not match hardware.\n",
             (&filename[0]));
     return (-1);
   }

diff --git a/v8/src/microcode/cmpintmd/hppa.h b/v8/src/microcode/cmpintmd/hppa.h
index cc2f0e69693cb3ae217c9a10d68d96e2db74e703..958dc3808a02813935883058380cff2ed3023c2f 100644 (file)
--- a/v8/src/microcode/cmpintmd/hppa.h
+++ b/v8/src/microcode/cmpintmd/hppa.h
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/cmpintmd/hppa.h,v 1.13 1990/08/08 20:20:40 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/cmpintmd/hppa.h,v 1.14 1990/08/08 20:28:21 jinx Exp $
 
 Copyright (c) 1989, 1990 Massachusetts Institute of Technology
 
@@ -261,7 +261,7 @@ flush_i_cache_initialize ()
 
   if ((uname (&sysinfo)) < 0)
   {
-    fprintf (stderr, "\n: flush_i_cache: uname failed.\n");
+    fprintf (stderr, "\nflush_i_cache: uname failed.\n");
     return (-1);
   }
     
@@ -274,7 +274,7 @@ flush_i_cache_initialize ()
   fd = (open ((&filename[0]), O_RDONLY));
   if (fd < 0)
   {
-    fprintf (stderr, "\n: flush_i_cache: open (%s) failed.\n",
+    fprintf (stderr, "\nflush_i_cache: open (%s) failed.\n",
             (&filename[0]));
     return (-1);
   }
@@ -286,7 +286,7 @@ flush_i_cache_initialize ()
 
   if (read_result != (sizeof (struct pdc_cache_dump)))
   {
-    fprintf (stderr, "\n: flush_i_cache: read (%s) failed.\n",
+    fprintf (stderr, "\nflush_i_cache: read (%s) failed.\n",
             (&filename[0]));
     return (-1);
   }
@@ -294,7 +294,7 @@ flush_i_cache_initialize ()
   if ((strcmp (sysinfo.machine, cache_info.hardware)) != 0)
   {
     fprintf (stderr,
-            "\n: flush_i_cache: information in %s does not match hardware.\n",
+            "\nflush_i_cache: information in %s does not match hardware.\n",
             (&filename[0]));
     return (-1);
   }