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 ** |
(...skipping 128 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
139 | 139 |
140 Tcl_CreateObjCommand(interp, zCmd, backupTestCmd, pBackup, backupTestFinish); | 140 Tcl_CreateObjCommand(interp, zCmd, backupTestCmd, pBackup, backupTestFinish); |
141 Tcl_SetObjResult(interp, objv[1]); | 141 Tcl_SetObjResult(interp, objv[1]); |
142 return TCL_OK; | 142 return TCL_OK; |
143 } | 143 } |
144 | 144 |
145 int Sqlitetestbackup_Init(Tcl_Interp *interp){ | 145 int Sqlitetestbackup_Init(Tcl_Interp *interp){ |
146 Tcl_CreateObjCommand(interp, "sqlite3_backup", backupTestInit, 0, 0); | 146 Tcl_CreateObjCommand(interp, "sqlite3_backup", backupTestInit, 0, 0); |
147 return TCL_OK; | 147 return TCL_OK; |
148 } | 148 } |
OLD | NEW |