mirror of
https://github.com/Interlisp/maiko.git
synced 2026-01-14 15:36:34 +00:00
Declare unexported variables static and remove unused debug-related variables.
This commit is contained in:
parent
bb1b541014
commit
ce97f136ec
@ -71,10 +71,6 @@ extern DspInterface currentdsp;
|
||||
extern int LispWindowFd;
|
||||
int LispKbdFd = -1;
|
||||
|
||||
/* for debug */
|
||||
int DebugKBD = NIL;
|
||||
FILE *KBlog;
|
||||
|
||||
extern fd_set LispReadFds;
|
||||
|
||||
DLword *EmMouseX68K;
|
||||
@ -96,7 +92,7 @@ DLword *EmCursorBitMap68K;
|
||||
u_char *SUNLispKeyMap;
|
||||
|
||||
/* keymap for type3 */
|
||||
u_char SUNLispKeyMap_for3[128] = {
|
||||
static u_char SUNLispKeyMap_for3[128] = {
|
||||
/* 0 */ 255, 61, 255, 91, 255, 97, 99, 255,
|
||||
/* 8 */ 100, 255, 67, 255, 68, 255, 101, 255,
|
||||
/* 16 */ 66, 104, 80, 47, 255, 73, 74, 75,
|
||||
@ -117,7 +113,7 @@ u_char SUNLispKeyMap_for3[128] = {
|
||||
|
||||
/* for type4 */
|
||||
|
||||
u_char SUNLispKeyMap_for4[128] = {
|
||||
static u_char SUNLispKeyMap_for4[128] = {
|
||||
/* 0 */ 255, 61, 255, 91, 255, 97, 99, 106,
|
||||
/* 8 */ 100, 107, 67, 108, 68, 47, 101, 30,
|
||||
/* 16 */ 66, 104, 80, 31, 255, 75, 110, 74,
|
||||
@ -138,7 +134,7 @@ u_char SUNLispKeyMap_for4[128] = {
|
||||
|
||||
/* for jle */
|
||||
|
||||
u_char SUNLispKeyMap_jle[128] = {
|
||||
static u_char SUNLispKeyMap_jle[128] = {
|
||||
/* 0 */ 255, 61, 255, 91, 255, 97, 99, 106,
|
||||
/* 8 */ 100, 107, 67, 108, 68, 47, 101, 71,
|
||||
/* 16 */ 66, 104, 80, 31, 255, 75, 110, 74,
|
||||
@ -164,7 +160,7 @@ u_char SUNLispKeyMap_jle[128] = {
|
||||
/* [116] 255 -> 103 Henkan */
|
||||
/* [117] 255 -> 109 Nihongo On-Off */
|
||||
|
||||
u_char *XGenericKeyMap; /* filled in with malloc if needed */
|
||||
static u_char *XGenericKeyMap; /* filled in with malloc if needed */
|
||||
|
||||
/* For the IBM-101 kbd FF marks exceptions */
|
||||
|
||||
@ -183,7 +179,7 @@ u_char DOSLispKeyMap_101[0x80] = {
|
||||
#endif /* NEVER */
|
||||
|
||||
/* For the IBM-101 kbd FF marks exceptions */
|
||||
u_char DOSLispKeyMap_101[0x80] = {
|
||||
static u_char DOSLispKeyMap_101[0x80] = {
|
||||
/* 0 1 2 3 4 5 6 7 8 9 a b c d e f */
|
||||
|
||||
/* 0*/ 0xff, 33, 32, 17, 16, 1, 0, 2, 4, 53, 22, 8, 10, 59, 15, 34,
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user