######################################################################################### # This file drives the testharness # ######################################################################################### set testdir [file dirname $argv0] source $testdir/tester.tcl do_test SIMPLE_SQLITE_VERSION { execsql { SELECT SQLITE_VERSION(), SQLITE_SOURCE_ID(); } } {3.7.7(C#) {Ported to C# from 2011-06-23 19:49:22 4374b7e83ea0a3fbc3691f9c0c936272862f32f2}} ########################################################################################## #puts -nonewline "Press RETURN to exit..."; gets stdin; exit 0 set filter "" if [info exists argv] { set TESTSUITE $argv puts "Running tests ($argv)" } else { set TESTSUITE "QUICK" puts "running allquicktests" } if [string compare $filter "skip"] { if ![string compare $filter ""] {puts -nonewline "Enter test name prefix:"; set filter [gets stdin]} source $testdir/_C#SQLite.test } set tm1 [clock seconds] if ![string compare $filter ""] { set rc [run_test_suite C#SQLitetests] } else { set rc [run_test_suite C#SQLiteFilterTests] } set tm2 [clock seconds] set minutes [expr {($tm2-$tm1)/60}] set seconds [expr {($tm2-$tm1)%60}] puts [format "\nTests ran in (%d:%.2d) " $minutes $seconds] finish_test ########################################################################################## ########################################################################################## # # Sample TCL command sequences # ########################################################################################## do_test SIMPLE_SQLITE_VERSION { execsql { SELECT SQLITE_VERSION(), SQLITE_SOURCE_ID(); } } {3.7.7(C#) {Ported to C# from 2011-06-23 19:49:22 4374b7e83ea0a3fbc3691f9c0c936272862f32f2}} do_test SIMPLE_COUNT_SQL_MASTER { execsql { SELECT COUNT() FROM SQLITE_MASTER; } } {0} do_test SIMPLE_CREATE_TABLE { execsql { CREATE TABLE T1 (C1); } } {} do_test SIMPLE_SELECT_ALL { execsql { SELECT * FROM SQLITE_MASTER; } } {table T1 T1 2 {CREATE TABLE T1 (C1)}} ########################################################################################## # # TCL Test suites # # help will display the test suites and descriptions # the supported test suites are listed below ########################################################################################## # # Test suite: "C#SQLitetests" # Quick test suite for C#-SQLite. Runs in around 7 minutes on a workstation. # # test_list C#SQLitetests will display the individual file names ##########################################################################################