X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/8b031dcc5f69c3c436fdeb4695e4cd4bbe73e915..40aeecadb8fc54c941eb36c6584654627c300c39:/src/w32proc.c diff --git a/src/w32proc.c b/src/w32proc.c index 97ab6fcc15..21bdebbbec 100644 --- a/src/w32proc.c +++ b/src/w32proc.c @@ -1,5 +1,5 @@ /* Process support for GNU Emacs on the Microsoft W32 API. - Copyright (C) 1992, 1995 Free Software Foundation, Inc. + Copyright (C) 1992, 1995, 1999 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -91,10 +91,6 @@ Lisp_Object Vw32_get_true_file_attributes; Lisp_Object Qhigh, Qlow; -#ifndef SYS_SIGLIST_DECLARED -extern char *sys_siglist[]; -#endif - #ifdef EMACSDEBUG void _DebPrint (const char *fmt, ...) { @@ -546,13 +542,11 @@ get_result: else if (WIFSIGNALED (retval)) { int code = WTERMSIG (retval); - char *signame = 0; - - if (code < NSIG) - { - /* Suppress warning if the table has const char *. */ - signame = (char *) sys_siglist[code]; - } + char *signame; + + synchronize_system_messages_locale (); + signame = strsignal (code); + if (signame == 0) signame = "unknown"; @@ -2068,11 +2062,11 @@ If successful, the new layout id is returned, otherwise nil.") DWORD kl; CHECK_CONS (layout, 0); - CHECK_NUMBER (XCONS (layout)->car, 0); - CHECK_NUMBER (XCONS (layout)->cdr, 0); + CHECK_NUMBER (XCAR (layout), 0); + CHECK_NUMBER (XCDR (layout), 0); - kl = (XINT (XCONS (layout)->car) & 0xffff) - | (XINT (XCONS (layout)->cdr) << 16); + kl = (XINT (XCAR (layout)) & 0xffff) + | (XINT (XCDR (layout)) << 16); /* Synchronize layout with input thread. */ if (dwWindowsThreadId)