comparison src/keyboard.c @ 83026:77cfe20c109c

Fixed unsafe and incorrect use of record_unwind_protect in Fsuspend_emacs. src/keyboard.c (Fsuspend_emacs): Pass init_all_sys_modes, not init_sys_modes to record_unwind_protect. git-archimport-id: [e-mail]--2004/emacs--multi-tty--0--patch-66

83025:c66ebcc29777

  GCPRO1 (stuffstring);
  get_tty_size (fileno (TTY_INPUT (CURTTY ())), &old_width, &old_height);
  reset_all_sys_modes ();
  /* sys_suspend can get an error if it tries to fork a subshell
     and the system resources aren't available for that.  */
  record_unwind_protect ((Lisp_Object (*) P_ ((Lisp_Object))) init_sys_modes,
			 (Lisp_Object)CURTTY()); /* XXX */
  stuff_buffered_input (stuffstring);
  if (cannot_suspend)
    sys_subshell ();
  else
    sys_suspend ();

83026:77cfe20c109c

  GCPRO1 (stuffstring);
  get_tty_size (fileno (TTY_INPUT (CURTTY ())), &old_width, &old_height);
  reset_all_sys_modes ();
  /* sys_suspend can get an error if it tries to fork a subshell
     and the system resources aren't available for that.  */
  record_unwind_protect ((Lisp_Object (*) P_ ((Lisp_Object))) init_all_sys_modes,
			 Qnil);
  stuff_buffered_input (stuffstring);
  if (cannot_suspend)
    sys_subshell ();
  else
    sys_suspend ();