annotate oldXMenu/Error.c @ 39941:2f2aaaa2444e

*** empty log message ***
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sun, 14 Oct 2001 22:45:14 +0000
parents bbce331da1be
children 695cf19ef79e d7ddb3e565de
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
1 #include "copyright.h"
Dave Love <fx@gnu.org>
parents:
diff changeset
2
Dave Love <fx@gnu.org>
parents:
diff changeset
3 /* $Header: /u/src/emacs/19.0/oldXMenu/RCS/Error.c,v 1.1 1992/04/11 22:10:18 jimb Exp $ */
Dave Love <fx@gnu.org>
parents:
diff changeset
4 /* Copyright Massachusetts Institute of Technology 1985 */
Dave Love <fx@gnu.org>
parents:
diff changeset
5
Dave Love <fx@gnu.org>
parents:
diff changeset
6 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
7 * XMenu: MIT Project Athena, X Window system menu package
Dave Love <fx@gnu.org>
parents:
diff changeset
8 *
Dave Love <fx@gnu.org>
parents:
diff changeset
9 * XMenuError - Returns a string description of the current
Dave Love <fx@gnu.org>
parents:
diff changeset
10 * XMenu error status flag.
Dave Love <fx@gnu.org>
parents:
diff changeset
11 *
Dave Love <fx@gnu.org>
parents:
diff changeset
12 * Author: Tony Della Fera, DEC
Dave Love <fx@gnu.org>
parents:
diff changeset
13 * August, 1985
Dave Love <fx@gnu.org>
parents:
diff changeset
14 *
Dave Love <fx@gnu.org>
parents:
diff changeset
15 */
Dave Love <fx@gnu.org>
parents:
diff changeset
16
Dave Love <fx@gnu.org>
parents:
diff changeset
17 #include "XMenuInt.h"
Dave Love <fx@gnu.org>
parents:
diff changeset
18
Dave Love <fx@gnu.org>
parents:
diff changeset
19 char *
Dave Love <fx@gnu.org>
parents:
diff changeset
20 XMenuError()
Dave Love <fx@gnu.org>
parents:
diff changeset
21 {
Dave Love <fx@gnu.org>
parents:
diff changeset
22 static char message[128]; /* Error message buffer. */
Dave Love <fx@gnu.org>
parents:
diff changeset
23
Dave Love <fx@gnu.org>
parents:
diff changeset
24 if ((_XMErrorCode < XME_CODE_COUNT) && (_XMErrorCode >= 0)) {
Dave Love <fx@gnu.org>
parents:
diff changeset
25 return(_XMErrorList[_XMErrorCode]);
Dave Love <fx@gnu.org>
parents:
diff changeset
26 }
Dave Love <fx@gnu.org>
parents:
diff changeset
27 sprintf(message, "Unknown _XMErrorCode: %d", _XMErrorCode);
Dave Love <fx@gnu.org>
parents:
diff changeset
28 return(message);
Dave Love <fx@gnu.org>
parents:
diff changeset
29 }
Dave Love <fx@gnu.org>
parents:
diff changeset
30