| OLD | NEW |
| 1 /* | 1 /* |
| 2 ** 2009 January 28 | 2 ** 2009 January 28 |
| 3 ** | 3 ** |
| 4 ** The author disclaims copyright to this source code. In place of | 4 ** The author disclaims copyright to this source code. In place of |
| 5 ** a legal notice, here is a blessing: | 5 ** a legal notice, here is a blessing: |
| 6 ** | 6 ** |
| 7 ** May you do good and not evil. | 7 ** May you do good and not evil. |
| 8 ** May you find forgiveness for yourself and forgive others. | 8 ** May you find forgiveness for yourself and forgive others. |
| 9 ** May you share freely, never taking more than you give. | 9 ** May you share freely, never taking more than you give. |
| 10 ** | 10 ** |
| 11 ************************************************************************* | 11 ************************************************************************* |
| 12 ** This file contains test logic for the sqlite3_backup() interface. | 12 ** This file contains test logic for the sqlite3_backup() interface. |
| 13 ** | 13 ** |
| 14 */ | 14 */ |
| 15 | 15 |
| 16 #include "tcl.h" | 16 #include "tcl.h" |
| 17 #include <sqlite3.h> | 17 #include "sqlite3.h" |
| 18 #include <assert.h> | 18 #include <assert.h> |
| 19 | 19 |
| 20 /* These functions are implemented in main.c. */ | 20 /* These functions are implemented in main.c. */ |
| 21 extern const char *sqlite3ErrName(int); | 21 extern const char *sqlite3ErrName(int); |
| 22 | 22 |
| 23 /* These functions are implemented in test1.c. */ | 23 /* These functions are implemented in test1.c. */ |
| 24 extern int getDbPointer(Tcl_Interp *, const char *, sqlite3 **); | 24 extern int getDbPointer(Tcl_Interp *, const char *, sqlite3 **); |
| 25 | 25 |
| 26 static int backupTestCmd( | 26 static int backupTestCmd( |
| 27 ClientData clientData, | 27 ClientData clientData, |
| (...skipping 113 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 141 | 141 |
| 142 Tcl_CreateObjCommand(interp, zCmd, backupTestCmd, pBackup, backupTestFinish); | 142 Tcl_CreateObjCommand(interp, zCmd, backupTestCmd, pBackup, backupTestFinish); |
| 143 Tcl_SetObjResult(interp, objv[1]); | 143 Tcl_SetObjResult(interp, objv[1]); |
| 144 return TCL_OK; | 144 return TCL_OK; |
| 145 } | 145 } |
| 146 | 146 |
| 147 int Sqlitetestbackup_Init(Tcl_Interp *interp){ | 147 int Sqlitetestbackup_Init(Tcl_Interp *interp){ |
| 148 Tcl_CreateObjCommand(interp, "sqlite3_backup", backupTestInit, 0, 0); | 148 Tcl_CreateObjCommand(interp, "sqlite3_backup", backupTestInit, 0, 0); |
| 149 return TCL_OK; | 149 return TCL_OK; |
| 150 } | 150 } |
| OLD | NEW |