Index: third_party/sqlite/src/test/tkt-bd484a090c.test |
diff --git a/third_party/sqlite/src/test/tkt-bd484a090c.test b/third_party/sqlite/src/test/tkt-bd484a090c.test |
new file mode 100644 |
index 0000000000000000000000000000000000000000..3d2b59995857c9a7f61b6860c381c51b23cdf036 |
--- /dev/null |
+++ b/third_party/sqlite/src/test/tkt-bd484a090c.test |
@@ -0,0 +1,38 @@ |
+# 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 |