System.Data.SQLite

Check-in [5b5f922631]
Login

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

Overview
Comment:Improve diagnostic output from the .NET Compact Framework testing tool. Also, update the master release archive manifest.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 5b5f9226315007ff86a0254823636d960630f450
User & Date: mistachkin 2013-04-11 09:55:56.200
Context
2013-04-11
22:58
Add new error codes from the SQLite core library. check-in: d834d6896e user: mistachkin tags: trunk
09:55
Improve diagnostic output from the .NET Compact Framework testing tool. Also, update the master release archive manifest. check-in: 5b5f922631 user: mistachkin tags: trunk
2013-04-10
07:16
Add test for ticket [4a791e70ab]. check-in: f11d1e6b74 user: mistachkin tags: trunk
Changes
Side-by-Side Diff Ignore Whitespace Patch
Changes to Setup/deployAndTestCe.eagle.
25
26
27
28
29
30
31
32

33
34
35
36
37
38
39
25
26
27
28
29
30
31

32
33
34
35
36
37
38
39







-
+








#
# NOTE: This procedure will output a diagnostic message, typically to the
#       standard output channel, using the [puts] command unless the global
#       variable "quiet" is non-zero.
#
proc qputs { args } {
  if {!$::quiet} then {
  if {![info exists ::quiet] || !$::quiet} then {
    eval puts $args; flush stdout
  }
}

#
# NOTE: This procedure looks up and returns the target device based on the
#       locale, platform Id, and device Id.
114
115
116
117
118
119
120
121

122
123

124




125
126
127
128
129
130
131
114
115
116
117
118
119
120

121
122

123
124
125
126
127
128
129
130
131
132
133
134
135







-
+

-
+

+
+
+
+







    set name [lindex $names $index]; set value ""

    if {$argc > $index} then {
      set value [string trim [lindex $argv $index]]
    }

    if {[string length $value] > 0} then {
      set $name $value
      set $name $value; set defaultValue false
    } else {
      set $name $default($name)
      set $name $default($name); set defaultValue true
    }

    qputs stdout [appendArgs \
        "named parameter \"" $name "\" value is now \"" [set $name] \" \
        [expr {$defaultValue ? " (default)" : ""}] .]
  }

  #
  # NOTE: Grab the culture instance based on the configured culture name.
  #
  set cultureInfo [object invoke -alias System.Globalization.CultureInfo \
      GetCultureInfo $culture]
Changes to Setup/verify.lst.
417
418
419
420
421
422
423

424
425
426
427
428
429
430
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431







+







  Tests/tkt-2c630bffa7.eagle
  Tests/tkt-2ce0870fad.eagle
  Tests/tkt-343d392b51.eagle
  Tests/tkt-3567020edf.eagle
  Tests/tkt-393d954be0.eagle
  Tests/tkt-3aa50d8413.eagle
  Tests/tkt-448d663d11.eagle
  Tests/tkt-4a791e70ab.eagle
  Tests/tkt-544dba0a2f.eagle
  Tests/tkt-59edc1018b.eagle
  Tests/tkt-6434e23a0f.eagle
  Tests/tkt-6c6ecccc5f.eagle
  Tests/tkt-72905c9a77.eagle
  Tests/tkt-7e3fa93744.eagle
  Tests/tkt-84718e79fa.eagle