SQLite

Check-in [aef177fef0]
Login

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

Overview
Comment:Fix releasetest.tcl so that output lines are less than 80 characters wide.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | mp-releasetest
Files: files | file ages | folders
SHA1: aef177fef049f9ffb0d138b947326dc0186b1f4f
User & Date: dan 2015-11-02 20:24:29.534
Context
2015-11-02
20:28
Fix releasetest.tcl so that it does not choke if a test fails so badly that there is no log file. Add the --jobs switch to the usage message. (check-in: 20e96f521f user: dan tags: mp-releasetest)
20:24
Fix releasetest.tcl so that output lines are less than 80 characters wide. (check-in: aef177fef0 user: dan tags: mp-releasetest)
18:32
Add the "--jobs N" option to the releasetest.tcl script to allow tests to be run in parallel by N processes. N defaults to 1. (check-in: 3d29f912cb user: dan tags: mp-releasetest)
Changes
Unified Diff Ignore Whitespace Patch
Changes to test/releasetest.tcl.
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
        set status FAIL
        incr ::NERR
      } else {
        set status Ok
      }

      set n [string length $title]
      PUTS "finished: ${title}[string repeat . [expr {63-$n}]] $status $tm"
      if {$errmsg!=""} {PUTS "     $errmsg"}
      flush stdout
    }

    incr G(nJob) -1
  } else {
    set line [gets $fd]







|







456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
        set status FAIL
        incr ::NERR
      } else {
        set status Ok
      }

      set n [string length $title]
      PUTS "finished: ${title}[string repeat . [expr {53-$n}]] $status $tm"
      if {$errmsg!=""} {PUTS "     $errmsg"}
      flush stdout
    }

    incr G(nJob) -1
  } else {
    set line [gets $fd]