Skip to content

Commit 75c668f

Browse files
authored
The pointers Atomspace, Spospspace, Snegspace, Arrayspace can be removed (#402)
These pointers are neither initialized nor referenced anywhere in the code.
1 parent a253687 commit 75c668f

File tree

3 files changed

+0
-9
lines changed

3 files changed

+0
-9
lines changed

inc/lspglob.h

Lines changed: 0 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -31,7 +31,6 @@
3131
#include "lispemul.h" /* for LispPTR, DLword */
3232
#include "miscstat.h" /* for MISCSTAT */
3333

34-
extern DLword *Atomspace; /* ATOMSPACE */
3534
extern DLword *Stackspace; /* STACKSPACE*/
3635
extern DLword *Plistspace; /* PLISTSPACE */
3736
extern DLword *DTDspace; /* DTDSPACE */
@@ -41,8 +40,6 @@
4140
extern DLword *AtomSpace; /* New atoms, initial set */
4241
extern DLword *Defspace; /* DEFSPACE */
4342
extern DLword *Valspace; /* VALSPACE */
44-
extern DLword *Spospspace; /* POSITIVE Smallp */
45-
extern DLword *Snegspace; /* NEGATIVE Smallp */
4643

4744
/* For Virtual Mem Management */
4845
#ifdef BIGVM
@@ -82,7 +79,6 @@ extern DLword *UFNTable ;
8279

8380

8481
/* FLEX STORAGES */
85-
extern DLword *Arrayspace; /* Start of ARRAYSPACE */
8682
extern DLword *MDS_space_bottom; /* Start of MDS (pre -2) */
8783
extern DLword *PnCharspace ; /* Space for PN char codes (Thin only) */
8884

src/main.c

Lines changed: 0 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -75,7 +75,6 @@
7575
DLword *Lisp_world; /* lispworld */
7676

7777
/********** 68k address for Lisp Space **********/
78-
DLword *Atomspace;
7978
DLword *Stackspace;
8079
DLword *Plistspace;
8180
DLword *DTDspace;
@@ -85,8 +84,6 @@ DLword *Pnamespace;
8584
DLword *AtomSpace;
8685
DLword *Defspace;
8786
DLword *Valspace;
88-
DLword *Spospspace;
89-
DLword *Snegspace;
9087

9188
/********** For Virtual Memory Management **********/
9289
#ifdef BIGVM
@@ -124,7 +121,6 @@ DLword *HTcoll;
124121
DLword *DisplayRegion;
125122
int DisplayInitialized = NIL;
126123

127-
DLword *Arrayspace;
128124
DLword *MDS_space_bottom;
129125
DLword *PnCharspace;
130126
struct dtd *ListpDTD;

src/mkatom.c

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -267,7 +267,6 @@ LispPTR compare_lisp_chars(register const char *char1, register const char *char
267267
LispPTR make_atom(const char *char_base, DLword offset, DLword length, short int non_numericp)
268268
/* if it is NIL then these chars are treated as NUMBER */
269269
{
270-
extern DLword *Spospspace;
271270
extern DLword *AtomHT;
272271
extern DLword *Pnamespace;
273272
extern DLword *AtomSpace;

0 commit comments

Comments
 (0)