System.Data.SQLite
Check-in [5419324a5d]
Not logged in

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

Overview
Comment:Test constraint fixes.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 5419324a5d0d7a01b3aa991e83e7534001a97e26
User & Date: mistachkin 2018-02-27 16:32:43
Context
2018-02-27
17:04
Modify experimental WaitForEnlistmentReset method to require a nullable boolean parameter for the value to return when the connection is disposed. check-in: 301207ad6d user: mistachkin tags: trunk
16:32
Test constraint fixes. check-in: 5419324a5d user: mistachkin tags: trunk
16:32
Support using a non-empty build configuration suffix when compiling/running on Mono. check-in: 8cc6eb1da7 user: mistachkin tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to Tests/basic.eagle.

4835
4836
4837
4838
4839
4840
4841

4842
4843
4844
4845
4846
4847
4848
4849
....
4912
4913
4914
4915
4916
4917
4918

4919
4920
4921
4922
4923
4924
4925
4926
  }

  unset -nocomplain result exception errCode errCodes
  unset -nocomplain connection db fileName
} -constraints {eagle command.object monoBug28\
compile.DATA defineConstant.System.Data.SQLite.INTEROP_TEST_EXTENSION\
command.sql SQLite System.Data.SQLite} -constraintExpression \

{[package vcompare $core_library_version 3.23] >= 0} -result {{0 {}} {0 {}} {0\
{}} Error {SQL logic error ==> SQL logic error} IoErr {disk I/O error ==> disk\
I/O error} CantOpen {unable to open database file ==> unable to open database\
file} Notice {notification message ==> notification message} Warning {warning\
message ==> warning message} 231 {SQL logic error ==> unknown error} {0 {}}\
Ok_Load_Permanently {not an error ==> not an error} Error_Retry {SQL logic\
error ==> SQL logic error} IoErr_Short_Read {disk I/O error ==> disk I/O error}\
CantOpen_NoTempDir {unable to open database file ==> unable to open database\
................................................................................
  freeDbConnection

  unset -nocomplain result exception errCode errCodes
  unset -nocomplain connection db fileName
} -constraints {eagle command.object monoBug28\
compile.DATA defineConstant.System.Data.SQLite.INTEROP_TEST_EXTENSION\
command.sql SQLite System.Data.SQLite} -constraintExpression \

{[package vcompare $core_library_version 3.23] >= 0} -result {{0 {}} {0 {}} {0\
{}} Error {SQL logic error ==> SQL logic error} IoErr {disk I/O error ==> disk\
I/O error} CantOpen {unable to open database file ==> unable to open database\
file} Notice {notification message ==> notification message} Warning {warning\
message ==> warning message} 231 {unknown error ==> unknown error} {0 {}}\
Ok_Load_Permanently {not an error ==> not an error} Error_Retry {SQL logic\
error ==> SQL logic error} IoErr_Short_Read {disk I/O error ==> disk I/O error}\
CantOpen_NoTempDir {unable to open database file ==> unable to open database\







>
|







 







>
|







4835
4836
4837
4838
4839
4840
4841
4842
4843
4844
4845
4846
4847
4848
4849
4850
....
4913
4914
4915
4916
4917
4918
4919
4920
4921
4922
4923
4924
4925
4926
4927
4928
  }

  unset -nocomplain result exception errCode errCodes
  unset -nocomplain connection db fileName
} -constraints {eagle command.object monoBug28\
compile.DATA defineConstant.System.Data.SQLite.INTEROP_TEST_EXTENSION\
command.sql SQLite System.Data.SQLite} -constraintExpression \
{[info exists core_library_version] && \
[package vcompare $core_library_version 3.23] >= 0} -result {{0 {}} {0 {}} {0\
{}} Error {SQL logic error ==> SQL logic error} IoErr {disk I/O error ==> disk\
I/O error} CantOpen {unable to open database file ==> unable to open database\
file} Notice {notification message ==> notification message} Warning {warning\
message ==> warning message} 231 {SQL logic error ==> unknown error} {0 {}}\
Ok_Load_Permanently {not an error ==> not an error} Error_Retry {SQL logic\
error ==> SQL logic error} IoErr_Short_Read {disk I/O error ==> disk I/O error}\
CantOpen_NoTempDir {unable to open database file ==> unable to open database\
................................................................................
  freeDbConnection

  unset -nocomplain result exception errCode errCodes
  unset -nocomplain connection db fileName
} -constraints {eagle command.object monoBug28\
compile.DATA defineConstant.System.Data.SQLite.INTEROP_TEST_EXTENSION\
command.sql SQLite System.Data.SQLite} -constraintExpression \
{[info exists core_library_version] && \
[package vcompare $core_library_version 3.23] >= 0} -result {{0 {}} {0 {}} {0\
{}} Error {SQL logic error ==> SQL logic error} IoErr {disk I/O error ==> disk\
I/O error} CantOpen {unable to open database file ==> unable to open database\
file} Notice {notification message ==> notification message} Warning {warning\
message ==> warning message} 231 {unknown error ==> unknown error} {0 {}}\
Ok_Load_Permanently {not an error ==> not an error} Error_Retry {SQL logic\
error ==> SQL logic error} IoErr_Short_Read {disk I/O error ==> disk I/O error}\
CantOpen_NoTempDir {unable to open database file ==> unable to open database\

Changes to Tests/tkt-a7d04fb111.eagle.

38
39
40
41
42
43
44

45

46
47
48

49
50
51

52




53

54
55

56

57
58
59

60
61
62

63




64

65
66

67

68
69
70

71
72
73

74





75
76
77
78
79
80
81

set iso8601Value(0) [$instanceValue(0) ToString [getDateTimeFormat]]
set iso8601Value(1) [$instanceValue(1) ToString [getDateTimeFormat]]
set iso8601Value(2) [$instanceValue(2) ToString [getDateTimeFormat false]]

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


set julianDayValue(0) [object invoke System.Data.SQLite.SQLiteConvert \

    ToJulianDay $instanceValue(0)]

set julianDayValue(1) [object invoke System.Data.SQLite.SQLiteConvert \

    ToJulianDay $instanceValue(1)]

set julianDayValue(2) [object invoke System.Data.SQLite.SQLiteConvert \

    ToJulianDay $instanceValue(2)]






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


set unixEpochValue(0) [object invoke System.Data.SQLite.SQLiteConvert \

    ToUnixEpoch $instanceValue(0)]

set unixEpochValue(1) [object invoke System.Data.SQLite.SQLiteConvert \

    ToUnixEpoch $instanceValue(1)]

set unixEpochValue(2) [object invoke System.Data.SQLite.SQLiteConvert \

    ToUnixEpoch $instanceValue(2)]






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


set invariantCultureValue(0) [object invoke System.Data.SQLite.SQLiteConvert \

    ToString $instanceValue(0) InvariantCulture Unspecified null]

set invariantCultureValue(1) [object invoke System.Data.SQLite.SQLiteConvert \

    ToString $instanceValue(1) InvariantCulture Utc null]

set invariantCultureValue(2) [object invoke System.Data.SQLite.SQLiteConvert \

    ToString $instanceValue(2) InvariantCulture Local null]






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

runTest {test tkt-a7d04fb111-1.1 {Bind DateTime Utc Ticks} -setup {
  setupDb [set fileName tkt-a7d04fb111-1.1.db] "" Ticks Utc \
      BindDateTimeWithKind
} -body {







>
|
>
|

|
>
|

|
>
|
>
>
>
>
|
>


>
|
>
|

|
>
|

|
>
|
>
>
>
>
|
>


>
|
>
|

|
>
|

|
>
|
>
>
>
>
>







38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108

set iso8601Value(0) [$instanceValue(0) ToString [getDateTimeFormat]]
set iso8601Value(1) [$instanceValue(1) ToString [getDateTimeFormat]]
set iso8601Value(2) [$instanceValue(2) ToString [getDateTimeFormat false]]

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

if {[haveConstraint System.Data.SQLite]} then {
  set julianDayValue(0) [object invoke \
      System.Data.SQLite.SQLiteConvert \
      ToJulianDay $instanceValue(0)]

  set julianDayValue(1) [object invoke \
      System.Data.SQLite.SQLiteConvert \
      ToJulianDay $instanceValue(1)]

  set julianDayValue(2) [object invoke \
      System.Data.SQLite.SQLiteConvert \
      ToJulianDay $instanceValue(2)]
} else {
  set julianDayValue(0) 0
  set julianDayValue(1) 0
  set julianDayValue(2) 0
}

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

if {[haveConstraint System.Data.SQLite]} then {
  set unixEpochValue(0) [object invoke \
      System.Data.SQLite.SQLiteConvert \
      ToUnixEpoch $instanceValue(0)]

  set unixEpochValue(1) [object invoke \
      System.Data.SQLite.SQLiteConvert \
      ToUnixEpoch $instanceValue(1)]

  set unixEpochValue(2) [object invoke \
      System.Data.SQLite.SQLiteConvert \
      ToUnixEpoch $instanceValue(2)]
} else {
  set unixEpochValue(0) 0
  set unixEpochValue(1) 0
  set unixEpochValue(2) 0
}

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

if {[haveConstraint System.Data.SQLite]} then {
  set invariantCultureValue(0) [object invoke \
      System.Data.SQLite.SQLiteConvert \
      ToString $instanceValue(0) InvariantCulture Unspecified null]

  set invariantCultureValue(1) [object invoke \
      System.Data.SQLite.SQLiteConvert \
      ToString $instanceValue(1) InvariantCulture Utc null]

  set invariantCultureValue(2) [object invoke \
      System.Data.SQLite.SQLiteConvert \
      ToString $instanceValue(2) InvariantCulture Local null]
} else {
  set invariantCultureValue(0) 0
  set invariantCultureValue(1) 0
  set invariantCultureValue(2) 0
}

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

runTest {test tkt-a7d04fb111-1.1 {Bind DateTime Utc Ticks} -setup {
  setupDb [set fileName tkt-a7d04fb111-1.1.db] "" Ticks Utc \
      BindDateTimeWithKind
} -body {