summarylogtreecommitdiffstats
path: root/0002.patch
blob: cf4604001f4476ca8367b43b2878e36e5ea771b5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
From 997de91062d1f152d0c3b322a1e3694243e4a403 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?J=C4=81nis=20D=C5=BEeri=C5=86=C5=A1?=
 <smuglispweenie@gmail.com>
Date: Sat, 23 May 2020 16:19:26 +0300
Subject: [PATCH 2/4] Remove unused variables


 100.0% lisp-kernel/
diff --git a/lisp-kernel/gc.h b/lisp-kernel/gc.h
index acc9e184..58a4f227 100644
--- a/lisp-kernel/gc.h
+++ b/lisp-kernel/gc.h
@@ -83,7 +83,6 @@ void gc(TCR *, signed_natural);
 int change_hons_area_size(TCR *, signed_natural);
 void delete_protected_area(protected_area_ptr);
 Boolean egc_control(Boolean, BytePtr);
-Boolean free_segments_zero_filled_by_OS;
 Boolean new_heap_segment(ExceptionInformation *, natural, Boolean , TCR *, Boolean *);
 void platform_new_heap_segment(ExceptionInformation *, TCR*, BytePtr, BytePtr);
 /* an type representing 1/4 of a natural word */
diff --git a/lisp-kernel/threads.h b/lisp-kernel/threads.h
index 4a79fa21..06da1227 100644
--- a/lisp-kernel/threads.h
+++ b/lisp-kernel/threads.h
@@ -187,7 +187,6 @@ void tsd_set(LispObj, void *);
 void *tsd_get(LispObj);
 TCR *new_tcr(natural, natural);
 void thread_init_tcr(TCR *tcr, void *stack_base, natural stack_size);
-TCR *initial_thread_tcr;
 
 #define DEFAULT_THREAD_STACK_SIZE ((size_t) -1)
 #define MINIMAL_THREAD_STACK_SIZE ((size_t) 0)
-- 
2.27.0