#!/usr/bin/env tclsh

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

do_execsql_test isnull {
    select null isnull, 'hi' isnull;
} {1|0}

do_execsql_test is-null {
    select null is null, 'hi' is null;
} {1|0}

do_execsql_test notnull {
    select null notnull, 'hi' notnull;
} {0|1}

do_execsql_test not-null {
    select null not null, 'hi' not null;
} {0|1}

do_execsql_test sel-true {
	select true;
} {1}

do_execsql_test sel-false {
	select false;
} {0}

# https://github.com/tursodatabase/turso/issues/3966
do_execsql_test_on_specific_db {:memory:} not-null-just-cuz-unique {
    create table t (a int, x int unique);
    insert into t(a) values(1);
    select * from t;
} {1|}