diff options
Diffstat (limited to 'src/test_vfs.c')
| -rw-r--r-- | src/test_vfs.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/test_vfs.c b/src/test_vfs.c index bf9a3b6cb..c9efb5bda 100644 --- a/src/test_vfs.c +++ b/src/test_vfs.c @@ -495,7 +495,9 @@ static int tvfsShmGet( Tcl_NewStringObj(pShm->pBuffer->zFile, -1), pShm->id, 0 ); tvfsResultCode(p, &rc); - *pp = pShm->pBuffer->a; + if( rc==SQLITE_OK ){ + *pp = pShm->pBuffer->a; + } return rc; } |