github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-22 10:21:30 +00:00
Code Issues Projects Releases Wiki Activity

Replace int_timer_on|off with int_(un)block. (#193)

Browse Source 
Both were used, but one just called the other, so simplify
the API.
This commit is contained in:
Bruce Mitchener 2021-01-09 12:38:54 +07:00 committed by GitHub
parent f3b52564e4
commit 0e3d3acd4e
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 6 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
inc/timerdefs.h
View File

@ -11,7 +11,5 @@ void int_io_open(int fd);
void int_io_close(int fd);
void int_block(void);
void int_unblock(void);
void int_timer_off(void);
void int_timer_on(void);
void int_init(void);
#endif

8
src/loader.c
View File

@ -102,9 +102,9 @@ int do_system_call(LispPTR arg)
#ifdef DEBUG
printf(":: %s \n", cmd_str);
#endif
int_timer_off();
int_block();
result = system(cmd_str);
int_timer_on();
int_unblock();
ARITH_SWITCH(result, lisp_result);
return (lisp_result);
}
@ -159,9 +159,9 @@ int exec_command(char *cmd_str)
char ws[21][80];
int i, ii, cmd_length;
int_timer_off();
int_block();
i = system(cmd_str);
int_timer_on();
int_unblock();
return (i);
} /*exec_command */

3
src/timer.c
View File

@ -631,9 +631,6 @@ void int_unblock() {
#endif /* DOS */
}
void int_timer_on() { int_unblock(); }
void int_timer_off() { int_block(); }
#ifdef FLTINT
/************************************************************************/
/* */

4
src/uraid.c
View File

@ -878,7 +878,7 @@ int device_before_raid() {
sigset_t signals;
#endif
int_timer_off();
int_block();
#ifdef XWINDOW
/* So X events still get recognized. */
@ -1127,7 +1127,7 @@ int device_after_raid() {
flush_display_buffer();
#endif /* XWINDOW | DOS */
int_timer_on();
int_unblock();
*EmKbdAd068K = *EmRealUtilin68K = *EmKbdAd168K = *EmKbdAd268K = *EmKbdAd368K = *EmKbdAd468K =
*EmKbdAd568K = KB_ALLUP;
return (0);