tokyocabinet: Error in tc-bdb-fwm-keys procedure

[sjamaan]

There seems to be a problem in the order and types of arguments passed to the C function "tcbdbfwmkeys", as indicated by the scrutinizer at ​http://parenteses.org/mario/misc/specialize-report/install/tokyocabinet.html

I don't have the Tokyocabinet library installed, so the patch below was not tested.

Index: tokyocabinet.scm
===================================================================
--- tokyocabinet.scm	(revision 26685)
+++ tokyocabinet.scm	(working copy)
@@ -431,7 +431,7 @@
 ;; negative max for no limit
 (define (tc-bdb-fwm-keys bdb prefix max)
   (let ((tc-list
-         (make-tc-list (%tc-bdb-fwmkeys (string-length prefix) bdb prefix max))))
+         (make-tc-list (%tc-bdb-fwmkeys bdb prefix (string-length prefix) max))))
     (and (tc-list-ptr tc-list)
          tc-list)))

[sjamaan]

Fixed in r27079