From: mike <mike>
Date: Fri, 20 Jan 2006 12:33:14 +0000 (+0000)
Subject: yaz_version() interface.
X-Git-Tag: cpan_1_22~255
X-Git-Url: http://git.indexdata.com/?a=commitdiff_plain;h=32c2c74a2199009b15a30c0c5266fd2875f78834;hp=b048872b5ea8b1b8a28ddecf649b781791c9bfd4;p=ZOOM-Perl-moved-to-github.git

yaz_version() interface.
---

diff --git a/ZOOM.xs b/ZOOM.xs
index 53cd9cf..5298f1c 100644
--- a/ZOOM.xs
+++ b/ZOOM.xs
@@ -1,4 +1,4 @@
-/* $Id: ZOOM.xs,v 1.36 2005-12-22 12:37:58 mike Exp $ */
+/* $Id: ZOOM.xs,v 1.37 2006-01-20 12:33:14 mike Exp $ */
 
 #include "EXTERN.h"
 #include "perl.h"
@@ -565,3 +565,13 @@ yaz_log(level, str)
 	CODE:
 		yaz_log(level, "%s", str);
 
+# This is also not strictly part of ZOOM
+unsigned long
+yaz_version(version_str, sys_str)
+	char *version_str
+	char *sys_str
+	OUTPUT:
+		RETVAL
+		version_str
+		sys_str
+