mirror of
https://github.com/Interlisp/maiko.git
synced 2026-01-15 15:57:13 +00:00
80c9c796c5
* Update struct DevRec methods to take a "void *" parameter since they get called with different xxxInterface records depending on whether they are a keyboard, mouse, or display. Introduce GenericReturnVoid method implementation for use where needed with DevRec methods. (see mouseif.c) * Cast functions implementing DevRec methods as appropriate to match the method signature. * Update struct DspInterfaceRec methods cleardisplay, bitblt_to_screen, mouse_invisible, and mouse_visible to declare the parameters they require and all return unsigned long results (though it's not clear that this is actually the correct type). Requires updating dosmouse.c method implementations. * Update GenericReturnT and GenericPanic method implementations to have the signature required by the method slots they are used in. * Correct DOS-only section with incorrect arguments to device.exit call for the mouse. * Use include "dspifdefs.h" for prototypes for GenericReturnXXX method implementations.
40 lines
1.1 KiB
C
40 lines
1.1 KiB
C
/* $Id: kbdif.c,v 1.3 1999/05/31 23:35:35 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved */
|
|
|
|
/************************************************************************/
|
|
/* */
|
|
/* (C) Copyright 1989, 1990, 1990, 1991, 1992, 1993, 1994, 1995 Venue. */
|
|
/* All Rights Reserved. */
|
|
/* Manufactured in the United States of America. */
|
|
/* */
|
|
/************************************************************************/
|
|
|
|
#include "version.h"
|
|
|
|
/* * K Y E B O A R D I N T E R F A C E * */
|
|
|
|
#include "lispemul.h"
|
|
#include "dbprint.h"
|
|
#include "devif.h"
|
|
#include "dspifdefs.h"
|
|
|
|
KbdInterfaceRec curkbd;
|
|
KbdInterface currentkbd = &curkbd;
|
|
|
|
#ifdef DOS
|
|
extern void Kbd_event(void);
|
|
extern void EnterDosKbd(void);
|
|
extern void ExitDosKbd(void);
|
|
#endif /* DOS */
|
|
|
|
void make_kbd_instance(KbdInterface kbd) {
|
|
#ifdef DOS
|
|
kbd->device_event = &Kbd_event; /* */
|
|
kbd->device.enter = &EnterDosKbd;
|
|
kbd->device.exit = &ExitDosKbd;
|
|
kbd->device.before_raid = &ExitDosKbd;
|
|
kbd->device.after_raid = &EnterDosKbd;
|
|
kbd->device.active = FALSE;
|
|
#elif XWINDOW
|
|
#endif /* DOS or XWINDOW */
|
|
}
|