github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-04-28 13:08:06 +00:00
Code Issues Projects Releases Wiki Activity

Clean up usage of the native address of the I/O page and its struct typedef

Browse Source 
The global variable holding the native address of the I/O page is spelled "IOPage"
The global variable "IOPage" is declared extern by "lspglob.h"
The structure pointed to by IOPage is named IOPAGE and is defined in "iopage.h"
If there is no direct reference to the IOPAGE struct do not include "iopage.h"
This commit is contained in:
Nick Briggs
2022-12-24 15:17:49 -08:00
parent 602fff2c2f
commit 1c6277d313
15 changed files with 68 additions and 82 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/bitblt.c
View File

@@ -38,9 +38,7 @@ extern int kbd_for_makeinit;
#ifdef DOS
#include "devif.h"
#include "iopage.h"
extern DspInterface currentdsp;
extern IOPAGE *IOPage68K;
#endif
extern int LispWindowFd;
@@ -118,7 +116,7 @@ LispPTR N_OP_pilotbitblt(LispPTR pilot_bt_tbl, LispPTR tos)
curr_gray_line = ((TEXTUREBBT *)pbt)->pbtgrayoffset;
#if DOS
if (displayflg) (currentdsp->mouse_invisible)(currentdsp, IOPage68K);
if (displayflg) (currentdsp->mouse_invisible)(currentdsp, IOPage);
;
#endif /* SUNDISPLAY / DOS */
@@ -126,7 +124,7 @@ LispPTR N_OP_pilotbitblt(LispPTR pilot_bt_tbl, LispPTR tos)
#if DOS
flush_display_lineregion(dx, dstbase, w, h);
if (displayflg) (currentdsp->mouse_visible)(IOPage68K->dlmousex, IOPage68K->dlmousey);
if (displayflg) (currentdsp->mouse_visible)(IOPage->dlmousex, IOPage->dlmousey);
#endif /* SUNDISPLAY / DOS */
#ifdef XWINDOW