Pull present status from presresp.
[egate.git] / ccl / cclfind.c
index d0a7ca8..7afb189 100644 (file)
@@ -2,7 +2,13 @@
  * Europagate, 1995
  *
  * $Log: cclfind.c,v $
- * Revision 1.7  1995/02/14 19:55:10  adam
+ * Revision 1.9  1995/02/16 13:20:06  adam
+ * Spell fix.
+ *
+ * Revision 1.8  1995/02/14  19:59:42  adam
+ * Removed a syntax error.
+ *
+ * Revision 1.7  1995/02/14  19:55:10  adam
  * Header files ccl.h/cclp.h are gone! They have been merged an
  * moved to ../include/ccl.h.
  * Node kind(s) in ccl_rpn_node have changed names.
@@ -269,7 +275,7 @@ static struct ccl_rpn_node *qualifiers (struct ccl_token *la,
 
     if (qa)
     {
-        ccl_error = CCL_ERR_DOBBLE_QUAL;
+        ccl_error = CCL_ERR_DOUBLE_QUAL;
         return NULL;
     }
     for (lookahead = look_token; lookahead != la; lookahead=lookahead->next)
@@ -428,7 +434,7 @@ static struct ccl_rpn_node *search_terms (struct ccl_rpn_attr **qa)
                 ccl_rpn_delete (p1);
                 return NULL;
             }
-           pn = mk_node (PROX);
+           pn = mk_node (CCL_RPN_PROX);
            pn->u.p[0] = p1;
            pn->u.p[1] = p2;
            p1 = pn;