tclsqlite

Check-in [17c148b940]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Fix (harmless) compiler warning, when compiling tclsqlite with TIP #494
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 17c148b94008df81e2947b7ca524b08d51ae533b
User & Date: jan.nijtmans 2018-07-09 17:16:49
Context
2018-08-13
10:51
Update to latest TEA check-in: abce3d716f user: jan.nijtmans tags: trunk
2018-07-09
17:16
Fix (harmless) compiler warning, when compiling tclsqlite with TIP #494 check-in: 17c148b940 user: jan.nijtmans tags: trunk
2018-06-23
16:48
Merge SQLite 3.24.0 Final check-in: 65ca939be6 user: jan.nijtmans tags: release, trunk, version-3.24.0
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclsqlite3.c.

2394
2395
2396
2397
2398
2399
2400
2401
2402
2403
2404
2405
2406
2407
2408
      Tcl_AppendResult(interp, "Error: can't malloc()", (char*)0);
      Tcl_Close(interp, in);
      return TCL_ERROR;
    }
    Tcl_DStringInit(&str);
    (void)sqlite3_exec(pDb->db, "BEGIN", 0, 0, 0);
    zCommit = "COMMIT";
    while( Tcl_Gets(in, &str)!=-1 ){
      char *z;
      lineno++;
      zLine = Tcl_DStringValue(&str);
      azCol[0] = zLine;
      for(i=0, z=zLine; *z; z++){
        if( *z==zSep[0] && strncmp(z, zSep, nSep)==0 ){
          *z = 0;







|







2394
2395
2396
2397
2398
2399
2400
2401
2402
2403
2404
2405
2406
2407
2408
      Tcl_AppendResult(interp, "Error: can't malloc()", (char*)0);
      Tcl_Close(interp, in);
      return TCL_ERROR;
    }
    Tcl_DStringInit(&str);
    (void)sqlite3_exec(pDb->db, "BEGIN", 0, 0, 0);
    zCommit = "COMMIT";
    while( (size_t)Tcl_Gets(in, &str)!=(size_t)-1 ) {
      char *z;
      lineno++;
      zLine = Tcl_DStringValue(&str);
      azCol[0] = zLine;
      for(i=0, z=zLine; *z; z++){
        if( *z==zSep[0] && strncmp(z, zSep, nSep)==0 ){
          *z = 0;