From e1c4263dd8a9fa4adfaabe8018c2449269767070 Mon Sep 17 00:00:00 2001
From: Nick Briggs <nicholas.h.briggs@gmail.com>
Date: Fri, 23 Dec 2022 15:06:28 -0800
Subject: [PATCH] Remove extraneous extern references for Lisp_world that are
 covered by lspglob.h

---
 inc/locfile.h  | 4 ----
 src/dosmouse.c | 1 -
 src/mkatom.c   | 2 --
 src/mouseif.c  | 1 -
 src/xinit.c    | 1 -
 5 files changed, 9 deletions(-)

diff --git a/inc/locfile.h b/inc/locfile.h
index 4640bff..b0fda81 100644
--- a/inc/locfile.h
+++ b/inc/locfile.h
@@ -33,10 +33,6 @@
 #define	EOL			(S_POSITIVE | 7)
 #define	ALL			(S_POSITIVE | 8)
 
-
-extern	DLword	*Lisp_world;	/* To access LispSysout area */
-
-
 #define	ToLispTime(x)	((int)(x) + 29969152)
 			/* For getfileinfo. For WDATE&RDATE */
 			/* 29969152 == (timer.c)LISP_UNIX_TIME_DIFF */
diff --git a/src/dosmouse.c b/src/dosmouse.c
index 2aede40..173950d 100644
--- a/src/dosmouse.c
+++ b/src/dosmouse.c
@@ -35,7 +35,6 @@ extern KbdInterface currentkbd;
 
 extern keybuffer *CTopKeyevent;
 extern DLword *DisplayRegion68k;
-extern DLword *Lisp_world;
 
 extern LispPTR *KEYBOARDEVENTQUEUE68k;
 extern LispPTR *KEYBUFFERING68k;
diff --git a/src/mkatom.c b/src/mkatom.c
index dea1472..526f890 100644
--- a/src/mkatom.c
+++ b/src/mkatom.c
@@ -46,8 +46,6 @@
 
 #define Atom_reprobe(hash, char) ((((char)^(hash)) | 1) & 63)
 
-extern DLword *Lisp_world;
-
 /**********************************************************************/
 /*
         Func name :	compute_hash
diff --git a/src/mouseif.c b/src/mouseif.c
index 6a7651e..0f74df8 100644
--- a/src/mouseif.c
+++ b/src/mouseif.c
@@ -24,7 +24,6 @@ MouseInterface currentmouse = &curmouse;
 #include "dspifdefs.h"  /* for GenericReturnVoid */
 
 int nomouseflag = FALSE;
-extern DLword *Lisp_world;
 extern LispPTR *LASTUSERACTION68k;
 extern int twobuttonflag;
 
diff --git a/src/xinit.c b/src/xinit.c
index 9ce71d4..9278a2f 100644
--- a/src/xinit.c
+++ b/src/xinit.c
@@ -29,7 +29,6 @@
 /* DISPLAY_MAX same magic number is in ldsout.c */
 #define DISPLAY_MAX (65536 * 16 * 2)
 
-extern DLword *Lisp_world;
 extern char Display_Name[128];
 extern DLword *DisplayRegion68k;
 extern int noscroll;