/ Check-in [22cc3e6c]
Login

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

Overview
Comment:Get things working better on Windows with MSVC.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | mp-releasetest
Files: files | file ages | folders
SHA1:22cc3e6c8e7f7eed854f8a50138ccb9c79bb7a23
User & Date: mistachkin 2015-11-02 21:05:56
Context
2015-11-02
23:21
Fix the backcompat.test module so that it does not try to compare against itself on windows. check-in: f625bce8 user: drh tags: mp-releasetest
21:05
Get things working better on Windows with MSVC. check-in: 22cc3e6c user: mistachkin tags: mp-releasetest
20:52
Fix the --dryrun option on the releasetest.tcl script. check-in: e565e026 user: dan tags: mp-releasetest
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to test/releasetest.tcl.

420
421
422
423
424
425
426






427





428
429
430
431
432
433
434
...
514
515
516
517
518
519
520

521
522
523
524
525
526
527
528
  catch {file delete core}
  catch {file delete test.log}

  # Run the "./configure && make" commands.
  set rc 0
  set rc [catch [configureCommand $configOpts]]
  if {!$rc} {






    set rc [catch [makeCommand $testtarget $cflags $opts]]





  }

  # Exis successfully if the test passed, or with a non-zero error code
  # otherwise.
  exit $rc
}

................................................................................
        flush stdout
      }

      # Run the job.
      #
      set tm1 [clock seconds]
      incr G(nJob)

      set fd [open "|[info nameofexecutable] [info script] --slave" r+]
      fconfigure $fd -blocking 0
      fileevent $fd readable [list slave_fileevent $fd $T $tm1]
      puts $fd [list $::TRACE $::MSVC $::DRYRUN]
      puts $fd [list {*}$T]
      flush $fd
    }
  }







>
>
>
>
>
>

>
>
>
>
>







 







>
|







420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
...
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
  catch {file delete core}
  catch {file delete test.log}

  # Run the "./configure && make" commands.
  set rc 0
  set rc [catch [configureCommand $configOpts]]
  if {!$rc} {
    if {[info exists ::env(TCLSH_CMD)]} {
      set savedEnv(TCLSH_CMD) $::env(TCLSH_CMD)
    } else {
      unset -nocomplain savedEnv(TCLSH_CMD)
    }
    set ::env(TCLSH_CMD) [file nativename [info nameofexecutable]]
    set rc [catch [makeCommand $testtarget $cflags $opts]]
    if {[info exists savedEnv(TCLSH_CMD)]} {
      set ::env(TCLSH_CMD) $savedEnv(TCLSH_CMD)
    } else {
      unset -nocomplain ::env(TCLSH_CMD)
    }
  }

  # Exis successfully if the test passed, or with a non-zero error code
  # otherwise.
  exit $rc
}

................................................................................
        flush stdout
      }

      # Run the job.
      #
      set tm1 [clock seconds]
      incr G(nJob)
      set script [file normalize [info script]]
      set fd [open "|[info nameofexecutable] $script --slave" r+]
      fconfigure $fd -blocking 0
      fileevent $fd readable [list slave_fileevent $fd $T $tm1]
      puts $fd [list $::TRACE $::MSVC $::DRYRUN]
      puts $fd [list {*}$T]
      flush $fd
    }
  }