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 9e0957a..f8b2438 100644 (file)
--- a/ccl/cclqfile.c
+++ b/ccl/cclqfile.c
@@ -45,7 +45,10 @@
  * Europagate, 1995
  *
  * $Log: cclqfile.c,v $
- * Revision 1.4  2000-01-31 13:15:21  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.
@@ -127,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':
@@ -143,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);
             }