Implemented and-list and or-list for CCL module.

[yaz-moved-to-github.git] / ccl / cclqfile.c

diff --git a/ccl/cclqfile.c b/ccl/cclqfile.c
index 2263291..f8b2438 100644 (file)
--- a/ccl/cclqfile.c
+++ b/ccl/cclqfile.c
@@ -45,7 +45,15 @@
  * Europagate, 1995
  *
  * $Log: cclqfile.c,v $
- * Revision 1.3  1999-11-30 13:47:11  adam
+ * Revision 1.5  2000-10-17 19:50:28  adam
+ * Implemented and-list and or-list for CCL module.
+ *
+ * Revision 1.4  2000/01/31 13:15:21  adam
+ * Removed uses of assert(3). Cleanup of ODR. CCL parser update so
+ * that some characters are not surrounded by spaces in resulting term.
+ * ILL-code updates.
+ *
+ * Revision 1.3  1999/11/30 13:47:11  adam
  * Improved installation. Moved header files to include/yaz.
  *
  * Revision 1.2  1997/04/30 08:52:06  quinn
@@ -69,7 +77,6 @@
 
 #include <stdio.h>
 #include <stdlib.h>
-#include <assert.h>
 #include <string.h>
 
 #include <yaz/ccl.h>
@@ -123,6 +130,10 @@ void ccl_qual_fitem (CCL_bibset bibset, const char *cp, const char *qual_name)
                 type = CCL_BIB1_STR;
                 if (!ccl_stricmp (qual_value, "pw"))
                     value = CCL_BIB1_STR_WP;
+                if (!ccl_stricmp (qual_value, "al"))
+                    value = CCL_BIB1_STR_AND_LIST;
+                if (!ccl_stricmp (qual_value, "ol"))
+                    value = CCL_BIB1_STR_OR_LIST;
                 break;                
             case 't':
             case 'T':
@@ -139,7 +150,7 @@ void ccl_qual_fitem (CCL_bibset bibset, const char *cp, const char *qual_name)
             case 'c':
             case 'C':
                 type = CCL_BIB1_COM;
-                break;                
+                break;
             default:
                 type = atoi (qual_type);
             }