X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=src%2Fcclfind.c;h=82dd726bf828443f142b191b1dd39af535ac68b5;hb=a87770ed51d988ce5a0b2f5f886dd4211c4055d6;hp=08a4f79440fcd2c0ba2d35d302d77021bc654400;hpb=6e8a8f144dfc8225d07a56d6a7f18056cb18ee22;p=yaz-moved-to-github.git diff --git a/src/cclfind.c b/src/cclfind.c index 08a4f79..82dd726 100644 --- a/src/cclfind.c +++ b/src/cclfind.c @@ -44,7 +44,7 @@ /* CCL find (to rpn conversion) * Europagate, 1995 * - * $Id: cclfind.c,v 1.2 2004-08-11 09:02:48 adam Exp $ + * $Id: cclfind.c,v 1.3 2004-08-11 20:13:36 adam Exp $ * * Old Europagate log: * @@ -451,7 +451,7 @@ static struct ccl_rpn_node *search_term_x (CCL_parser cclp, else add_attr_numeric (p, attset, CCL_BIB1_STR, 1); } - + /* make the RPN token */ p->u.t.term = (char *)xmalloc (len); ccl_assert (p->u.t.term); @@ -466,7 +466,7 @@ static struct ccl_rpn_node *search_term_x (CCL_parser cclp, src_len--; src_str++; } - else if (i == no-1 && right_trunc) + if (i == no-1 && right_trunc) src_len--; if (src_len) {