projects
/
yaz-moved-to-github.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Enhancements and new bugs in Generic Frontend Server..
[yaz-moved-to-github.git]
/
src
/
ccltoken.c
diff --git
a/src/ccltoken.c
b/src/ccltoken.c
index
06ff2a7
..
7584473
100644
(file)
--- a/
src/ccltoken.c
+++ b/
src/ccltoken.c
@@
-41,10
+41,14
@@
* USE OR PERFORMANCE OF THIS SOFTWARE.
*
*/
* USE OR PERFORMANCE OF THIS SOFTWARE.
*
*/
+/**
+ * \file ccltoken.c
+ * \brief Implements CCL lexical analyzer (scanner)
+ */
/* CCL - lexical analysis
* Europagate, 1995
*
/* CCL - lexical analysis
* Europagate, 1995
*
- * $Id: ccltoken.c,v 1.3 2004-09-29 20:37:50 adam Exp $
+ * $Id: ccltoken.c,v 1.5 2004-10-15 00:19:00 adam Exp $
*
* Old Europagate Log:
*
*
* Old Europagate Log:
*
@@
-201,7
+205,7
@@
struct ccl_token *ccl_token_simple (const char *command)
struct ccl_token *ccl_parser_tokenize (CCL_parser cclp, const char *command)
{
const char *aliases;
struct ccl_token *ccl_parser_tokenize (CCL_parser cclp, const char *command)
{
const char *aliases;
- const unsigned char *cp = command;
+ const unsigned char *cp = (const unsigned char *) command;
struct ccl_token *first = NULL;
struct ccl_token *last = NULL;
struct ccl_token *first = NULL;
struct ccl_token *last = NULL;
@@
-226,7
+230,7
@@
struct ccl_token *ccl_parser_tokenize (CCL_parser cclp, const char *command)
last = last->next;
}
last->next = NULL;
last = last->next;
}
last->next = NULL;
- last->name = cp;
+ last->name = (const char *) cp;
last->len = 1;
switch (*cp++)
{
last->len = 1;
switch (*cp++)
{
@@
-267,7
+271,7
@@
struct ccl_token *ccl_parser_tokenize (CCL_parser cclp, const char *command)
break;
case '\"':
last->kind = CCL_TOK_TERM;
break;
case '\"':
last->kind = CCL_TOK_TERM;
- last->name = cp;
+ last->name = (const char *) cp;
last->len = 0;
while (*cp && *cp != '\"')
{
last->len = 0;
while (*cp && *cp != '\"')
{