Remove extraneous comment and unused option.
[ZOOM-Perl-moved-to-github.git] / ZOOM.xs
diff --git a/ZOOM.xs b/ZOOM.xs
index ce41632..3314067 100644 (file)
--- a/ZOOM.xs
+++ b/ZOOM.xs
@@ -1,4 +1,4 @@
-/* $Id: ZOOM.xs,v 1.41 2006-06-13 16:44:21 mike Exp $ */
+/* $Id: ZOOM.xs,v 1.43 2006-10-04 17:14:12 mike Exp $ */
 
 #include "EXTERN.h"
 #include "perl.h"
@@ -327,10 +327,18 @@ ZOOM_query_cql2rpn(s, str, conn)
        ZOOM_connection conn
 
 int
-ZOOM_query_ccl2rpn(s, str, conn)
+ZOOM_query_ccl2rpn(s, query_str, config, errcode, errstr, errpos)
        ZOOM_query s
-       const char* str
-       ZOOM_connection conn
+       const char* query_str
+       const char* config
+       int &errcode
+       const char* &errstr
+       int &errpos
+       OUTPUT:
+               RETVAL
+               errcode
+               errstr
+               errpos
 
 int
 ZOOM_query_prefix(s, str)
@@ -512,8 +520,6 @@ ZOOM_package_option_set(p, key, val)
        const char *    key
        const char *    val
 
-# UNTESTED
-#
 # This has to be called with a single argument which is a _reference_
 # to an array -- rather than directly with an array, which is of
 # course identical to passing arbitrarily many arguments.  This is
@@ -579,11 +585,15 @@ ZOOM_event(conns)
        OUTPUT:
                RETVAL
 
-# UNTESTED
 int
 ZOOM_connection_last_event(cs)
        ZOOM_connection cs
 
+int
+ZOOM_connection_is_idle(cs)
+       ZOOM_connection cs
+
+
 # ----------------------------------------------------------------------------
 # What follows is the YAZ logging API.  This is not strictly part of
 # ZOOM, but it's so useful that it would be silly to omit.