SQLite

Check-in [d0f55b5c3b]
Login

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

Overview
Comment:Fix a typo in the test script added for ticket [5ee23731f15].
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: d0f55b5c3b1a85d837cd1d8a2f089c6bcf5a8c0d
User & Date: drh 2009-10-13 18:49:53.000
Context
2009-10-13
19:19
Fixed warnings with MSVC compile. (check-in: e0aa50c382 user: shane tags: trunk)
18:49
Fix a typo in the test script added for ticket [5ee23731f15]. (check-in: d0f55b5c3b user: drh tags: trunk)
18:38
Update the TCL wrapper to provide a non-NULL objProc pointer to the Tcl_NRCreateCommand() interface. The TCL gurus say this is needed to support legacy TCL extensions. (check-in: 1b3cfa01dd user: drh tags: trunk)
Changes
Unified Diff Ignore Whitespace Patch
Changes to test/tkt-5ee23731f.test.
︙︙
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40

    INSERT INTO t1 VALUES(1);
    INSERT INTO t1 VALUES(2);
    INSERT INTO t1 SELECT x+2 FROM t1;
    INSERT INTO t1 SELECT x+4 FROM t1;
    INSERT INTO t1 SELECT x+8 FROM t1;
  }
  db close
  sqlite3 db b1.db -readonly 1
  set rc [catch {
    db eval {SELECT rowid, x FROM t1 ORDER BY x} {
      db eval {UPDATE t1 SET x=x+1 WHERE rowid=:rowid}
    }
  } msg]
  lappend rc $msg
} {1 {attempt to write a readonly database}}








|








26
27
28
29
30
31
32
33
34
35
36
37
38
39
40

    INSERT INTO t1 VALUES(1);
    INSERT INTO t1 VALUES(2);
    INSERT INTO t1 SELECT x+2 FROM t1;
    INSERT INTO t1 SELECT x+4 FROM t1;
    INSERT INTO t1 SELECT x+8 FROM t1;
  }
  db close
  sqlite3 db test.db -readonly 1
  set rc [catch {
    db eval {SELECT rowid, x FROM t1 ORDER BY x} {
      db eval {UPDATE t1 SET x=x+1 WHERE rowid=:rowid}
    }
  } msg]
  lappend rc $msg
} {1 {attempt to write a readonly database}}
︙︙