Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-13
[bpt/emacs.git] / oldXMenu / Error.c
1 #include "copyright.h"
2
3 /* Copyright Massachusetts Institute of Technology 1985 */
4 /* Copyright (C) 2002, 2003, 2004, 2005,
5 2006 Free Software Foundation, Inc. */
6
7 /*
8 * XMenu: MIT Project Athena, X Window system menu package
9 *
10 * XMenuError - Returns a string description of the current
11 * XMenu error status flag.
12 *
13 * Author: Tony Della Fera, DEC
14 * August, 1985
15 *
16 */
17
18 #include "XMenuInt.h"
19
20 char *
21 XMenuError()
22 {
23 static char message[128]; /* Error message buffer. */
24
25 if ((_XMErrorCode < XME_CODE_COUNT) && (_XMErrorCode >= 0)) {
26 return(_XMErrorList[_XMErrorCode]);
27 }
28 sprintf(message, "Unknown _XMErrorCode: %d", _XMErrorCode);
29 return(message);
30 }
31
32 /* arch-tag: 5fff4a23-40ca-40d0-8887-c50fc73dea9d
33 (do not change this comment) */