SQLite

Check-in [b57327be4b]
Login

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

Overview
Comment:Fix test script literal.test so that it works with SQLITE_OMIT_ALTER_TABLE builds.
Timelines: family | ancestors | descendants | both | digit-separators
Files: files | file ages | folders
SHA3-256: b57327be4be9638f5ee834a6c9e06135aaef9e499516f8b53f927ffe81033f61
User & Date: dan 2024-01-22 11:12:38.218
Context
2024-01-22
17:18
Do not allow digit separators that are not surrounded on both sides by digits. (check-in: 5bbc378a30 user: drh tags: digit-separators)
14:01
Fix test script literal.test so that it works with SQLITE_OMIT_ALTER_TABLE builds. (check-in: 4dc00f5776 user: dan tags: trunk)
11:12
Fix test script literal.test so that it works with SQLITE_OMIT_ALTER_TABLE builds. (check-in: b57327be4b user: dan tags: digit-separators)
2024-01-20
18:45
Merge trunk changes into this branch. (check-in: 03ade4a810 user: dan tags: digit-separators)
Changes
Unified Diff Ignore Whitespace Patch
Changes to test/literal.test.
︙︙
15
16
17
18
19
20
21

22
23
24
25
26
27








28
29
30
31
32
33
34

set testdir [file dirname $argv0]
source $testdir/tester.tcl
set ::testprefix literal

proc test_literal {tn lit type val} {
  do_execsql_test $tn.1 "SELECT typeof( $lit ), $lit" [list $type $val]


  do_execsql_test $tn.2 "
    DROP TABLE IF EXISTS x1;
    CREATE TABLE x1(a);
    INSERT INTO x1 VALUES(123);
    ALTER TABLE x1 ADD COLUMN b DEFAULT $lit ;
    SELECT typeof(b), b FROM x1;








  " [list $type $val]
}


test_literal 1.0 45                  integer 45
test_literal 1.1 0xFF                integer 255
test_literal 1.2 0xFFFFFFFF          integer [expr 0xFFFFFFFF]








>
|
|
|
|
|
|
>
>
>
>
>
>
>
>








15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43

set testdir [file dirname $argv0]
source $testdir/tester.tcl
set ::testprefix literal

proc test_literal {tn lit type val} {
  do_execsql_test $tn.1 "SELECT typeof( $lit ), $lit" [list $type $val]

  ifcapable altertable {
    do_execsql_test $tn.2 "
      DROP TABLE IF EXISTS x1;
      CREATE TABLE x1(a);
      INSERT INTO x1 VALUES(123);
      ALTER TABLE x1 ADD COLUMN b DEFAULT $lit ;
      SELECT typeof(b), b FROM x1;
    " [list $type $val]
  }

  do_execsql_test $tn.3 "
    DROP TABLE IF EXISTS x1;
    CREATE TABLE x1(a DEFAULT $lit);
    INSERT INTO x1 DEFAULT VALUES;
    SELECT typeof(a), a FROM x1;
  " [list $type $val]
}


test_literal 1.0 45                  integer 45
test_literal 1.1 0xFF                integer 255
test_literal 1.2 0xFFFFFFFF          integer [expr 0xFFFFFFFF]
︙︙