-/* $Id: ZOOM.xs,v 1.43 2006-10-04 17:14:12 mike Exp $ */
+/* $Id: ZOOM.xs,v 1.46 2007-01-16 11:17:15 mike Exp $ */
#include "EXTERN.h"
#include "perl.h"
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.
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