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