X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fsave.c;h=b7faa3771f6d0820bd9a8f098a76b2b46683b35e;hb=0285aa5ff8416027932daa001b84429be2ca559b;hp=9746524918536e3e6abcba38486ab23c15d9f255;hpb=d6f9676ae94419cb5544c45821a8d31adbc1fbe8;p=sbcl.git

diff --git a/src/runtime/save.c b/src/runtime/save.c
index 9746524..b7faa37 100644
--- a/src/runtime/save.c
+++ b/src/runtime/save.c
@@ -311,7 +311,7 @@ save_to_filehandle(FILE *file, char *filename, lispobj init_function,
         if (data) {
             unsigned long word;
             long offset;
-            int i;
+            page_index_t i;
             for (i = 0; i < last_free_page; i++) {
                 /* Thanks to alignment requirements, the two low bits
                  * are always zero, so we can use them to store the