+cl-sql (3.0.10-1) unstable; urgency=low
+
+ * New upstream
+
+ -- Kevin M. Rosenberg <kmr@debian.org> Sat, 23 Oct 2004 09:16:03 -0600
+
cl-sql (3.0.9-1) unstable; urgency=low
* New upstream
(uffi:def-function "atol64"
((str (* :unsigned-char))
- (high32 (* :int)))
+ (high32 (* :unsigned-int)))
:module "clsql-uffi"
:returning :unsigned-int)
((:int32 :int)
(atoi char-ptr))
(:int64
- (uffi:with-foreign-object (high32-ptr :int)
+ (uffi:with-foreign-object (high32-ptr :unsigned-int)
(let ((low32 (atol64 char-ptr high32-ptr))
- (high32 (uffi:deref-pointer high32-ptr :int)))
+ (high32 (uffi:deref-pointer high32-ptr :unsigned-int)))
(if (zerop high32)
low32
(make-64-bit-integer high32 low32)))))
DLLEXPORT
unsigned int
-atol64 (const unsigned char* str, int* pHigh32)
+atol64 (const unsigned char* str, unsigned int* pHigh32)
{
#ifdef WIN32
__int64 result = 0;