From 74a0991683299827a7bdd01e8d38bbb04b2a881f Mon Sep 17 00:00:00 2001
From: wlott <wlott>
Date: Wed, 18 Jul 1990 11:01:23 +0000
Subject: [PATCH] Changed the writing n words message to be writing n bytes to
 be consistent.

---
 ldb/save.c | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/ldb/save.c b/ldb/save.c
index 099988a5a..68677e600 100644
--- a/ldb/save.c
+++ b/ldb/save.c
@@ -56,20 +56,23 @@ static void output_space(id, addr, end)
 int id;
 lispobj *addr, *end;
 {
-    int words, data;
+    int words, bytes, data;
     static char *names[] = {NULL, "Dynamic", "Static", "Read-Only"};
 
     putw(id, save_file);
     words = end - addr;
     putw(words, save_file);
 
-    printf("Writing %d words from the %s space at 0x%08x.\n", words, names[id], addr);
+    bytes = words * sizeof(lispobj);
 
-    data = write_bytes((char *)addr, words*sizeof(lispobj));
+    printf("Writing %d bytes from the %s space at 0x%08x.\n",
+           bytes, names[id], addr);
+
+    data = write_bytes((char *)addr, bytes);
 
     putw(data, save_file);
     putw((vm_address_t)addr / CORE_PAGESIZE, save_file);
-    putw((words*sizeof(lispobj) + CORE_PAGESIZE - 1) / CORE_PAGESIZE, save_file);
+    putw((bytes + CORE_PAGESIZE - 1) / CORE_PAGESIZE, save_file);
 }
 
 static long write_stack(name, start, end)
-- 
GitLab