X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=ccl%2Fcclfind.c;h=20b9365778a4a2f935d50d94fd3e62634e5683d6;hb=a95a789a11a25cf2002a51ce1028f56c48e24b8f;hp=efd807bcd813546e8c8e7ee60f22bfc7f1abe08a;hpb=3888e88cde70f36851544ab7acc04e0943470ec6;p=yaz-moved-to-github.git

diff --git a/ccl/cclfind.c b/ccl/cclfind.c
index efd807b..20b9365 100644
--- a/ccl/cclfind.c
+++ b/ccl/cclfind.c
@@ -45,7 +45,17 @@
  * Europagate, 1995
  *
  * $Log: cclfind.c,v $
- * Revision 1.5  1996-10-11 15:00:24  adam
+ * Revision 1.8  1997-09-01 08:48:11  adam
+ * New windows NT/95 port using MSV5.0. Only a few changes made
+ * to avoid warnings.
+ *
+ * Revision 1.7  1997/05/14 06:53:26  adam
+ * C++ support.
+ *
+ * Revision 1.6  1997/04/30 08:52:06  quinn
+ * Null
+ *
+ * Revision 1.5  1996/10/11  15:00:24  adam
  * CCL parser from Europagate Email gateway 1.0.
  *
  * Revision 1.16  1996/01/08  08:41:13  adam
@@ -178,7 +188,7 @@ static char *copy_token_name (struct ccl_token *tp)
  * kind:   Type of node.
  * return: pointer to allocated node.
  */
-static struct ccl_rpn_node *mk_node (enum rpn_node_kind kind)
+static struct ccl_rpn_node *mk_node (int kind)
 {
     struct ccl_rpn_node *p;
     p = malloc (sizeof(*p));
@@ -254,7 +264,7 @@ static struct ccl_rpn_node *search_term (struct ccl_rpn_attr **qa)
     struct ccl_rpn_node *p;
     struct ccl_token *lookahead = look_token;
     int len = 0;
-    int no, i;
+    size_t no, i;
     int left_trunc = 0;
     int right_trunc = 0;
     int mid_trunc = 0;