root/trunk/oldXMenu/Error.c

Revision 4196, 0.7 kB (checked in by miyoshi, 2 years ago)

Sync up with Emacs CVS HEAD.

  • Property svn:eol-style set to native
Line 
1 /* Copyright    Massachusetts Institute of Technology    1985   */
2
3 #include "copyright.h"
4
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) */
Note: See TracBrowser for help on using the browser.