System.Data.SQLite

Check-in [85b23122e0]
Login

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

Overview
Comment:First attempt to reproduce the issue described in ticket [3b9dcdc32d].
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | tkt-3b9dcdc32d
Files: files | file ages | folders
SHA1: 85b23122e09350727acd90f942d49e167bf8e915
User & Date: mistachkin 2011-11-27 12:26:05.916
Context
2011-11-28
04:01
Enhance/add tests to check memory usage related to ticket [3b9dcdc32d]. check-in: b3d05f0aa0 user: mistachkin tags: tkt-3b9dcdc32d
2011-11-27
12:26
First attempt to reproduce the issue described in ticket [3b9dcdc32d]. check-in: 85b23122e0 user: mistachkin tags: tkt-3b9dcdc32d
09:30
Update Eagle in externals to the latest pre-beta20 bits, modifying unit tests as necessary. Update source archive exclusions file to omit NDoc3 and HtmlHelp from externals. check-in: 3b2aa14e3e user: mistachkin tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Added Tests/tkt-3b9dcdc32d.eagle. 






























































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>

1
2
3
4
5
6
7
8
9
10
11
12
13
14
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
44
45
46

###############################################################################
#
# tkt-3b9dcdc32d.eagle --
#
# Written by Joe Mistachkin.
# Released to the public domain, use at your own risk!
#
###############################################################################

package require Eagle
package require EagleLibrary
package require EagleTest

runTestPrologue

###############################################################################

package require System.Data.SQLite.Test
runSQLiteTestPrologue

###############################################################################

runTest {test tkt-3b9dcdc32d-1.1 {range of REAL type} -setup {
  setupDb [set fileName tkt-3b9dcdc32d-1.1.db]
} -body {
  sql execute $db "CREATE TABLE t1(x INTEGER, y BLOB NULL, z BLOB NULL);"
  sql execute $db "INSERT INTO t1 (x) VALUES(1);"
  sql execute $db \
      "UPDATE t1 SET y = ZEROBLOB(10 * 1024 * 1024) WHERE rowid = 1;"

  sql execute $db "UPDATE t1 SET z = ZEROBLOB(10) WHERE rowid = 1;"

  sql execute -execute reader -format list $db \
      "SELECT x, LENGTH(y), LENGTH(z) FROM t1 ORDER BY x;"
} -cleanup {
  cleanupDb $fileName

  unset -nocomplain db fileName
} -constraints \
{eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \
{1 10485760 10}}

###############################################################################

runSQLiteTestEpilogue
runTestEpilogue