System.Data.SQLite
Check-in [8ddbcff542]
Not logged in

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

Overview
Comment:Update Eagle script library in externals to the latest code.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 8ddbcff54262343d2ab23979223092d6a6abf1a9
User & Date: mistachkin 2015-09-30 19:22:07
Context
2015-10-01
04:07
Pickup further upstream enhancements to the Eagle test suite prologue file. check-in: 607127f1bb user: mistachkin tags: trunk
2015-09-30
19:22
Update Eagle script library in externals to the latest code. check-in: 8ddbcff542 user: mistachkin tags: trunk
18:48
Update SQLite core library to the latest trunk code. check-in: a67fce442b user: mistachkin tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to Externals/Eagle/lib/Eagle1.0/test.eagle.

841
842
843
844
845
846
847

848
849
850

851
852
853
854
855
856
857
    }
  }
 
  proc getFiles { directory pattern } {
    if {[isEagle]} then {
      set result [list]


      foreach fileName [lsort -dictionary [file list $directory $pattern]] {
        if {[file isfile $fileName] && [file readable $fileName]} then {
          lappend result $fileName

        }
      }

      return $result
    } else {
      return [lsort -dictionary [glob -directory $directory -types \
          {f r} -nocomplain -- $pattern]]







>
|
|
|
>







841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
    }
  }
 
  proc getFiles { directory pattern } {
    if {[isEagle]} then {
      set result [list]

      if {[file exists $directory] && [file isdirectory $directory]} then {
        foreach fileName [lsort -dictionary [file list $directory $pattern]] {
          if {[file isfile $fileName] && [file readable $fileName]} then {
            lappend result $fileName
          }
        }
      }

      return $result
    } else {
      return [lsort -dictionary [glob -directory $directory -types \
          {f r} -nocomplain -- $pattern]]

Changes to Externals/Eagle/lib/Test1.0/all.eagle.

43
44
45
46
47
48
49


50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
#           runTestEpilogue
#
if {![info exists test_all_path]} then {
  set test_all_path \
      [file normalize [file dirname [info script]]]
}



if {![info exists test_path]} then {
  set test_path [file normalize [file join \
      [file dirname [file dirname $test_all_path]] \
      Library Tests]]
}

source [file join $test_all_path prologue.eagle]

set no(prologue.eagle) true
set no(epilogue.eagle) true

set test_time [time {
  runAllTests $test_channel $test_path \
      [getTestFiles [list $test_path] $test_flags(-file) \
          $test_flags(-notFile)] \







>
>






<
<







43
44
45
46
47
48
49
50
51
52
53
54
55
56
57


58
59
60
61
62
63
64
#           runTestEpilogue
#
if {![info exists test_all_path]} then {
  set test_all_path \
      [file normalize [file dirname [info script]]]
}

source [file join $test_all_path prologue.eagle]

if {![info exists test_path]} then {
  set test_path [file normalize [file join \
      [file dirname [file dirname $test_all_path]] \
      Library Tests]]
}



set no(prologue.eagle) true
set no(epilogue.eagle) true

set test_time [time {
  runAllTests $test_channel $test_path \
      [getTestFiles [list $test_path] $test_flags(-file) \
          $test_flags(-notFile)] \

Changes to Externals/Eagle/lib/Test1.0/prologue.eagle.

884
885
886
887
888
889
890



891
892
893
894
895
896
897
      $root_path \"\n]

  tputs $test_channel [appendArgs "---- binary path: \"" \
      $bin_path \"\n]

  tputs $test_channel [appendArgs "---- library path: \"" \
      $lib_path \"\n]




  tputs $test_channel [appendArgs "---- test script files located in: \"" \
      $test_path \"\n]

  tputs $test_channel [appendArgs "---- test data files located in: \"" \
      $test_data_path \"\n]








>
>
>







884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
      $root_path \"\n]

  tputs $test_channel [appendArgs "---- binary path: \"" \
      $bin_path \"\n]

  tputs $test_channel [appendArgs "---- library path: \"" \
      $lib_path \"\n]

  tputs $test_channel [appendArgs "---- test suite files located in: \"" \
      $test_all_path \"\n]

  tputs $test_channel [appendArgs "---- test script files located in: \"" \
      $test_path \"\n]

  tputs $test_channel [appendArgs "---- test data files located in: \"" \
      $test_data_path \"\n]