1
0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-14 23:46:14 +00:00

Remove some unused DOS defines and variables. (#301)

This commit is contained in:
Bruce Mitchener 2021-01-26 12:38:51 +07:00 committed by GitHub
parent f75318cd8c
commit 91ef549b15
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 0 additions and 52 deletions

View File

@ -41,46 +41,6 @@
#include <pixrect/pixrect_hs.h>
#endif /* SUNDISPLAY */
#ifdef DOS
#define KBD_COMMAND_PORT 0x64
#define KBD_ENABLE 0xAE
#define KBD_DISABLE 0xAD
#define KBD_RESET 0xF6
#define PORT_8042 0x60
#define KBD_SCAN_CODE_PORT 0x60
#define KBD_resend 0xFE
#define KBD_ack 0xFA
#define KBD_echo_responce 0xEE
#define KBD_failiure 0xFD
#define KBD_prefix 0xE0
#define KBD_pause_prefix 0xE1
#define KBD_overflow 0x00
#define INTA00 0x20 /* The 8259 port */
#define ENDOFINTERRUPT 0x20
#define PRTSC_KEY 0x37
#define HOME_KEY 0x47
#define UPARROW_KEY 0x48
#define PGUP_KEY 0x49
#define LEFTARROW_KEY 0x4b
#define RIGHTARROW_KEY 0x4d
#define END_KEY 0x4f
#define DOWNARROW_KEY 0x50
#define PGDOWN_KEY 0x51
#define INS_KEY 0x52
#define DEL_KEY 0x53
void (*prev_int_09)(); /* keeps address of previous 09 handlr*/
#pragma interrupt(DOSkbd)
void DOSkbd(void); /* the flih-kbd handler INT 0x09 */
unsigned char inchar = 0;
extern int KBDEventFlg;
#endif /* DOS */
#ifdef XWINDOW
#include <X11/Xlib.h>
#include <X11/Xutil.h>
@ -296,7 +256,6 @@ void init_keyboard(int flg) /* if 0 init else re-init */
make_mouse_instance(currentmouse);
(currentmouse->device.enter)(currentmouse, currentdsp);
}
/* outp( KBD_COMMAND_PORT, KBD_RESET); Reset the kbd */
#endif /* XWINDOW DOS */
}

View File

@ -39,10 +39,6 @@
#ifdef DOS
#define PORT_A 0x60
#define KBD_COMMAND_PORT 0x64
#define KBD_ENABLE 0xAE
#define KBD_DISABLE 0xAD
#include "devif.h"
extern KbdInterface currentkbd;
extern DspInterface currentdsp;
@ -82,7 +78,6 @@ void KB_enable(LispPTR *args) /* args[0] : ON/OFF flag
enable_Xkeyboard(currentdsp);
#elif DOS
(currentkbd->device.enter)(currentkbd);
/* outp( KBD_COMMAND_PORT, KBD_ENABLE); */
#endif /* DOS */
} else if (args[0] == NIL) {
#ifdef SUNDISPLAY
@ -91,7 +86,6 @@ void KB_enable(LispPTR *args) /* args[0] : ON/OFF flag
disable_Xkeyboard(currentdsp);
#elif DOS
(currentkbd->device.exit)(currentkbd);
/* outp( KBD_COMMAND_PORT, KBD_DISABLE); */
#endif /* DOS */
} else {
error("KB_enable: illegal arg \n");

View File

@ -152,11 +152,6 @@ register LispPTR tscache asm("bx");
#define PVARL PVar
#define IVARL IVar
#ifdef DOS
extern unsigned char inchar;
extern unsigned short kn;
#endif
#ifdef XWINDOW
extern int Event_Req; /* != 0 when it's time to check X events
on machines that don't get them reliably