X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=ZOOM.xs;h=7e58189c61cc1d8c001619d9e9f6ce0489f234bc;hb=9e1726a4461f86d43a11189809905f7d07b646db;hp=ce41632808c2f9d87b6e193b131235ff818192fc;hpb=3ba44bb7023ad2e1d312b7858066525a536522c3;p=ZOOM-Perl-moved-to-github.git

diff --git a/ZOOM.xs b/ZOOM.xs
index ce41632..7e58189 100644
--- 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.46 2007-01-16 11:17:15 mike Exp $ */
 
 #include "EXTERN.h"
 #include "perl.h"
@@ -288,6 +288,27 @@ ZOOM_resultset_sort1(r, sort_type, sort_spec)
 	const char* sort_type
 	const char* sort_spec
 
+# See comments for ZOOM_connection_error() above
+int
+ZOOM_record_error(rec, cp, addinfo, diagset)
+	ZOOM_record rec
+	const char* &cp
+	const char* &addinfo
+	const char* &diagset
+	CODE:
+		{
+		const char *ccp = "", *caddinfo = "", *cdset = "";
+		RETVAL = ZOOM_record_error(rec, &ccp, &caddinfo, &cdset);
+		cp = (char*) ccp;
+		addinfo = (char*) caddinfo;
+		diagset = (char*) cdset;
+		}
+	OUTPUT:
+		RETVAL
+		cp
+		addinfo
+		diagset
+
 # See "typemap" for discussion of the "const char *" return-type.
 #
 ### but should use datachunk for in some (not all!) cases.
@@ -327,10 +348,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 +541,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 +606,19 @@ ZOOM_event(conns)
 	OUTPUT:
 		RETVAL
 
-# UNTESTED
 int
 ZOOM_connection_last_event(cs)
 	ZOOM_connection	cs
 
+int
+ZOOM_connection_is_idle(cs)
+	ZOOM_connection	cs
+
+int
+ZOOM_connection_peek_event(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.