diff options
| author | Greg Hudson <ghudson@mit.edu> | 2010-02-22 18:27:55 +0000 |
|---|---|---|
| committer | Greg Hudson <ghudson@mit.edu> | 2010-02-22 18:27:55 +0000 |
| commit | bf59f3c674fa8de3942dd80ed120143bd6dad5b7 (patch) | |
| tree | 71ccb9b82a286a2f6ee60df81cb7f0c950e19d45 /src | |
| parent | e4cc5255c0194db5df5a6c2092afc6e14adeabef (diff) | |
| download | krb5-bf59f3c674fa8de3942dd80ed120143bd6dad5b7.tar.gz krb5-bf59f3c674fa8de3942dd80ed120143bd6dad5b7.tar.xz krb5-bf59f3c674fa8de3942dd80ed120143bd6dad5b7.zip | |
Remove some more dejagnu test suite cruft:
* check_date was only used by the application tests.
* touch was never used.
git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@23745 dc483132-0cff-0310-8789-dd5450dbe970
Diffstat (limited to 'src')
| -rw-r--r-- | src/tests/dejagnu/config/default.exp | 26 |
1 files changed, 0 insertions, 26 deletions
diff --git a/src/tests/dejagnu/config/default.exp b/src/tests/dejagnu/config/default.exp index 4686a2601..1689e86fe 100644 --- a/src/tests/dejagnu/config/default.exp +++ b/src/tests/dejagnu/config/default.exp @@ -2363,32 +2363,6 @@ proc xst { keytab name } { return 1 } -# Check the date. The string will be the output of date on this -# system, and we must make sure that it is in the same timezone as the -# output of date run a second time. The first date will be run on an -# rlogin or some such connection to the local system. This is to test -# to make sure that the TZ environment variable is handled correctly. -# Returns 1 on sucess, 0 on failure. - -proc check_date { date } { - catch "exec date" ndate - set atz "" - set ntz "" - scan $date "%s %s %d %d:%d:%d %s %d" adow amon adom ahr amn asc atz ayr - scan $ndate "%s %s %d %d:%d:%d %s %d" ndow nmon ndom nhr nmn nsc ntz nyr - if { $atz != $ntz } { - verbose -log "date check failed: $atz != $ntz" - return 0 - } - return 1 -} - -proc touch { file } { - set f [open $file "a"] - puts $f "" - close $f -} - # helpful sometimes for debugging the test suite proc export_debug_envvars { } { global env |