oldXMenu/Error.c

   1 #include "copyright.h"
   2
   3 /* $Header: /u/src/emacs/19.0/oldXMenu/RCS/Error.c,v 1.1 1992/04/11 22:10:18 jimb Exp $ */
   4 /* Copyright    Massachusetts Institute of Technology    1985   */
   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