diff --git a/inc/vmemsavedefs.h b/inc/vmemsavedefs.h
index 3b09540..b4dae60 100644
--- a/inc/vmemsavedefs.h
+++ b/inc/vmemsavedefs.h
@@ -1,7 +1,6 @@
 #ifndef VMEMSAVEDEFS_H
 #define VMEMSAVEDEFS_H 1
-#include "lispemul.h" /* for LispPTR, DLword */
-int lispstringP(LispPTR Lisp);
+#include "lispemul.h" /* for LispPTR */
 LispPTR vmem_save(char *sysout_file_name);
 LispPTR vmem_save0(LispPTR *args);
 void lisp_finish(int exit_status);
diff --git a/src/vmemsave.c b/src/vmemsave.c
index e77af0f..3ef5fac 100644
--- a/src/vmemsave.c
+++ b/src/vmemsave.c
@@ -92,7 +92,7 @@ extern int please_fork;
 /*									*/
 /************************************************************************/
 
-int lispstringP(LispPTR Lisp)
+static int lispstringP(LispPTR Lisp)
 {
   switch (((OneDArray *)(NativeAligned4FromLAddr(Lisp)))->typenumber) {
     case THIN_CHAR_TYPENUMBER: