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