diff options
Diffstat (limited to 'src/test_thread.c')
| -rw-r--r-- | src/test_thread.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/test_thread.c b/src/test_thread.c index 3a13dd668..08df14c2c 100644 --- a/src/test_thread.c +++ b/src/test_thread.c @@ -305,7 +305,7 @@ static int sqlthread_id( Tcl_Obj *CONST objv[] ){ Tcl_ThreadId id = Tcl_GetCurrentThread(); - Tcl_SetObjResult(interp, Tcl_NewIntObj((int)id)); + Tcl_SetObjResult(interp, Tcl_NewIntObj(SQLITE_PTR_TO_INT(id))); UNUSED_PARAMETER(clientData); UNUSED_PARAMETER(objc); UNUSED_PARAMETER(objv); |