procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(mouse_init1): Use alternate mouse detection for old mouse drivers.

Browse source 
(mouse_get_pos): Downscale coordinates by 8.
This commit is contained in:
Richard M. Stallman 1994-07-14 04:58:02 +00:00
parent a9c95e08a1
commit e118d5efd5
1 changed files with 16 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
src/msdos.c
View file

@ -1147,8 +1147,8 @@ mouse_get_pos (f, bar_window, part, x, y, time)
*f = selected_frame;
*bar_window = Qnil;
gettimeofday (&tv, NULL);
*x = make_number (regs.x.cx);
*y = make_number (regs.x.dx);
*x = make_number (regs.x.cx / 8);
*y = make_number (regs.x.dx / 8);
*time = tv.tv_usec;
mouse_moved = 0;
}
@ -1174,9 +1174,22 @@ mouse_init1 ()
union REGS regs;
int present;
if (!internal_terminal)
return 0;
regs.x.ax = 0x0021;
int86 (0x33, &regs, &regs);
present = internal_terminal && (regs.x.ax & 0xffff) == 0xffff;
present = (regs.x.ax & 0xffff) == 0xffff;
if (!present)
{
/* Reportedly, the above doesn't work for some mouse drivers. There
is an additional detection method that should work, but might be
a little slower. Use that as an alternative. */
regs.x.ax = 0x0000;
int86 (0x33, &regs, &regs);
present = (regs.x.ax & 0xffff) == 0xffff;
}
if (present)
{
if (regs.x.bx == 3)