Add Ubuntu quantal

[ZOOM-Perl-moved-to-github.git] / ZOOM.xs

diff --git a/ZOOM.xs b/ZOOM.xs
index 134e94d..b10513e 100644 (file)
--- a/ZOOM.xs
+++ b/ZOOM.xs
@@ -1,5 +1,3 @@
-/* $Id: ZOOM.xs,v 1.51 2008-05-14 13:31:39 mike Exp $ */
-
 #include "EXTERN.h"
 #include "perl.h"
 #include "XSUB.h"
@@ -390,6 +388,12 @@ int
 ZOOM_query_sortby(s, criteria)
        ZOOM_query      s
        const char *    criteria
+       
+int
+ZOOM_query_sortby2(s, strategy, criteria)
+       ZOOM_query      s
+       const char *    strategy
+       const char *    criteria
 
 ZOOM_scanset
 ZOOM_connection_scan(c, startterm)
@@ -405,8 +409,8 @@ const char *
 ZOOM_scanset_term(scan, pos, occ, len)
        ZOOM_scanset scan
        size_t pos
-       int& occ
-       int& len
+       size_t& occ
+       size_t& len
        OUTPUT:
                RETVAL
                occ
@@ -416,8 +420,8 @@ const char *
 ZOOM_scanset_display_term(scan, pos, occ, len)
        ZOOM_scanset scan
        size_t pos
-       int& occ
-       int& len
+       size_t& occ
+       size_t& len
        OUTPUT:
                RETVAL
                occ