X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=db-mysql%2Fclsql_mysql.c;h=2d3b1282cbd5d65b2255e92dadbbd31ee09d2248;hp=d1bb084a7bf898eadab6a43683c89c9bd6d4dfd7;hb=bf641c516d77330e150d0f1b07fd02dceaae3ef4;hpb=e3924d6e872f06dce33c923b15c5d30baa31460c diff --git a/db-mysql/clsql_mysql.c b/db-mysql/clsql_mysql.c index d1bb084..2d3b128 100644 --- a/db-mysql/clsql_mysql.c +++ b/db-mysql/clsql_mysql.c @@ -15,19 +15,19 @@ * (http://opensource.franz.com/preamble.html), also known as the LLGPL. ***************************************************************************/ -#ifdef WIN32 +#if defined(WIN32)||defined(WIN64) #include BOOL WINAPI DllEntryPoint(HINSTANCE hinstdll, DWORD fdwReason, - LPVOID lpvReserved) + LPVOID lpvReserved) { return 1; } - + #define DLLEXPORT __declspec(dllexport) #else -#define DLLEXPORT +#define DLLEXPORT #endif @@ -37,19 +37,19 @@ BOOL WINAPI DllEntryPoint(HINSTANCE hinstdll, DWORD fdwReason, DLLEXPORT void clsql_mysql_data_seek (MYSQL_RES* res, unsigned int offset_high32, - unsigned int offset_low32) + unsigned int offset_low32) { my_ulonglong offset; offset = offset_high32; offset = offset << 32; offset += offset_low32; - + mysql_data_seek (res, offset); } /* The following functions are used to return 64-bit integers to Lisp. - They return the 32-bit low part and store in upper 32-bits in a + They return the 32-bit low part and store in upper 32-bits in a located sent via a pointer */ static const unsigned int bitmask_32bits = 0xFFFFFFFF; @@ -127,8 +127,8 @@ allocate_bind (unsigned int n) DLLEXPORT void -bind_param (MYSQL_BIND bind[], unsigned int n, unsigned long length, unsigned short is_null, - void* buffer, unsigned short buffer_type, unsigned long buffer_length) +bind_param (MYSQL_BIND bind[], unsigned int n, unsigned long length, unsigned short is_null, + void* buffer, unsigned short buffer_type, unsigned long buffer_length) { *bind[n].length = length; *bind[n].is_null = is_null;