ccl/cclerrms.c

   1 /*
   2  * Europagate, 1995
   3  *
   4  * $Log: cclerrms.c,v $
   5  * Revision 1.1  1995/02/13 12:35:20  adam
   6  * First version of CCL. Qualifiers aren't handled yet.
   7  *
   8  */
   9
  10 char *err_msg_array[] = {
  11     "Ok",
  12     "Search word expected",
  13     ") expected",
  14     "Set name expected",
  15     "Operator expected",
  16     "Unbalanced )"
  17 };
  18
  19 const char *ccl_err_msg (int ccl_errno)
  20 {
  21     return err_msg_array[ccl_errno];
  22 }