2 files changed, 6 insertions, 1 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index cab7a2a94b3..f66e221ac33 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2002-07-21  Ken Raeburn  <raeburn@gnu.org>
+
+        * buffer.c (mmap_realloc): When shrinking, make sure number of
+        pages is rounded towards zero.
+
 2002-07-20  Richard M. Stallman  <rms@gnu.org>
 
         * print.c (print_error_message): New args CONTEXT and CALLER.
diff --git a/src/buffer.c b/src/buffer.c
index 6656b8d1f4e..bf1b49e6ff4 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -4670,7 +4670,7 @@ mmap_realloc (var, nbytes)
         {
           /* Shrinking by at least a page.  Let's give some
              memory back to the system.  */
-          mmap_enlarge (r, - (room - nbytes) / mmap_page_size);
+          mmap_enlarge (r, - ((room - nbytes) / mmap_page_size));
           result = *var;
           r->nbytes_specified = nbytes;
         }