ccl/cclerrms.c

   1 /*
   2  * Europagate, 1995
   3  *
   4  * $Log: cclerrms.c,v $
   5  * Revision 1.1  1995-04-10 10:28:18  quinn
   6  * Added copy of CCL.
   7  *
   8  * Revision 1.6  1995/02/23  08:31:59  adam
   9  * Changed header.
  10  *
  11  * Revision 1.4  1995/02/14  16:20:54  adam
  12  * Qualifiers are read from a file now.
  13  *
  14  * Revision 1.3  1995/02/14  10:25:56  adam
  15  * The constructions 'qualifier rel term ...' implemented.
  16  *
  17  * Revision 1.2  1995/02/13  15:15:06  adam
  18  * Added handling of qualifiers. Not finished yet.
  19  *
  20  * Revision 1.1  1995/02/13  12:35:20  adam
  21  * First version of CCL. Qualifiers aren't handled yet.
  22  *
  23  */
  24
  25 char *err_msg_array[] = {
  26     "Ok",
  27     "Search word expected",
  28     "')' expected",
  29     "Set name expected",
  30     "Operator expected",
  31     "Unbalanced ')'",
  32     "Unknown qualifier",
  33     "Qualifiers applied twice",
  34     "'=' expected",
  35     "Bad relation",
  36     "Left truncation not supported",
  37     "Both left - and right truncation not supported",
  38     "Right truncation not supported"
  39 };
  40
  41 const char *ccl_err_msg (int ccl_errno)
  42 {
  43     return err_msg_array[ccl_errno];
  44 }