/* -*-C-*-
-$Id: uxsig.c,v 1.43 2005/12/25 17:04:39 riastradh Exp $
+$Id: uxsig.c,v 1.44 2005/12/31 20:02:16 riastradh Exp $
Copyright 1990,1991,1992,1993,1994,1996 Massachusetts Institute of Technology
Copyright 2000,2001,2005 Massachusetts Institute of Technology
static
DEFUN_STD_HANDLER (sighnd_console_resize,
{
- extern void EXFUN (UX_initialize_tty, (void));
- UX_initialize_tty ();
+ extern void EXFUN (UX_reinitialize_tty, (void));
+ UX_reinitialize_tty ();
request_console_resize_interrupt ();
})
/* -*-C-*-
-$Id: uxtty.c,v 1.12 2003/02/14 18:28:24 cph Exp $
+$Id: uxtty.c,v 1.13 2005/12/31 20:02:16 riastradh Exp $
Copyright (c) 1990-1999 Massachusetts Institute of Technology
}
void
-DEFUN_VOID (UX_initialize_tty)
+DEFUN_VOID (UX_reinitialize_tty)
{
extern int EXFUN (atoi, (CONST char *));
- extern Tchannel EXFUN (OS_open_fd, (int fd));
- input_channel = (OS_open_fd (STDIN_FILENO));
- (CHANNEL_INTERNAL (input_channel)) = 1;
- output_channel = (OS_open_fd (STDOUT_FILENO));
- (CHANNEL_INTERNAL (output_channel)) = 1;
+
tty_x_size = (-1);
tty_y_size = (-1);
tty_command_beep = ALERT_STRING;
tty_command_clear = command;
}
}
+
+void
+DEFUN_VOID (UX_initialize_tty)
+{
+ extern Tchannel EXFUN (OS_open_fd, (int fd));
+ input_channel = (OS_open_fd (STDIN_FILENO));
+ (CHANNEL_INTERNAL (input_channel)) = 1;
+ output_channel = (OS_open_fd (STDOUT_FILENO));
+ (CHANNEL_INTERNAL (output_channel)) = 1;
+ UX_reinitialize_tty ();
+}
#| -*-Scheme-*-
-$Id: intrpt.scm,v 14.26 2005/12/25 17:04:39 riastradh Exp $
+$Id: intrpt.scm,v 14.27 2005/12/31 20:02:16 riastradh Exp $
Copyright 1986,1987,1988,1990,1991,1992 Massachusetts Institute of Technology
Copyright 1993,1994,2004,2005 Massachusetts Institute of Technology
(define (console-resize-handler interrupt-code interrupt-enables)
interrupt-code interrupt-enables
(clear-interrupts! interrupt-bit/global-3)
- (event-distributor/invoke! event:console-resize))
+ (cond ((console-thread)
+ => (lambda (thread)
+ (signal-thread-event thread
+ (lambda ()
+ (event-distributor/invoke! event:console-resize)))))))
(define ((illegal-interrupt-handler interrupt-bit)
interrupt-code interrupt-enables)