39 lines
		
	
	
		
			1011 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			39 lines
		
	
	
		
			1011 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
# 2011 June 21
 | 
						|
#
 | 
						|
#    May you do good and not evil.
 | 
						|
#    May you find forgiveness for yourself and forgive others.
 | 
						|
#    May you share freely, never taking more than you give.
 | 
						|
#
 | 
						|
#***********************************************************************
 | 
						|
#
 | 
						|
# This file contains tests for SQLite. Specifically, it tests that SQLite
 | 
						|
# does not crash and an error is returned if localhost() fails. This 
 | 
						|
# is the problem reported by ticket bd484a090c.
 | 
						|
#
 | 
						|
 | 
						|
set testdir [file dirname $argv0]
 | 
						|
source $testdir/tester.tcl
 | 
						|
 | 
						|
set testprefix tkt-bd484a090c
 | 
						|
 | 
						|
 | 
						|
do_test 1.1 {
 | 
						|
  lindex [catchsql { SELECT datetime('now', 'localtime') }] 0
 | 
						|
} {0}
 | 
						|
do_test 1.2 {
 | 
						|
  lindex [catchsql { SELECT datetime('now', 'utc') }] 0
 | 
						|
} {0}
 | 
						|
 | 
						|
sqlite3_test_control SQLITE_TESTCTRL_LOCALTIME_FAULT 1
 | 
						|
 | 
						|
do_test 2.1 {
 | 
						|
  catchsql { SELECT datetime('now', 'localtime') }
 | 
						|
} {1 {local time unavailable}}
 | 
						|
do_test 2.2 {
 | 
						|
  catchsql { SELECT datetime('now', 'utc') }
 | 
						|
} {1 {local time unavailable}}
 | 
						|
 | 
						|
sqlite3_test_control SQLITE_TESTCTRL_LOCALTIME_FAULT 0
 | 
						|
 | 
						|
finish_test
 |