Add support for binding 64-bit unsigned params.

Author: mfp

lib/common.ml

@@ -340,6 +340,7 @@ module Stmt = struct
             | `Null -> Bind.null b ~at
             | `Int i -> Bind.int b i ~at
             | `Int64 i -> Bind.int64 b i ~at
+            | `UInt64 i -> Bind.int64 ~unsigned:true b i ~at
             | `Float x -> Bind.float b x ~at
             | `String s -> Bind.string b s ~at
             | `Bytes s -> Bind.blob b s ~at