work around Dejagnu failure on modern Tcl
authorTom Yu <tlyu@mit.edu>
Tue, 28 Jun 2011 22:11:51 +0000 (22:11 +0000)
committerTom Yu <tlyu@mit.edu>
Tue, 28 Jun 2011 22:11:51 +0000 (22:11 +0000)
Modern releases of Tcl (8.5 and later?) require use the special
procedure "unknown" to implement some autoloading functionality.
Dejagnu replaces "unknown" with its own definition, without chaining
to the original version of "unknown".  This causes "clock format
[clock seconds]" to fail while trying to load the "msgcat" Tcl
package.

Use "exec date" instead of "clock format [clock seconds]" to work
around this bug.

(Also needs pullup to 1.7.)

ticket: 6926
version_fixed: 1.8.5

git-svn-id: svn://anonsvn.mit.edu/krb5/branches/krb5-1-8@24999 dc483132-0cff-0310-8789-dd5450dbe970

src/tests/dejagnu/config/default.exp

index 79afd09e6ce3277837b481c19198b7b41c3fd637..d8390e7902c62115b9bc52950bd5b78fc2f118ef 100644 (file)
@@ -1619,7 +1619,7 @@ proc start_tail { fname spawnid_var pid_var which standalone } {
     set spawnid $spawn_id
     set pid [exp_pid]
 
-    set markstr "===MARK $pid [clock format [clock seconds]] ==="
+    set markstr "===MARK $pid [exec date] ==="
     puts $f $markstr
     flush $f