Tcl Library Source Code

Check-in [bddd800ca6]
Login
Bounty program for improvements to Tcl and certain Tcl packages.
Tcl 2019 Conference, Houston/TX, US, Nov 4-8
Send your abstracts to [email protected]
or submit via the online form by Sep 9.

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

Overview
Comment:sak test run - Moved table of timings to separate log file "STEM.timetable".
Timelines: family | ancestors | descendants | both | test-assets
Files: files | file ages | folders
SHA3-256: bddd800ca61f2defca47a614444e1209cae5965acbb7488f257c62543bb779d5
User & Date: aku 2019-06-21 05:05:24
Context
2019-06-21
05:07
Integrated work on the test assets into trunk. check-in: 23b8d4b98e user: aku tags: trunk
05:05
sak test run - Moved table of timings to separate log file "STEM.timetable". Closed-Leaf check-in: bddd800ca6 user: aku tags: test-assets
05:05
Reworked the amazon-s3 test setup to check for and tell about the AWS authentication requirements it has. check-in: c17997785d user: aku tags: test-assets
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to support/devel/sak/test/run.tcl.

88
89
90
91
92
93
94

95
96
97
98
99
100
101
...
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
	variable logsum [open $config(stem).summary     w]
	variable logfai [open $config(stem).failures    w]
	variable logski [open $config(stem).skipped     w]
	variable lognon [open $config(stem).none        w]
	variable logerd [open $config(stem).errdetails  w]
	variable logfad [open $config(stem).faildetails w]
	variable logtim [open $config(stem).timings     w]

    } else {
	variable logext stdout
    }

    # Preprocessing of module names and shell versions to allows
    # better formatting of the progress output, i.e. vertically
    # aligned columns
................................................................................
	}
	M sort rows -decreasing 5

	M insert row 0 {Shell Module Testsuite Tests Seconds uSec/Test}
	M insert row 1 {===== ====== ========= ===== ======= =========}
	M add    row   {===== ====== ========= ===== ======= =========}

	puts $logsum \nTimings...
	puts $logsum [M format 2string]
    }

    exit [expr {($err || $fail) ? 1 : 0}]
    return
}

# ###






>







 







|
|







88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
...
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
	variable logsum [open $config(stem).summary     w]
	variable logfai [open $config(stem).failures    w]
	variable logski [open $config(stem).skipped     w]
	variable lognon [open $config(stem).none        w]
	variable logerd [open $config(stem).errdetails  w]
	variable logfad [open $config(stem).faildetails w]
	variable logtim [open $config(stem).timings     w]
	variable logtmt [open $config(stem).timetable   w]
    } else {
	variable logext stdout
    }

    # Preprocessing of module names and shell versions to allows
    # better formatting of the progress output, i.e. vertically
    # aligned columns
................................................................................
	}
	M sort rows -decreasing 5

	M insert row 0 {Shell Module Testsuite Tests Seconds uSec/Test}
	M insert row 1 {===== ====== ========= ===== ======= =========}
	M add    row   {===== ====== ========= ===== ======= =========}

	puts $logtmt "\nTiming Table..."
	puts $logtmt [M format 2string]
    }

    exit [expr {($err || $fail) ? 1 : 0}]
    return
}

# ###