Index: third_party/sqlite/src/src/test_osinst.c |
diff --git a/third_party/sqlite/src/src/test_osinst.c b/third_party/sqlite/src/src/test_osinst.c |
index 4ae23a87c658529931ce46184d516daf94f87d8a..a008baba45deb0287ed38ca33eedc02cdd784de6 100644 |
--- a/third_party/sqlite/src/src/test_osinst.c |
+++ b/third_party/sqlite/src/src/test_osinst.c |
@@ -644,9 +644,9 @@ static void vfslog_flush(VfslogVfs *p){ |
static void put32bits(unsigned char *p, unsigned int v){ |
p[0] = v>>24; |
- p[1] = v>>16; |
- p[2] = v>>8; |
- p[3] = v; |
+ p[1] = (unsigned char)(v>>16); |
+ p[2] = (unsigned char)(v>>8); |
+ p[3] = (unsigned char)v; |
} |
static void vfslog_call( |
@@ -1104,9 +1104,16 @@ int sqlite3_vfslog_register(sqlite3 *db){ |
#if defined(SQLITE_TEST) || defined(TCLSH) |
-#include <tcl.h> |
+#if defined(INCLUDE_SQLITE_TCL_H) |
+# include "sqlite_tcl.h" |
+#else |
+# include "tcl.h" |
+# ifndef SQLITE_TCLAPI |
+# define SQLITE_TCLAPI |
+# endif |
+#endif |
-static int test_vfslog( |
+static int SQLITE_TCLAPI test_vfslog( |
void *clientData, |
Tcl_Interp *interp, |
int objc, |